Foxtable(狐表) → 用户栏目 → 专家坐堂 → 返回指定格式的string

共有2654人关注过本帖树形打印复制链接主题：返回指定格式的string

huhu

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1182 积分：8225 威望：0 精华：0 注册：2015/3/30 10:44:00

返回指定格式的string 发帖心情

Post By：2016/11/18 17:58:00 [显示全部帖子]

Public Function GetState1(ByVal ddh As String, ByVal ddhh As String, ByVal wlbm As String, ByVal lhbbh As String, ByVal rjbb As String) As String

Dim cnStr As String = "Data Source=(local);Initial Catalog=songjiang;Integrated Security=False;User ID=sa;Password=bdcom103liujy;"

Dim cn As New SqlClient.SqlConnection(cnStr)

cn.Open()

Dim cm As New SqlClient.SqlCommand("s elect 数量 from [可用数量表] where 订单号 = '" & ddh & "' and 订单行号 = '" & ddhh & "' and 物料编码 = '" & wlbm & "' and 两化表编号 = '" & lhbbh & "' and 软件版本 = '" & rjbb & "'", cn)

Dim state As String = cm.ExecuteScalar

cn.Close()

Return state

End Function

现在返回的就是一个数量值。

假如有A,B,C，数量4个列他们只为1,2,3,4

希望返回的格式为A:1,B:2,C:3,D:4

这种格式怎么弄?

huhu

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1182 积分：8225 威望：0 精华：0 注册：2015/3/30 10:44:00

Post By：2016/11/18 18:31:00 [显示全部帖子]

可明明有2行数据，却只返回第一行是怎么回事?

<?xml version="1.0" encoding="UTF-8"?>

<string xmlns="WebApplication4">生产订单号码:SC20160922001,工单行号:26,数量:15</string>

huhu

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1182 积分：8225 威望：0 精华：0 注册：2015/3/30 10:44:00

Post By：2016/11/28 10:07:00 [显示全部帖子]

Public Function GetState1(ByVal ddh As String, ByVal ddhh As String, ByVal wlbm As String, ByVal lhbbh As String, ByVal rjbb As String) As String

Dim cnStr As String = "Data Source=(local);Initial Catalog=songjiang;Integrated Security=False;User ID=sa;Password=bdcom103liujy;"

Dim cn As New SqlClient.SqlConnection(cnStr)

cn.Open()

Dim cm As New SqlClient.SqlCommand("s elect * from [可用数量表] where 订单号 = '" & ddh & "' and 订单行号 = '" & ddhh & "' and 物料编码 = '" & wlbm & "' and 两化表编号 = '" & lhbbh & "' and 软件版本 = '" & rjbb & "'", cn)

Dim dt As DataTable = cm.ExecuteReader

cn.Close()

Dim state As String

For Each dr As DataRow In dt.datarow

state + = '工单号:' + dr("工单号") + ',工单行号:' + dr("工单行号") + ",物料编码:" + dr("物料编码") + ",数量:" + dr("数量"）

Return state

End Function