Ultimo messaggio

GuidoC

il 25 aprile 2010 alle 11:43

64 messaggi dal 25 settembre 2006

Ciao a tutti,

perchè continua a darmi questo errore.....

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] '(unknown)' is not a valid path. Make sure that the path name is spelled correctly and that you are connected to the server on which the file resides.

/a_ver_disp.asp, line 31

lo script è il seguente:
codice:<%
a=request.form("nome")
b=request.form("cognome")
c=request.form("telefono")
'apro la connessione
set OBJdbConnection=Server.CreateObject("ADODB.Connection")
OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=./mdb-database/Prenota.mdb"
Set rs=server.CreateObject("ADODB.Recordset")
rs.Open "richiestedati",OBJdbConnection,3,3
rs.AddNew
rs("nome")=a
rs("cognome")=b
rs("telefono")=c
rs.update
rs.Close
OBJdbConnection.Close
%>

Grazie anticipate

GuidoC

Rispondi Quoting

alex71

il 26 aprile 2010 alle 09:28

154 messaggi dal 16 giugno 2001

Ciao prova a cambiare la connection tipo cosi
--------------------------------------------------

Set cn1=Server.CreateObject("ADODB.Connection")
cn1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("mdb-database/prenota.mdb") & ";Persist Security Info=False"
cn1.Open
---------------------------------------------
Controlla i nomi
Ciao

Rispondi Quoting

GuidoC

il 26 aprile 2010 alle 18:37

64 messaggi dal 25 settembre 2006

Ciao Alex71,

grazie per avermi risposto.

ora mi dà:

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/a_ver_disp.asp, line 51

secondo me mi manca qualche pezzo.

riesci a dargli un'occhiata?

Modificato da GuidoC il 26 aprile 2010 18.43 -

GuidoC

Rispondi Quoting

alex71

il 27 aprile 2010 alle 10:46

154 messaggi dal 16 giugno 2001

Ciao prova a postare il codice

Rispondi Quoting

GuidoC

il 27 aprile 2010 alle 20:15

64 messaggi dal 25 settembre 2006

Ciao Alex71,

ti ringrazio per esserti reso disponibile.

io ho:
- Db= prenota.mdb
- Tabelle= RichiesteProgressivi e RichiesteDati
- RichiesteProgressivi contiene i campi Anno e NumProgressivo

poi ho una pagina che si chiama a_ver_disp.asp che ha sostanzialmente 2 script:
uno per generare il progressivo e l'altro per passare i parametri ad una seconda pagina di riepilogo

i dati vengono puntualmente passati alla pagina di riepilogo e va bene ma non riesco a GENERARE il progressivo di prenotazione:

ecco lo script:

<%
Dim rsAnagrafica__Param1
rsAnagrafica__Param1 = "-1"
If (Request("id") <> "") Then 
  rsAnagrafica__Param1 = Request("id")
End If
%>
<%
Dim rsAnagrafica
Dim rsAnagrafica_cmd
Dim rsAnagrafica_numRows

Set rsAnagrafica_cmd = Server.CreateObject ("ADODB.Command")
rsAnagrafica_cmd.ActiveConnection = MM_Regioni_STRING
rsAnagrafica_cmd.CommandText = "SELECT * FROM Strutture WHERE id = ?" 
rsAnagrafica_cmd.Prepared = true
rsAnagrafica_cmd.Parameters.Append rsAnagrafica_cmd.CreateParameter("param1", 5, 1, -1, rsAnagrafica__Param1) 'adDouble

Set rsAnagrafica = rsAnagrafica_cmd.Execute
rsAnagrafica_numRows = 0
%>
<%
a=request.form("Anno")
b=request.form("NumProgressivo")
'apro la connessione
set OBJdbConnection=Server.CreateObject("ADODB.Connection")

OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("/mdb-database/Prenota.mdb")


Set rs=server.CreateObject("ADODB.Recordset")
rs.Open "RichiesteProgressivi",OBJdbConnection,3,3
rs.AddNew
rs("Anno")=a
rs("NumProgressivo")=b
rs.update
rs.Close
OBJdbConnection.Close
%> 

<%
a=request.form("Cognome")
b=request.form("Nome")
c=request.form("Email")
d=request.form("Telefono")
e=request.form("N_Notti")
f=request.form("Arrivo")
g=request.form("Partenza")
h=request.form("N_Adulti")
i=request.form("N_Bambini")
l=request.form("Tipo_Trattamento")
m=request.form("Importo")
n=request.form("Ulteriori_Richieste")
'apro la connessione
set OBJdbConnection=Server.CreateObject("ADODB.Connection")

OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("/mdb-database/Prenota.mdb")


Set rs=server.CreateObject("ADODB.Recordset")
rs.Open "RichiesteDati",OBJdbConnection,3,3
rs.AddNew
rs("Cognome")=a
rs("Nome")=b
rs("Email")=c
rs("Telefono")=d
rs("N_Notti")=e
rs("Arrivo")=f
rs("Partenza")=g
rs("N_Adulti")=h
rs("N_Bambini")=i
rs("Tipo_Trattamento")=l
rs("Importo")=m
rs("Ulteriori_Richieste")=n
rs.update
rs.Close
OBJdbConnection.Close
%>

Grazie

GuidoC

Rispondi Quoting

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.

Community

UTENTI ONLINE