2009-10-05 118 views
0

我試圖執行一個查詢,如「顯示錶」。但我不知道將由查詢返回的列名稱。我試過使用類似ASP經典分貝問題

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 

回答

2
For I=0 to oRS.Fields.Count - 1 
    Response.Write("<td><b>" & oRS.Fields(I).Name & "</b></td>") 
Next 
+1

+1。這應該工作。 – David 2009-10-05 02:46:56

2

如果你只是想thie字段名...

For Each fldF In objRec.Fields 
    Response.Write fldF.Name 
    Response.Write "<br />" 
Next 
0

確保此查詢您的數據庫用戶訪問數據庫定義(結構) 。但是你應該拒絕訪問網絡用戶的安全性(SQL注入)。

+0

這並不回答這裏提到的問題。 – 2013-02-23 22:25:14