我想打印/调试所有列的名称及其值。
我试过这样的事情:
Dim nCmd As MySqlCommand
nCmd = New MySqlCommand("SELECT * FROM payinout WHERE inout_searcher=" & Apo(u), g_CnWebDB)
Dim r As MySqlDataReader
r = nCmd.ExecuteReader()
bExists = r.HasRows
For Each f As Field In r.fields
Debug.Print(f.name & ": " & f.value)
Next
...但由于缺少这些成员,我想我不是在正确的轨道上。 请帮忙吗?
答案 0 :(得分:2)
使用FieldCount和GetName方法尝试使用标准循环,但在尝试从MySqlDataReader读取任何内容之前调用Read
r.Read()
For x = 0 To r.FieldCount - 1
Debug.Print(r.GetName(x) & ": " & r(x).ToString)
Next
请注意,所使用的查询对Sql Injection是开放的。如果这只是测试代码,那么无关紧要,但在生产中使用参数化查询。