急于请教各位!! 在等侍

村上舞!舞!舞

请教各位一下：
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  这一名代码又是什么意思？定义的是一个什么变量呀？？？

谢谢了

[ 本帖最后由 村上舞!舞!舞 于 2005-11-15 17:24 编辑 ]

ilovejolly

http://bbs.51testing.com/viewthr ... &extra=page%3D1