MODIFICA AL VOLO DI UN DB

**serpiko** · 10-04-2006, 11:58

Salve a tutti! ho questo problema: qui sotto vi posto il codice della pagina tramite cui inserisco un nuovo record nel db. il mio problema è che vorrei, con la stessa pagina, modificare il record! potete aiutarmi???
ecco qui il codice:
_________________________________________
<html>
<head>

<script language="Javascript">

function preview1(){
if (form.titolo1.value == ""){
div1.innerHTML = "<p align=center>

Inserisci il nome del prodotto!!!

<input type=text name=editor1 size=20 maxlength=255 onchange=titolo1change()>
inserisci una descrizione</p>"}
else{
div1.innerHTML = ""+ form.titolo1.value + ""+ "

" + form.editor1.value + "

" + form.pimghome.value + "

" + form.imgprima.value + "[/b]

" + form.imgseconda.value+ "[/b]

" + form.imgterza.value}
}

function name1change(){
form.titolo1.value = form.editor1.value
}
</script>
</head>

<%
if Session("Autenticato") <>"OK" then
Response.Redirect("errore.asp")
end if
%>
<body bgcolor="#FFFFFF">

<%
Dim editor1
dim pcat1
dim titolo1
dim titoletto
dim pimghome
dim imgterza
dim imgseconda
dim imgprima
dim pdimg1
dim pdimg2
dim pdimg3
dim date1
dim firma1
inputnum = request.querystring("inputnum")
If IsEmpty(inputnum) or inputnum = "" then

%>
<form action="submit31.asp?inputnum=1" method="POST" name="form" id="form">
<div align="center">
<center>

<table border="1" cellpadding="0" cellspacing="0" width="80%" height="48" bordercolor="#000000" bgcolor="#CCCCCC">
<tr bgcolor="#FFFFFF">
<td width="56%">
<table width="80%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#CCCCCC"><font face="Verdana" size="2"> <font color="#FF3300">categoria</font></font></td>
<td><font face="Verdana" size="2">

<select name="pcat1" id="pcat1" size="1">
</select>

</font></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"><font face="Verdana" size="2"> <font color="#FF3300">titolo</font></font></td>
<td><font face="Verdana" size="2">
<textarea name="titolo1" cols="47" rows="8"></textarea>
</font></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"><font face="Verdana" size="2"><font color="#FF3300">titoletto</font></font></td>
<td><font face="Verdana" size="2">
<textarea name="titoletto" cols="47" rows="8"> </textarea>
</font></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td colspan="2"><table width="50%" border="0" cellspacing="0" cellpadding="0">
</table></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">testo
dell'articolo </font></td>
<td><font size="1" face="Verdana">
<a name="top"></a>

</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr bgcolor="#CCCCCC">
<td colspan="2"> <div align="center"><font size="1"><a href="thumbs/default.asp" target="_blank">AGGIUNGI
IMMAGINE</a></font></div></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">Immagine
che comparirà solo nella homepage sulla colonna di destra

<font size="1">(publics/jpg/nomefoto.jpg)</font></font></td>
<td valign="top"> <input name="pimghome" type="text" value="publics/jpg/bianco.jpg" size="38" maxlength="255">
</td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">Immagine
1

<font size="1">(publics/jpg/nomefoto.jpg)</font></font></td>
<td> <input name="imgprima" type="text" value="publics/jpg/bianco.jpg" size="38" maxlength="255"></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">Didascalia
1 </font></td>
<td bgcolor="#CCCCCC"><font size="2" face="Verdana">
<textarea rows="8" name="pdimg1" cols="47" style="border-style: solid; border-width: 2"> </textarea>
</font></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">immagine
2

<font size="1">(</font><font color="#FF3300" size="2" face="Verdana"><font size="1">publics/</font></font><font size="1">jpg/nomefoto.jpg)</font></font></td>
<td> <input name="imgseconda" type="text" value="publics/jpg/bianco.jpg" size="38" maxlength="255">
</td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">Didascalia
2 </font></td>
<td bgcolor="#CCCCCC"><font size="2" face="Verdana">
<textarea rows="8" name="pdimg2" cols="47" style="border-style: solid; border-width: 2"> </textarea>
</font><font face="Verdana"></font> </td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">immagine
3

<font size="1">(</font><font color="#FF3300" size="2" face="Verdana"><font size="1">publics/</font></font><font size="1">jpg/nomefoto.jpg)</font></font></td>
<td> <input name="imgterza" type="text" value="publics/jpg/bianco.jpg" size="38" maxlength="255">
</td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">Didascalia
3 </font></td>
<td bgcolor="#CCCCCC"><font size="2" face="Verdana">
<textarea rows="8" name="pdimg3" cols="47" style="border-style: solid; border-width: 2"> </textarea>
<font color="#FF0000" size="1"></font> </font></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">firma</font></td>
<td> <input type="text" name="firma1" size="38" maxlength="255"></td>
</tr>
<tr>
<td colspan="2"><hr color="#6699cc"></td>
</tr>
<tr>
<td height="27" bgcolor="#CCCCCC"> <font color="#FF3300" size="2" face="Verdana">data</font></td>
<td> <input type="text" name="date1" value="<% =date() &" "&time()%>" size="40">
</td>
</tr>
</table>
<p align="center"><font face="Verdana" size="2">
ANTEPRIMA

</font></p>
<div align="center">
<center>
<table border="1" cellpadding="3" cellspacing="0" width="70%" bordercolor="#000000" bgcolor="#CCCCCC">
<tr>
<td align="left" bgcolor="#ffcf0f">
<div id="div1" style="width: 715; height: 221">
<font color="#000000"></font></div>
</td>
</tr>
</table>
</center></div>
<p align="center"><font size="2">

<font color="006077" face="Verdana, Arial, Helvetica, sans-serif">Clicca sul
bottone "PUBBLICA" per pubblicare l'offerta o

clicca qui per tornare all'inizio della pagina.</font>

<input type="submit" value="PUBBLICA" name="B1"> </font></p>
</form>
<% else
date1 = Now()
pimg3 = request.form("imgterza")
pcat = request.form("pcat1")
ptitolo = request.form("titolo1")
titoletto = request.form("titoletto")
pdate = request.form("date1")
' Modifica Gioacchino
'pentry1 = request.form("Entry1")
pentry1 = request.form("Editor1")
firma = request.form("firma1")
pimg2 = request.form("imgseconda")
pimghome = request.form("pimghome")
pimg1 = request.form("imgprima")
pdimg1 = request.form("pdimg1")
pdimg2 = request.form("pdimg2")
pdimg3 = request.form("pdimg3")
pimg3 = Replace(request.form("imgterza"), "'", "''")
pcat = replace(request.form("pcat1"), "'", "''")
ptitolo = replace(request.form("titolo1"), "'", "''")
titoletto = replace(request.form("titoletto"), "'", "''")
pdate = request.form("date1")
' Modifiche Gioacchino
'pentry1 = Replace(Request.Form("Entry1"), "'", "''")
pentry1 = Replace(Request.Form("Editor1"), "'", "''")
firma = Replace(Request.Form("firma1"), "'", "''")
pimghome = Replace(Request.Form("pimghome"), "'", "''")
pimg2 = Replace(Request.Form("imgseconda"), "'", "''")
pimg1 = Replace(request.form("imgprima"), "'", "''")
pdimg1 = Replace(request.form("pdimg1"), "'", "''")
pdimg2 = Replace(request.form("pdimg2"), "'", "''")
pdimg3 = Replace(request.form("pdimg3"), "'", "''")
'response.write(pentry1)
'response.end
set conn = server.createobject("adodb.connection")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("cartella/db.mdb")
conn.Open DSNtemp
SQLstmt = "INSERT INTO giornale (pimg3,pcat,ptitolo,titoletto,pdate,pentry,pimghom e,pimg2,pdimg1,pdimg2,pdimg3,firma,pimg1)"
SQLstmt = SQLstmt & " VALUES ("
SQLstmt = SQLstmt & "'" & pimg3 & "',"
SQLstmt = SQLstmt & "'" & pcat & "',"
SQLstmt = SQLstmt & "'" & ptitolo & "',"
SQLstmt = SQLstmt & "'" & titoletto & "',"
SQLstmt = SQLstmt & "'" & pdate & "',"
SQLstmt = SQLstmt & "'" & pentry1 & "',"
SQLstmt = SQLstmt & "'" & pimghome & "',"
SQLstmt = SQLstmt & "'" & pimg2 & "',"
SQLstmt = SQLstmt & "'" & pdimg1 & "',"
SQLstmt = SQLstmt & "'" & pdimg2 & "',"
SQLstmt = SQLstmt & "'" & pdimg3 & "',"
SQLstmt = SQLstmt & "'" & firma & "',"
SQLstmt = SQLstmt & "'" & pimg1 & "'"
SQLstmt = SQLstmt & ")"
Set RS = conn.execute(SQLstmt)
%>

</p>

</p>

</p>
<p align="center">
<font color="006077" size="3" face="Verdana, Arial, Helvetica, sans-serif">la
notizia prodotto è on line</font> <%end if%> </p>
<div align="center">
</div>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr><td width="477" height="19" align="center" valign="middle"><font face="Verdana" size="2" color="#FFFFFF">
<font face="Verdana" size="2" color="#FFFFFF">
<a href="javascript:window.close();" title="Chiudi">
<font face="Arial, Helvetica, sans-serif">Chiudi</font></a></font></font></td>
</tr>
</table>
</body>
</html>

**santino83** · 10-04-2006, 16:42

usa piu pagina una per operazione che devi fare nel database...

**optime** · 10-04-2006, 16:51

curiosità

che vuol dire modificare 'al volo'?

**serpiko** · 10-04-2006, 16:55

si forse mi sono espresso male... al volo intendo modificare il record senza aprire il db access... ma on line...

scusami santino83 ma non ho capito forse volevi intendere che devo utilizzare più di una pagina?

**santino83** · 10-04-2006, 17:14

senza prire il db access vuol dire fare l'update via codice no?

cmq si intendevo "usa piu pagine" in maniera da non tirar fuori un papocchio di roba come quella che hai postato...

**serpiko** · 13-04-2006, 12:02

ok mi sono portato avanti con il lavoro e prendendo spunto da un esempio mi sono incasinato a questo punto... cioè non mi effettua la modifica... posto qui sotto il codice della pagina che dovrebbe effettuare la doficia... ditemi un pò se secondo voi c'è qualche errore di sintassi:
__________________________

<%
cod=request.querystring("cod")
pimg3 = request.form("imgterza")
pcat = request.form("pcat1")
ptitolo = request.form("titolo1")
titoletto = request.form("titoletto")
pdate = request.form("date1")
pentry1 = request.form("Editor1")
firma = request.form("firma1")
pimg2 = request.form("imgseconda")
pimghome = request.form("pimghome")
pimg1 = request.form("imgprima")
pdimg1 = request.form("pdimg1")
pdimg2 = request.form("pdimg2")
pdimg3 = request.form("pdimg3")

pimg3 = Replace(request.form("imgterza"), "'", "''")
pcat = replace(request.form("pcat1"), "'", "''")
ptitolo = replace(request.form("titolo1"), "'", "''")
titoletto = replace(request.form("titoletto"), "'", "''")
pdate = request.form("date1")

pentry1 = Replace(Request.Form("Editor1"), "'", "''")
firma = Replace(Request.Form("firma1"), "'", "''")
pimghome = Replace(Request.Form("pimghome"), "'", "''")
pimg2 = Replace(Request.Form("imgseconda"), "'", "''")
pimg1 = Replace(request.form("imgprima"), "'", "''")
pdimg1 = Replace(request.form("pdimg1"), "'", "''")
pdimg2 = Replace(request.form("pdimg2"), "'", "''")
pdimg3 = Replace(request.form("pdimg3"), "'", "''")
SQL="UPDATE giornale set pcat1='"&pcat&"' ,titolo1='"&ptitolo&"' ,titoletto='"&titoletto&"' pentry1='"&Editor1&"' ,pimghome='"&pimghome&"' ,imgprima='"&pimg1&"' ,pdimg1='"&pdimg1&"' ,imgseconda='"&pimg2&"' ,pdimg2='"&pdimg2&"' ,imgterza='"&pimg3&"' ,pdimg3='"&pdimg3&"' ,firma1='"&firma&"',date1='"&pdate&"' WHERE id="&cod
Conn.Execute(SQL)
Response.Redirect "index.asp"
%>

l'errore che mi da è questo:
Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query testotesto testo' pentry1='''.
edit-process.asp, line 37

**santino83** · 13-04-2006, 12:06

allora,

intanto usa i tag code per postare il codice che si capisce di piu, e poi una cosa:

1) in che senso non fa l'update? non da errore o da errore?

2) date1 è un campo testo o data? se è un campo data devi fare date1=#valore#

3)prima di conn.execute(sql) metti:

codice:

response.write sql
response.end()

e vediamo cosa ti stampa

**santino83** · 13-04-2006, 12:06

prima di pentry1 manca la virgola di separazione

**serpiko** · 13-04-2006, 12:19

Originariamente inviato da santino83
allora,

intanto usa i tag code per postare il codice che si capisce di piu, e poi una cosa: NON CAPISCO QUALI TAG???

1) in che senso non fa l'update? non da errore o da errore?DA ERRORE ED E' QUESTO: "Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query testotesto testo' pentry1='''.
edit-process.asp, line 37"
2) date1 è un campo testo o data? se è un campo data devi fare date1=#valore# e' un date now ()

3)prima di conn.execute(sql) metti:

codice:

response.write sql
response.end()

e vediamo cosa ti stampa

**serpiko** · 13-04-2006, 12:22

ho messo ciome mi hai consigliato:
response.write sql
response.end()
e mi stampa l'errore che ti ho riportato sopra e ho notato che mi riporta il contenuto del db tranne il campo pentry1 che mi riporta così: pentry1='' ,

Discussione: MODIFICA AL VOLO DI UN DB

Strumenti discussione

Ricerca discussione

Visualizza

MODIFICA AL VOLO DI UN DB

Permessi di invio