Discussion :

[aminosoft]

Bonjour, dans une page asp classic :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
'--connexion a la base de données
Set conn = server.createobject("ADODB.Connection")
response.Write(Application("Base"))
Base = "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" &  Application("Base")
conn.open Base

comment faire pour stocker ces lignes dans une procédure? et comment l'appeler?
Merci d'avance

[emmanuel.remy]

Salut,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
dim conn
 
sub connect()
'--connexion a la base de données
Set conn = server.createobject("ADODB.Connection")
response.Write(Application("Base"))
Base = "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" &  Application("Base")
conn.open Base
end sub
 
connect

ERE