大哥们 真的不是错误     运行的好好的   是我看源代码里的Private Function MakeSQL(strTableName As String) As String
    Dim strSQL As String
    Dim strReturn As String
    Dim rec As Recordset
    Dim i As Long
    strSQL = "Select * From " & strTableName & "  Where False "
    On Error GoTo errH:
    Set rec = gclsBase.BaseDB.OpenRecordset(strSQL, dbOpenSnapshot)
    strReturn = "Select "
    For i = 0 To rec.Fields.Count - 2
        strReturn = strReturn & rec.Fields(i).Name & ","
    Next i
    
    strReturn = strReturn & rec.Fields(rec.Fields.Count - 1).Name
    
    strReturn = strReturn & " FROM " & strTableName
    MakeSQL = strReturn
    rec.Close
    Set rec = Nothing
    Exit Function
errH:
    strReturn = "表查询失败!" & Err.Description
    MakeSQL = strReturn
End Function

解决方案 »

  1.   

    response.write(strSQL)
    输出来看看...
      

  2.   

    数据库不是SQL SERVER吧?
    SQL SERVER 写法:
     strSQL = "Select * From " & strTableName & "  Where 1=2"
    就是取得记录条数为0的记录集,相当于取得表结构
      

  3.   

    是 sysbase  我觉得 tx1icenhe(冒牌马可 V0.1)  说对了  大家认为那?
      

  4.   

    如果是SQL Server的话,这个语句本来就是错的.
    sql没有 false这个东西Where False 
      

  5.   

    SQL Server 没有逻辑型的
      

  6.   


        这条语句怎么会有错,字符型变量赋值嘛。呵呵,除非,strSQL的类型不是string,那就错了。
      

  7.   

    SYBASE,不会,那应该是吧,如果能执行的话