Library. " Klicken Sie auf " OK".
3 Geben Sie den folgenden , um eine neue Subroutine erstellen und Variablen deklarieren : Public Sub
createDataToAnalyze () Dim
objConnection Wie New ADODB.Connection
Dim objCom Wie ADODB.Command
Dim provstr As String
4
Geben Sie den folgenden , um die Verbindung zu Ihrem SQL Server zu definieren :
Set objCom = New ADODB.Command
objConnection.Provider = " sqloledb "
provstr = " Data Source = SERVERNAME ; " & " Initial Catalog = DATABASE NAME; User Id = USER ID ; Password = PASSWORD ; . "
bearbeiten " provstr "string und geben Sie Ihre Verbindungsinformationen , wie Server -, Datenbank- , Benutzer-ID und Passwort
5
Typ folgendes zu Ihren gespeicherten Prozedur Informationen definieren : . .
objConnection.Open provstr
objCom
ActiveConnection = objConnection
CommandText = " spCreateUserTbl "
CommandType = adCmdStoredProc
Execute
End With End sub
bearbeiten Sie die folgende Zeile ein und geben Sie Ihren Namen der gespeicherten Prozedur . . :
. CommandText = " spCreateUserTbl "
6
Presse "F5 ", um die Unterroutine ausführen .