Foxtable(狐表)用户栏目专家坐堂 → [求助]如何引用SQLCommand查询出来的结果


  共有8756人关注过本帖树形打印复制链接

主题:[求助]如何引用SQLCommand查询出来的结果

帅哥哟,离线,有人找我吗?
teng0731
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:459 积分:3471 威望:0 精华:0 注册:2011/6/6 11:22:00
[求助]如何引用SQLCommand查询出来的结果  发帖心情 Post By:2012/4/17 21:18:00 [只看该作者]

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT top 3 DISTINCT 省,市县,区号,邮编 From {行政区域}"
dt = cmd.ExecuteReader()

对于上面通过SQLCommand查询出来的结果集,如何取第一行,第一列的值呢,是写成
Dim dr As DataRow
dr= dt.DataRows(0)
dr(0) 或者 dr("省")  可以吗,正确的写法是?


 回到顶部
帅哥哟,离线,有人找我吗?
czy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2012/4/17 21:31:00 [只看该作者]

dr= dt.DataRows(0)

Output.Show(dr("省"))


 回到顶部
帅哥哟,离线,有人找我吗?
teng0731
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:459 积分:3471 威望:0 精华:0 注册:2011/6/6 11:22:00
  发帖心情 Post By:2012/4/17 21:47:00 [只看该作者]

谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
teng0731
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:459 积分:3471 威望:0 精华:0 注册:2011/6/6 11:22:00
  发帖心情 Post By:2012/4/17 21:55:00 [只看该作者]

不好意思,还需要继续询问:

对于下面的语句,窗口可以正常查询

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT top 3 name,mima From {yonghu}"
dt = cmd.ExecuteReader()
Dim dr As DataRow
dr= dt.DataRows(0)
Output.Show(dr("name"))

 

但是如果是下面的语句,窗口就报错(查询条件加入了全局变量)

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT name,mima From {yonghu} where [gongshi_id]=' " & Vars("gongshi_a") & "'"
dt = cmd.ExecuteReader()
Dim dr As DataRow
dr= dt.DataRows(0)
Output.Show(dr("name"))

 

 

 


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

 

不知道错误的原因?

[此贴子已经被作者于2012-4-17 21:55:57编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
teng0731
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:459 积分:3471 威望:0 精华:0 注册:2011/6/6 11:22:00
  发帖心情 Post By:2012/4/17 21:59:00 [只看该作者]

单独执行 Output.Show(Vars("gongshi_a"))  是正常的输出结果

 

 


图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7235 积分:40550 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2012/4/17 22:18:00 [只看该作者]

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT name,mima From {yonghu} where [gongshi_id]= '" & Vars("gongshi_a") & "'"
dt = cmd.ExecuteReader()
Dim dr As DataRow
dr= dt.DataRows(0)
Output.Show(dr("name"))


 回到顶部
帅哥哟,离线,有人找我吗?
teng0731
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:459 积分:3471 威望:0 精华:0 注册:2011/6/6 11:22:00
  发帖心情 Post By:2012/4/17 22:23:00 [只看该作者]

已经好了,确实是[gongshi_id]= '" &  写法的问题,原来写成=' "   应该为= '"

 

感谢程版主


 回到顶部