标题: 急于请教各位!! 在等侍 [打印本页] 作者: 村上舞!舞!舞 时间: 2005-11-15 11:31 标题: 急于请教各位!! 在等侍 请教各位一下：
im outputStr As String
Dim connection As Long
Dim prompt As Integer
Dim datasources(1 To 50) As Variant
Dim retcode As Variant
Dim action1 as Integer
Dim qualifier as String
prompt = 5
' Open the datasource "SblTest"
connection = SQLOpen("DSN=TEST", outputStr, prompt:=5)
MSGBOX CONNECTION
action1 = 1 ' Get the names of the ODBC datasources
retcode = SQLGetSchema(connection:=connection,action:=1, qualifier:=qualifier, ref:=datasources())
' Close the datasource connection
retcode = SQLClose(connection)
这些代码中connection = SQLOpen("DSN=TEST", outputStr, prompt:=5) DNS=TEST是什么意思？？
Dim datasources(1 To 50) As Variant 这一名代码又是什么意思？定义的是一个什么变量呀？？？