Я пытаюсь выполнить запрос типа «показать таблицы». Но я не знаю имен столбцов, которые будут возвращены запросом. Я пытался использовать что-то вроде
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