我正在尝试执行像“show tables”这样的查询。但我不知道查询将返回的列名。我尝试过使用像
这样的东西RS.Fields(1).Name
向我显示名称,但似乎不起作用。有什么建议?这是完整的代码:
Response.Buffer = true
Dim oConn, oRs
Dim qry, connectstr, i
i = 1
connectstr = "Driver={MySQL ODBC 3.51 Driver};SERVER=xxx.xxx.xxx.xxx;DATABASE=;UID=;PWD="
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open connectstr
qry = "show tables"
Set oRS = oConn.Execute(qry)
while not oRS.EOF
Response.Write("<td><b>" & oRS.Fields(i).Name & "</b></td>")
oRS.movenext
i = i + 1
wend
Set oRs = nothing
Set oConn = nothing
答案 0 :(得分:2)
For I=0 to oRS.Fields.Count - 1
Response.Write("<td><b>" & oRS.Fields(I).Name & "</b></td>")
Next
答案 1 :(得分:2)
如果你只想要这个字段名......
For Each fldF In objRec.Fields
Response.Write fldF.Name
Response.Write "<br />"
Next
答案 2 :(得分:0)
确保此查询的数据库用户可以访问数据库定义(结构)。但是您应该拒绝访问您的Web用户以获得安全性(SQL注入)。