Asp e access

[GuidoX]

Ciao a tutti, prima di scrivere ho cercato di capire tramite il vostro forum e le guide, ma non sono riuscito a capirci niente, io avrei bisogno di creare un form che inserisce dati in un database acces dove al suo interno c'è una tabella (mytable) e le 2 colonne (messaggi,nomi) ho creato il database in access l'ho messo nella cartella apposita
md-database di aruba, essendo che uso web2 ho cambiato ed ho messo il tutto in fpdb la cartella di frontpage, ho compilato il form così:

<form method="POST" action="inserisci.asp">
nome<input type="text"
name="nomi" size="20"></p>
Messaggio<input type="text"
name="messaggi" size="20"></p>
<input type="submit" value="Invia"
name="x"></p>
</form>

ho creato una pagina inserisci asp:
<%
a=request.form("nomi")
b=request.form("messaggi")
'apro la connessione
set OBJdbConnection=Server.CreateObject("ADODB.Connect ion")
OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="../../fpdb/database.mdb"

Set rs=server.CreateObject("ADODB.Recordset")
rs.Open "Messaggix",OBJdbConnection,3,3
rs.AddNew
rs("nomi")=a
rs("messaggi")=b
rs.update
rs.Close
OBJdbConnection.Close
%>
mi apre il form e non mi inserisce i dati, sono giorni che provo e non riesco non ci sarebbe un anima pia che mi darebbe una mano?

[taringa]

intanto leggi questo articolo
http://asp.html.it/guide/lezione/2040/inserimento-dati/
e forse ti può essere di aiuto anche questo
http://asp.html.it/guide/leggi/65/guida-asp/

[Iron83]

Originariamente inviato da GuidoX
Ciao a tutti, prima di scrivere ho cercato di capire tramite il vostro forum e le guide, ma non sono riuscito a capirci niente, io avrei bisogno di creare un form che inserisce dati in un database acces dove al suo interno c'è una tabella (mytable) e le 2 colonne (messaggi,nomi) ho creato il database in access l'ho messo nella cartella apposita
md-database di aruba, essendo che uso web2 ho cambiato ed ho messo il tutto in fpdb la cartella di frontpage, ho compilato il form così:

<form method="POST" action="inserisci.asp">
nome<input type="text"
name="nomi" size="20"></p>
Messaggio<input type="text"
name="messaggi" size="20"></p>
<input type="submit" value="Invia"
name="x"></p>
</form>

ho creato una pagina inserisci asp:
<%
a=request.form("nomi")
b=request.form("messaggi")
'apro la connessione
set OBJdbConnection=Server.CreateObject("ADODB.Connect ion")
OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="../../fpdb/database.mdb"

Set rs=server.CreateObject("ADODB.Recordset")
rs.Open "Messaggix",OBJdbConnection,3,3
rs.AddNew
rs("nomi")=a
rs("messaggi")=b
rs.update
rs.Close
OBJdbConnection.Close
%>
mi apre il form e non mi inserisce i dati, sono giorni che provo e non riesco non ci sarebbe un anima pia che mi darebbe una mano?

Un po vago....Messaggi di errore??

[GuidoX]

ciao hai ragione sono stato un po' vago, non inserisce i dati, e se li metto manualmente nel database,non li riconosce, ho controllato che il percorso del database sia corretto e lo era,
non devo fare una cosa complessa, un form che inserisce dati in access e li richiama in marquee tutto questo con l'asp!! facendo leggere gli ultimi 10 record!
Grazie per le risposte
Guido

[taringa]

Non hai letto l'articolo che ti avevo postato, comunque questo funziona perfettamente:

<form method="POST" action="inserisci.asp">
nome<input type="text"name="nomi" size="20"></p>
Messaggio<input type="text"name="messaggi" size="20"></p>
<input type="submit" value="Invia"name="x"></p>
</form>

e qui hai inserisci.asp

<%

dim a,b

a = request.form("nomi")
b = request.form("messaggi")

Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/mdb-database/prova.mdb")

Conn.Open strConn

sql = "SELECT * FROM mytable"

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3

'scrittura nuovo record

rs.addnew
rs(1) = a
rs(2) = b
rs.update

' Chiusura del database
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing

response.write "inserimento avvenuto"
%>

naturalmente cambia il nome del database e il path, la tabella del database si chiama mytable e i campi sono tre:

id (tipo contatore)
nomi (tipo test)
messaggi (tipo memo)

[GuidoX]

ciao si grazie mille ho letto l'articolo, e su quello mi sono basato, e poi con le modifiche che hai fatto e le tue spiegazioni mi sono rimesso dietro e ho rifatto tutto!!! ma mi dice impossibile visualizzare al pagina, il database si chiama mess, la tabella si chiama Messaggix,la tabella è composta da 3 campi, id,nome,messaggi creata in acces 2003
e uso web 2 expression, e non ne vuole nemmeno a piangere in cinese!!!

[Iron83]

Ciao Guido,

credo che il problema sia nel percorso del database, infatti Aruba ha la cartella mdb-database dove all'interno devi mettere tutti i database. prova a mettere il db direttamente in quella cartella e di inserire nel percorso del db all'interno del file ASP mdb-database/database.mdb

Facci sapere

[GuidoX]

ciao, si lo so che aruba ha quella cartella, ma web 2 che è il "successore di frontpage" utilizza quella cartella,comunque ho provato a metterlo nella cartella da te segnalata, ma mi da sempre l'errore, ho controllato i permessi e sono di lettura e scrittura quindi sono ok,
il perrco è corretto, possono essere delle impostazioni del sito?? come permessi quant'altro???? allora il codice modificato con i miei percorsi
FORM
<form method="POST" action="inserisci.asp">
nome<input type="text"name="nome" size="20"></p>
Messaggio<input type="text"name="messaggi" size="20"></p>
<input type="submit" value="Invia"name="x"></p>
</form>

'inserisci.asp
<%

dim a,b

a = request.form("nome")
b = request.form("messaggi")

Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath(../../fpdb/messaggi.mdb")

Conn.Open strConn

sql = "SELECT * FROM Messaggix"

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3

'scrittura nuovo record

rs.addnew
rs(1) = a
rs(2) = b
rs.update

' Chiusura del database
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing

response.write "inserimento avvenuto"
%>


lo so che è semplice, ma non me lo connette, per access 2003 la stinga di connessione va bene???

Grazie mille per la pazienza

[taringa]

Scusa guidox ma stai provando in locale o stai provando su server di aruba?

[GuidoX]

ciao su aruba.