74 messaggi dal 24 novembre 2001
Ok per la connessione sono riuscito resta solo da capire come effettuare la query (tabella.db significa nomefile.dbf?) e le tabelle?
In teoria non devi mettere il nome del DBF ma solo quello della cartella. Ma che stringa di connessione usi?

--
Andrea Palmatè
74 messaggi dal 24 novembre 2001
Ciao Andrea e grazie per l'attenzione,
Ho trovato su un sito, ( http://www.able-consulting.com/MDAC/ADO/Connection/ODBC_DSNLess.htm#ODBCDriverForDBASE ), una function che va, te la posto:

Function OpenDBFConn(Path)
Dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Path & ";" & _
"Extended Properties=""DBASE IV;"";"
Set OpenDBFConn = Conn
End Function

solo che non riesco a fare la select sto provando tipo db access ma è la prima volta che incontro un file di questo tipo e nn so proprio come trattarlo  faccio una cosa del genere:


<%
Path = "C:\Documents and Settings\default\Desktop\gestione\"


'Function OpenDBFConn(Path)
Dim Conn: Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Path & ";" & _
"Extended Properties=""DBASE IV;"";"
Set OpenDBFConn = Conn
'End Function

'Path = "C:\Documents and Settings\default\Desktop\gestione\Ag742.dbf"
'Path = "C:\Documents and Settings\default\Desktop\gestione\"

'OpenDBFConn(Path)

if err.Number = 0 then
Response.write "<P>Connessione riuscita!"
else
Response.write "<P>Errore: " & err.Description
end if
'sql = "select * from Ag742"
set rs = OpenDBFConn.execute("select * from ag742.db")
Do while not rs.eof
response.write rs(0)
loop
%>

dove sbaglio?

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.