Collegare connessione ODBC con Dramweaver

**Ramsesdea** · 17-08-2006, 10:36

Ciao a tutti.
Devo creare una semplice connesione ODBC creata in access fatta da una colonna Nome e una Commento in una pagine dinamica ASP VBScript

Proste spiegarmi cortesemente i passaggi da seguire per far in modo di inviare tramite questa pagina dei commenti.

Più che altro mi serve collegare il Database creato con la pagina ASP

**michele.santoro** · 17-08-2006, 12:15

Vedi se questa può andare.
Devi realizzare una pagina di invio dati tipo questa:

codice:

<html>
<head>
<title>aggiungi record</title>
</head>


<font style="font-size: 4pt">
<body bgcolor="#FFFFFF" topmargin="5">
</font></p>
<div align="center">
<center>
<form method="POST" action="invio.asp">
<table border="1" cellpadding="4" width="47%" bgcolor="#83A6D2" cellspacing="0" height="46" bordercolor="#FFFFFF" style="border-collapse: collapse">
<tr>
<td width="92%" bgcolor="#83A6D2" height="46" align="center" bordercolor="#83A6D2">
<p align="center"><font face="Verdana" color="#FFFFFF">Inserisci un commento</font></td>
</tr>
<center>
<center>
</table>

<table border="0" width="47%" id="table1" bgcolor="#E7EDF5">
	<tr>
		<td><font face="Verdana" size="2" color="#000080">

		

		Nome </font></td>
		<td>
<input name="nome" maxlength="254" size="37"></td>
	</tr>
	<tr>
		<td><font face="Verdana" size="2" color="#000080">Commento</font></td>
		<td>
<textarea rows="7" name="Commento" cols="42"></textarea></td>
	</tr>
	<tr>
		<td colspan="2" align="center"><font size="1">

		</font><input type="submit" name="Submit" value="Aggiungi"></td>
	</tr>
</table>
</body>
</html>

Con questa pagina invii con il metodo post i dati inseriti nei form ad una pagina asp di nome invio.asp. La pagina invio.asp recupara i dati e li invia al database naturalmente dopo aver fatto la connessione.
Pagina invio.asp

codice:

<%
' Connessione database
Set conn = Server.CreateObject("ADODB.Connection")
dsnpath = "DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)}; "
dsnpath = dsnpath & "DBQ=" & Server.MapPath("/mdb-database/tuo_database.mdb")
conn.open dsnpath
%>



<%
nome=Request.Form("nome") 'recupero quello che è stato inserito nel form nome
nome= replace(nome, "'", "''") 
Commento=Request.Form("Commento") 'recupero quello che è stato inserito nel form  commento
Commento= replace(Commento, "'", "''")
SQL = "INSERT INTO Tua_tabella (nome,Commento)"
SQL = SQL&"VALUES('"&nome&"','"&Commento&"')"
Conn.Execute(SQL)
Response.Redirect "pagina dove vuoi venire reindirizzato dopo aver inserito i dati.asp"
%>

Una volta recuperati i dati presenti nei form li invio al database (INSERT INTO)

Spero di non aver capito male e che sia questo quello che volevi

**Ramsesdea** · 18-08-2006, 09:12

Ciao Michele e come prima cosa grazie per avermi risposto.

Allora ho fatto questo:

Ho creato la pagina invio_dati così

<%@LANGUAGE="VBSCRIPT"%>
<html>
<head>
<title>aggiungi record</title>
</head>

<font style="font-size: 4pt">
<body bgcolor="#FFFFFF" topmargin="5">
</font></p>
<div align="center">
<center>
<form method="POST" action="invio.asp">
<table border="1" cellpadding="4" width="47%" bgcolor="#83A6D2" cellspacing="0" height="46" bordercolor="#FFFFFF" style="border-collapse: collapse">
<tr>
<td width="92%" bgcolor="#83A6D2" height="46" align="center" bordercolor="#83A6D2">
<p align="center"><font face="Verdana" color="#FFFFFF">Inserisci un commento</font></td>
</tr>
<center>
<center>
</table>

<table border="0" width="47%" id="table1" bgcolor="#E7EDF5">
<tr>
<td><font face="Verdana" size="2" color="#000080">

Nome </font></td>
<td>
<input name="nome" maxlength="254" size="37"></td>
</tr>
<tr>
<td><font face="Verdana" size="2" color="#000080">Commento</font></td>
<td>
<textarea rows="7" name="Commento" cols="42"></textarea></td>
</tr>
<tr>
<td colspan="2" align="center"><font size="1">

</font><input type="submit" name="Submit" value="Aggiungi"></td>
</tr>
</table>
</body>
</html>

e mi viene proposta una bellissima tabella come volevo io

Ho creato poi la pagina invio.asp, creando la connessione tramite ->Database -> DNS (Data Source Name) e provandolo è ok. Allora ho creato il codice in questo modo

<%@LANGUAGE="VBSCRIPT"%>
<html>
<head>
<title>Documento senza titolo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>

<%
' Connessione database
Set conn = Server.CreateObject("ADODB.Connection")
dsnpath = "DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)}; "
dsnpath = dsnpath & "DBQ=" & Server.MapPath("/mdb-database/commenti.mdb")
conn.open dsnpath
%>

<%
nome=Request.Form("nome") 'recupero quello che è stato inserito nel form nome
nome= replace(nome, "'", "''")
Commento=Request.Form("Commento") 'recupero quello che è stato inserito nel form commento
Commento= replace(Commento, "'", "''")
SQL = "INSERT INTO commento (nome,Commento)"
SQL = SQL&"VALUES('"&nome&"','"&Commento&"')"
Conn.Execute(SQL)
Response.Redirect "grazie.asp"
%>

</body>
</html>

Il mio db fatto in access si chiama commenti.db e la tabella creata si chiama commento. Dopo l'inserimento del commento rimando a una pagina di grazie.asp

Provo la pagina invio_dati e quando invio il commento, mi viene restituito questo errore

Impossibile visualizzare la pagina
Si è verificato un problema a livello della pagina che si desidera visualizzare che ne impedisce la visualizzazione.

--------------------------------------------------------------------------------

Please try the following:

Fare clic sul pulsante Aggiorna o riprovare più tardi.

Aprire la localhost home page e cercare i collegamenti alle informazioni desiderate.
HTTP 500.100 - Errore interno del server - errore ASP
Internet Information Services

--------------------------------------------------------------------------------

Informazioni tecniche (per il personale del supporto tecnico)

Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Driver ODBC Microsoft Access]Errore generale. Impossibile aprire la chiave 'Temporary (volatile) Jet DSN for process 0x71c Thread 0xa78 DBC 0x15e1024 Jet' del Registro di sistema.
/appo/invio.asp, line 15

Tipo di browser:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; .NET CLR 2.0.50727; InfoPath.1)

Pagina:
POST 33 bytes to /appo/invio.asp

POST Data:
nome=f&Commento=f&Submit=Aggiungi

Ora:
venerdì 18 agosto 2006, 9.13.46

Informazioni aggiuntive:
Supporto Microsoft

A questo punto ho detto..... micheleeeeeeeeeeeeeeeeeeeee aiutoooooooooooooooooooooo

Grazie mille anticipatamente

**Ramsesdea** · 18-08-2006, 09:34

Scusa correggo una cosa.

La pagina di invio.asp non è questa

<%@LANGUAGE="VBSCRIPT"%>
<html>
<head>
<title>Documento senza titolo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>

<%
' Connessione database
Set conn = Server.CreateObject("ADODB.Connection")
dsnpath = "DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)}; "
dsnpath = dsnpath & "DBQ=" & Server.MapPath("/mdb-database/commenti.mdb")
conn.open dsnpath
%>

<%
nome=Request.Form("nome") 'recupero quello che è stato inserito nel form nome
nome= replace(nome, "'", "''")
Commento=Request.Form("Commento") 'recupero quello che è stato inserito nel form commento
Commento= replace(Commento, "'", "''")
SQL = "INSERT INTO commento (nome,Commento)"
SQL = SQL&"VALUES('"&nome&"','"&Commento&"')"
Conn.Execute(SQL)
Response.Redirect "grazie.asp"
%>

</body>
</html>

ma questa

<%
' Connessione database
Set conn = Server.CreateObject("ADODB.Connection")
dsnpath = "DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)}; "
dsnpath = dsnpath & "DBQ=" & Server.MapPath("/mdb-database/commenti.mdb")
conn.open dsnpath
%>

<%
nome=Request.Form("nome") 'recupero quello che è stato inserito nel form nome
nome= replace(nome, "'", "''")
Commento=Request.Form("Commento") 'recupero quello che è stato inserito nel form commento
Commento= replace(Commento, "'", "''")
SQL = "INSERT INTO commento (nome,Commento)"
SQL = SQL&"VALUES('"&nome&"','"&Commento&"')"
Conn.Execute(SQL)
Response.Redirect "grazie.asp"
%>

**michele.santoro** · 18-08-2006, 10:29

Presumo che la cartella in cui si trova il database non ha i permessi in scrittura.
Ma la stai provando in locale o online?
Perché se la stai provando online devi farti ridare i permessi dal tuo Provider.
Se invece la stai provando in locale devi darglieli tu i permessi in scrittura.

**Ramsesdea** · 18-08-2006, 11:19

Ciao Michele, hi impostato i permessi di scrittura sulla cartella nell'area condivisione Web e adesso in Locale funziona perfettamente

Qunado pubblico sul sito , non visualizzo i commenti e non me li fa inserire.

Il sito è su libero creato tra i siti personali. Come posso chiedere di abilitarmi in scrittura la cartella per eseguire la funzione?

**michele.santoro** · 18-08-2006, 11:58

Ma il tuo spazio web non supporta asp!
Cito quanto riportato da Libero:
"Per la costruzione del proprio sito, la Community basa i suoi servizi su server UNIX e quindi non è possibile usare tecnologie tipo ASP tipiche dei server NT, nè è possibile usare le estensioni di Front Page o CGI."
Quindi non puoi utilizzare script asp.

**Ramsesdea** · 18-08-2006, 12:00

Non l'avevo mai letto.........

Ne conosci uno che le supporta?

Cmq grazie infinite dell'aiuto dato sei molto gentile

**viki1967** · 18-08-2006, 12:07

Hosting free che supporta ASP + access con 100 mb di spazio disponibile:

http://www.asphost4free.com/

**Ramsesdea** · 18-08-2006, 12:43

Grazie mille lo provo e ti faccio sapere come è andata

Discussione: Collegare connessione ODBC con Dramweaver

Strumenti discussione

Ricerca discussione

Visualizza

Collegare connessione ODBC con Dramweaver

Permessi di invio