村上舞!舞!舞 发表于 2005-11-15 11:31:53

急于请教各位!! 在等侍

请教各位一下:
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 发表于 2005-11-15 17:39:11

http://bbs.51testing.com/viewthread.php?tid=10838&extra=page%3D1
页: [1]
查看完整版本: 急于请教各位!! 在等侍