Foxtable(狐表)用户栏目专家坐堂 → [求助]find datatable mysql 问题


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

主题:[求助]find datatable mysql 问题

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


加好友 发短信
等级:六尾狐 帖子:1316 积分:9484 威望:0 精华:1 注册:2010/7/21 14:20:00
[求助]find datatable mysql 问题  发帖心情 Post By:2016/7/19 14:30:00 [只看该作者]

使用mysql数据库查询信息的时候,想把部分字段匹配过来,出现错误如下:

编译错误:“Find”不是“System.Data.DataTable”的成员。
错误代码:Dim fdr As DataRow = dt.Find("adminssi ")

怎么改才能实现?



Dim conn As MySql.Data.MySqlClient.MySqlConnection
Dim cmd As MySql.Data.MySqlClient.MySqlCommand
Dim sdr As MySql.Data.MySqlClient.MySqlDataReader
Dim connStr As String = "server=172.21.181.114; port=3306; user id=root; password=12232; database=zjks; Allow Zero Datetime=True"
conn = New MySql.Data.MySqlClient.MySqlConnection(connStr)
conn.Open
Dim dt As new System.Data.DataTable
cmd = new MySql.Data.MySqlClient.MySqlCommand("select adminssionid,score fr om adminssionid", conn)
sdr = cmd.ExecuteReader()
dt.load(sdr)
‘e.Form.Controls("Table1").Table.DataSource  = dt

Tables("Train_info").filter="Class_ID= '" & Vars("ClassId") & "' "
For i As Integer = 0 To Tables("Train_info").Rows.Count-1
    Dim fdr As DataRow = dt.Find("adminssi ")
    If fdr IsNot Nothing Then
'代码
    end if

next

conn.close

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/19 15:22:00 [只看该作者]

1、

 

e.Form.Controls("Table1").Table.DataSource  = dt

 

2、然后操作那个table

 

Tables("窗口1_Table").DataTable.Find("aaa='bbb'")


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


加好友 发短信
等级:六尾狐 帖子:1316 积分:9484 威望:0 精华:1 注册:2010/7/21 14:20:00
  发帖心情 Post By:2016/7/19 17:01:00 [只看该作者]

谢谢,试一下

 回到顶部