**** 简单问题大吐血 ***

CreateObject("ADODB.Connection") ?

解决方案 »

  1.   


    具体为什么错我也不知道，Private Sub Command12_Click()
        dim strSql as string
    　　On Error GoTo errTreat
        Set db = CreateObject("ADODB.Connection")
        db.Open "DSN=convertdb;UID=convert;PWD=convert"
        strSql = "describe table1;"
        db.Execute (strSql)
        db.Close
        msgbox("ok")
    exit sub
    errTreat：
        msgbox("err")
    end sub
      

  2.   

    的加分号就是执行到db.Execute (strSql)的时候出错的。
      

  3.   

    去除错误转向，看看标准的ERROR代码和错误号以后，在这里显示一下，我可以帮你。
    因为可能是DNS错，权限错，表名错，或者是SQL语句的错。
      

  4.   

    在，
    怎么看标准的ERROR代码和错误号
      

  5.   

    describe ?
    呵呵,我没有用过这么特殊的SQL语句,ADO会执行正确吗?
    我还是喜欢用ADO自己的描述方法,不知道你喜不喜欢?
    当然在数据库客户端中使用describe 或者DESC都是不会出错的,但是使用ADO就不晓得啦
      

  6.   

    to : JeasonZhao(Jeason)　
    你是怎么描述的？to: hunteryu()　
    你的意思是说？？？我不明白
      

  7.   

    那我怎么可以得到列的 not null 属性那
      

  8.   

    我不知道什么地方错，但我有过这样的一次经历：SQL语句的写法，有时在VB中是要变一下的。
      

  9.   

    我上去调试一下先，估计是你的SQL语句出错的可能性最大。