Biblioteca ". Fare clic su "OK".
3 Digitare quanto segue per creare un nuovo sottoprogramma e dichiarare le variabili :
Public Sub createDataToAnalyze ( ) per
Dim objConnection come New ADODB.Connection
Dim objCom Come ADODB.Command
Dim provstr As String
4
digitare quanto segue per definire la connessione al server SQL : < br
Set> objCom = New ADODB.Command
objConnection.Provider = " sqloledb "
provstr = "Data Source = SERVERNAME ; " e " Initial Catalog = nome del database ; User Id = uSER ID , password = PASSWORD ; ».
Modificare la " stringa provstr "e inserire i dati di connessione , quali il nome del server , nome del database , l'ID utente e la password
5
Tipo quanto segue per definire le informazioni stored procedure : . .
objConnection.Open provstr
objCom
ConnessioneAttiva = objConnection
CommandText = " spCreateUserTbl "
CommandType = adCmdStoredProc
Esegui
End With
End sub