PDA

Visualizza la versione completa : [VB] Connessione Database ACCESS


DarCas
25-07-2002, 21:15
Son un programmatore ASP ed ho bisogno di tradurre questo codice:


Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("user.mdb")

SQL = "SELECT * FROM topic WHERE Categoria LIKE '%" & TIPO & "%' ORDER BY Data DESC"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL, conn, 3, 3

rs.Close
Set rs = Nothing

conn.Close
Set conn = Nothing
in codice Visual Basic 5

M'illuminate? :master:

DarCas
25-07-2002, 21:52
Beh? :master:

Gigi84
26-07-2002, 08:51
Dim conn As new ADODB.Connection
Dim rs as New ADODB.Recordset

conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("user.mdb") 'Server.mapPath non so cos'è..

SQL = "SELECT * FROM topic WHERE Categoria LIKE '%" & TIPO & "%' ORDER BY Data DESC"
rs.Open SQL, conn, 3, 3

rs.Close
Set rs = Nothing

conn.Close
Set conn = Nothing


..praticamente è uguale.. la stringa di connessione penso che vada bene (a parte quel Server.MapPath) perchè si usa sempre ADO..

solo che nei riferimenti devi aggiungere Microsoft ActiveX Data Object!

:ciauz: :ciauz:

DarCas
26-07-2002, 14:59
Grazie mille...

Cmq il Server.mapPath equivale a App.Path

DarCas
26-07-2002, 15:02
Originariamente inviato da Gigi84
[B...aggiungere Microsoft ActiveX Data Object!

[/B]Come si fà?

Gigi84
26-07-2002, 15:27
PRogetto-->Riferimenti

poi lo cerchi e lo aggiungi!

DarCas
26-07-2002, 15:30
Un mito!

Gigi84
26-07-2002, 15:31
;)

ciko1973
29-07-2002, 11:15
perchè a me non funziona?
Qualcuno mi illumini....vi prego!

Private Sub Comando0_Click()
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim SQL As String

conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.myPath("prova_ore.mdb") 'Server.mapPath non so cos'è..

SQL = "SELECT Data FROM FoglioNumeri"
rs.Open SQL, conn, 3, 3



rs.Close
Set rs = Nothing

conn.Close
Set conn = Nothing


conn.Close
Set conn = Nothing

Gigi84
29-07-2002, 11:20
perchè server.mappath è una variabile ASP che in VB è app.path (come diceva DarCas)!:gren:


:ciauz: :ciauz:

P.S. ..tu intedevi VB vero?!

Loading