Lancer une Procédure Stockée

Question

Bonjour,

Comment je peux faire pour lancer une procédure stockée sous SQLSERVER2000 à partire de VB.

Merci

tich3012 · Answer

Passe par l'ado ou dao c'est toi ki choise

blowlagoon · Answer

Oui mais c'est quelle commande

tich3012 · Answer

C'est une procedure qui te renvoie qqchose ou rien?

dans les deux cas utilise l'objet ADODB

blowlagoon · Answer

je peux avoir une exemple

tich3012 · Answer

Public g_conKit As ADODB.Connection

Option Explicit

'*****************************************************
'*fonction                  :   connection
'*sujet                     :   Connexion à la base de donnée
'*****************************************************
Public Sub Connexion()
    On Error GoTo err_Connexion
    
    Set g_conKit = New Connection
    With g_conKit
        .CommandTimeout = 0
        .CursorLocation = adUseServer
        .Provider = "SQLOLEDB.1"
'Le connection string est pour une base SQL ici
        .ConnectionString = "user id=sa;" & _
                            "pwd=alfacham;" & _
                            "data source=ACHILLE;" & _
                            "initial catalog=TESTS_KIT_INSTALL"
        .Open
    End With
    Exit Sub

err_Connexion:
    AlfaMsgBox "Erreur de connection, Le programme va se terminer.", vbCritical, "Echec de connection"
    End
End Sub

Pour executer un procedure stocke

g_conkit.execute strProcedure

Lancer une Procédure Stockée

5 réponses

Discussions similaires