Library . " Klik op "OK . "
Type 3 van de volgende opties om een nieuwe subroutine maken en verklaren variabelen :
Public Sub createDataToAnalyze
( )
Dim objConnection
als nieuwe ADODB.Connection
Dim objCom
Zoals ADODB.Command
Dim provStr
als Koord
Type 4 het volgende om de verbinding te definiëren om uw SQL -server : < br
Set > objCom = Nieuw ADODB.Command
objConnection.Provider
= " SQLOleDB "
provStr = " data Source = SERVERNAME ; " & " Initial Catalog = DATABASE NAAM ; gebruikers-id = uSER ID , wachtwoord = PASSWORD ; . "
Bewerk de " provStr "string en voer uw verbinding gegevens , zoals de servernaam, database- , gebruikers-ID en wachtwoord
Type 5 de volgende om uw opgeslagen procedure informatie te definiëren : . .
objConnection.Open provStr
met objCom
ActiveConnection
= objConnection
CommandText = " spCreateUserTbl " < br >
CommandType = adCmdStoredProc
Uitvoeren
Einde
Met
End sub
Bewerk de volgende regel en typ uw opgeslagen procedure naam . . :
. CommandText = " spCreateUserTbl "
Druk op " F5 " 6 om de subroutine uitgevoerd .