[VB6] Funzione di apertura database centralizzata per vari Form

[tigre2209]

ho diverse aperture dello stesso database in vari form,
ora come posso gestire l'apertura e la chiusura del database in visual basic 6?

[gibra]

Spiegati meglio, cosa vorresti ottenere?

P.S. Ricordati che il linguaggio va messo sul titolo, ovvero avresti dovuto scrivere
[VB6] Funzione apri database

[tigre2209]

in pratica devo aprire lo stesso database in vari form.
per non scrivere la stessa apertura allo stesso dtabase, posso scrivere una funzione di apertura del database e richiamala dai vari form?

esempio:
devo aprire questo database:

Dim conn, STRCONN
Set conn = CreateObject("adodb.connection")
conn.ConnectionString = "Driver={SQL Native Client};Server=server;Database=database;"
conn.Open

e poi sviluppare le query
e prelevare i record che mi servono nei vari form.
e chiudere il database.

[alka]

Originariamente inviato da tigre2209
ora come posso gestire l'apertura e la chiusura del database in visual basic 6?

Il linguaggio va indicato anche nel titolo, e non è la prima volta che ti viene fatto notare.
La prossima si chiude direttamente la discussione.

Qui aggiungo nel titolo.

[gibra]

Originariamente inviato da tigre2209
in pratica devo aprire lo stesso database in vari form.
per non scrivere la stessa apertura allo stesso dtabase, posso scrivere una funzione di apertura del database e richiamala dai vari form?

Certamente.

Originariamente inviato da tigre2209
esempio:
devo aprire questo database:

Dim conn, STRCONN
Set conn = CreateObject("adodb.connection")
conn.ConnectionString = "Driver={SQL Native Client};Server=server;Database=database;"
conn.Open

e poi sviluppare le query
e prelevare i record che mi servono nei vari form.
e chiudere il database.

Prima di tutto, il codice va racchiuso tra gli appositi tag (forse ti becchi un'altra moderazione... )

Ma perchè dichiari gli oggetti in quel modo?
Non capisco perchè usi CreateObject(), in VB6 non ha proprio alcun senso.

Comunque io faccio così: In un modulo BAS dichiaro

Public gCN as ADODB.Connection

Poi nella SubMain() del modulo, da cui parte la mia applicazione

Set gCN = New ADODB.Connection
gCN.ConnectionString = ......
ecc. ecc. ecc.

[tigre2209]

in pratica dove devo scrivere la connessione?

"Set gCN = New ADODB.Connection
gCN.ConnectionString = ......
ecc. ecc. ecc."