EXEC sp_columns @table_name ='表名'

解决方案 »

  1.   

    你到底想问什么啊?还是我理解有问题?
    结果集在模块里定义,&,",'变量时使用
            If rs.State = adStateOpen Then rs.Close
            '设立初始用户
             sSql = "INSERT zkc.dbo.userinfo  VALUES(" & _
                         "1," & _
                         "'manager'," & _
                         "''," & _
                         "'超级用户'," & _
                         "'" & Format(Date, "yyyy/mm/dd") & "')"
             cn.Execute (sSql)
    在模块中定义:
    Public cn As New ADODB.Connection 'ADO连接
    Public cn1 As New ADODB.Connection 'ADO连接
    Public rs As New ADODB.Recordset 'ADO结果集