欧洲机票哪里便宜:错误信息:

来源:百度文库 编辑:神马品牌网 时间:2024/04/18 15:12:05
错误信息:
error C2440

Dim cnn1 As ADODB.Connection
Dim rstSchema As ADODB.Recordset
Dim strCnn As String
Set cnn1 = New ADODB.Connection
strCnn = "driver={SQL Server};server=srv;" & _
"uid=sa;pwd=;database=pubs"
cnn1.Open strCnn
Set rstSchema = cnn1.OpenSchema(adSchemaTables)
Do Until rstSchema.EOF
Debug.Print "Table name: " & _
rstSchema!TABLE_NAME & vbCr & _
"Table type: " & rstSchema!TABLE_TYPE & vbCr
rstSchema.MoveNext Loop
rstSchema.Close
cnn1.Close

不说清楚什么时候出的 哪里出的 是没法解决的

建议你去下载一个错误代码分析器,百度里就能搜索到。。。
不过一般人不会太在意错误信息的。。。