Request form e nuovo inserimento

**GI89** · 20-02-2013, 13:08

Buongiorno, ho una tabella di utenti con valori:
es.
nome, cognome , codicepromo, scadenza. Ed ho la necessità di cambiare scadenza per rigenerare il coupon, quindi una volta cliccato su un valore mi apre un'altra pagina con gli stessi dati, come se fosse una nuova registrazione.

Dovrei cambiare il codicepromo (che viene generato random) e ci riesco.

L'unica cosa che non riesco a fare è cambiare la scadenza, riesco solo ad affiancarla,ho 2 valori, nel senso che se nella tabella scadenza c'è 2/2/2013 quando vado a rigenerarla ho 2/2/2013,3/2/2013. Quindi il valore originale non viene sovrascritto come in codicepromo.

Ecco il codice, secondo voi come ne posso venire a capo?
[code] <%
code=Request.Form("code")
if code="" then response.end
set conn=Server.CreateObject("ADODB.Connection")
conn.provider="Microsoft.Jet.OLEDB.4.0"
conn.open(server.mappath("utenti.mdb"))
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * from promo where promo.

codice:

=" & code , conn
%>
<html>
<head></head><script language="javascript" type="text/javascript">
function randomString() {
	var chars = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXTZ";
	var string_length = 8;
	var randomstring = '';
	for (var i=0; i<string_length; i++) {
		var rnum = Math.floor(Math.random() * chars.length);
		randomstring += chars.substring(rnum,rnum+1);
	}
	document.randform.codice.value = randomstring;
}

</script>
<%
  sNewDate=""
  sDate = Now()
  sNewDate = DateAdd("d", 6, sDate)
  sMonthNext = Monthname(Month(sNewDate))
%>
<body>
<%
for each x in rs.Fields
     	if x.name <> "code" and x.name <> "dateadded" then
	%>    
<form method="POST" name="randform" action="reg.asp">
<input name="code" type="hidden" value="<%=code%>">
<table bgcolor="#b0c4de">

          	 <tr>
          	 <td><%=x.name%> </td>
             <td><input name="<%=x.name%>" value="<%=x.value%>" size="20">  </td></tr>     
                 
<%end if
next
rs.close
conn.close
%>
<input id="scadenza" name="scadenza" type="text" value="<%=sNewDate%>"placeholder="<%=sNewDate%>" />

<tr><td><input type="submit" value="INVIA" onClick="randomString();"/></td></tr>

</form>

</table>

**Vincent.Zeno** · 20-02-2013, 14:01

Originariamente inviato da GI89
L'unica cosa che non riesco a fare è cambiare la scadenza, riesco solo ad affiancarla,ho 2 valori, nel senso che se nella tabella scadenza c'è 2/2/2013 quando vado a rigenerarla ho 2/2/2013,3/2/2013.

direi che passi due volte il valore.
controlla bene cosa scrivi nell'html:
sicuramente hai due input name="scadenza"

**GI89** · 20-02-2013, 14:06

Originariamente inviato da Vincent.Zeno
direi che passi due volte il valore.
controlla bene cosa scrivi nell'html:
sicuramente hai due input name="scadenza"

Ciao Vincent infatti è così, ho dimenticato di dire che la data si deve aggiornare in automatico come succede nel campo codice (visto che il valore viene cambiato al submit).

Ecco magari la soluzione sta proprio qui, usare la stessa funzione di codice in scadenza, solo che non saprei come convertire questo:

codice:

<%
  sNewDate=""
  sDate = Now()
  sNewDate = DateAdd("d", 6, sDate)
  sMonthNext = Monthname(Month(sNewDate))
%>

in funzione

**Vincent.Zeno** · 20-02-2013, 14:17

no, la soluzione è NON passare due volte lo stesse valore

quindi diversificarli (per esempio con name="NuovaScadenza") e fare l'update con questo

edit,
oppure, dal ciclo, non stampare scadenza come input

**GI89** · 20-02-2013, 14:41

E' quello che voglio fare fin dall'inizio, ma ho bisogno che il campo scadenza sia sovrascritto con quello nuovo.

Modificandolo a mano funzionerebbe, ma in automatico?

**Vincent.Zeno** · 20-02-2013, 14:58

non capisco perché " for each x in rs.Fields stampi un form "

(mi sembra tutto un po' confuso o sbaglio?)

comunque potresti:

codice:

if x.name = "scadenza" Then
response.write x.value
else
response.write "<input name="""&x.name&""" value="""&x.value&""" size=""20"">"
end if

così eviti di avere due input scadenza

**GI89** · 21-02-2013, 12:35

Così mi dà i campi vuoti, comunque sia anche cambiando qualcosa non riesco a fare il replace del campo scadenza con la nuova data

**Vincent.Zeno** · 21-02-2013, 14:05

"così" come? fai vedere cosa hai scritto

**supergeniux** · 21-02-2013, 14:32

mostra il codice della pagina reg.asp

**GI89** · 26-02-2013, 13:59

Allora il codice era giusto, le tabelle nel database erano sbagliate, in ogni caso cambiando qualche riga l'ho riutilizzato per fare l'update in questo modo:

prima pagina:
[code] <%
code=Request.Form("code")
if code="" then response.end
set conn=Server.CreateObject("ADODB.Connection")
conn.provider="Microsoft.Jet.OLEDB.4.0"
conn.open(server.mappath("utenti.mdb"))
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select code,utilizzato from promo where promo.

codice:

=" & code , conn
%>

<form method="post" action="secondapagina.asp" target="_blank" value="Submit"/>
<input type="hidden" value="<%=code%>">
<table align="center">
<%
for each x in rs.Fields
     	if x.name <> "code" and x.name <> "dateadded" then%>
          	 <tr>
          	 <td><font size="3"><%=x.name%> </font></td>
          	 <td><input name="utilizzato" value="Si" size="20"readonly  /></td>
<%end if
next
rs.close
conn.close
%>
</tr>
</table>


<input type="submit" name="action" value="invio" >
</form>

seconda pagina

codice:

<%
set conn=Server.CreateObject("ADODB.Connection") 
conn.provider="Microsoft.Jet.OLEDB.4.0"
conn.open(server.mappath("utenti.mdb"))

if Request.form("action")="invio" then
     	code=Request.Form("code")
     	        sql="UPDATE promo SET utilizzato='" & Request.Form("utilizzato")&"' WHERE code='"& code & "' "

	conn.Execute sql, Recordsaffected
	if err <> 0 then
	 Response.Write(" non può essere aggiornato")
	else	
	 Response.Write(" & code & " &egrave; stato aggiornato")
	end if	
end if
conn.close%>

Mi da errore :
Data type mismatch in criteria expression.

/tupeppelista/c.asp, line 15

Se cambio gli apici in WHERE code=" &code& "'" mi da sempre un errore:
Syntax error in string in query expression 'code=''.

Discussione: Request form e nuovo inserimento

Strumenti discussione

Ricerca discussione

Visualizza

Request form e nuovo inserimento

Re: Request form e nuovo inserimento

Re: Re: Request form e nuovo inserimento

Permessi di invio