Volevo porre due quesiti.
La pagina asp riportata accede ad un file mdb(access),
se i campi ID e ragione sociale sono pieni e il resto dei campi invece non lo sono,
non riesco a reperire nessun valore, in sostanza credo vada in errore, anche se in access
le proprietà sono correttamente impostate "richiesto=NO" "consenti lunghezza 0=SI", non essendo pratica in asp, volevo sapere se è normale un comportamento del genere.
Il secondo quesito, alla luce di quanto sopra, ho pensato di inserire questo controllo che ho preso girando in internet, ma non funziona, nel senso che mi da errore.... devo inserire il tipo di linguaggio? non so...help me! thank
**********************************
if len(trim(rstContacts("orariostr"))) > 0 then
Response.write "orariostr=" & Server.URLEncode(rstContacts("orariostr")) & "&"
**********************************
<%
Set DataConn = Server.CreateObject("ADODB.Connection")
DataConn.Open "Driver=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("dati.mdb")
tipo= Request("CIAMP")
Set cmdTemp = Server.CreateObject("ADODB.Command")
Set rstContacts = Server.CreateObject("ADODB.Recordset")
cmdTemp.CommandText = "Select * From puntvend WHERE id=" & tipo
cmdTemp.CommandType = 1
Set cmdTemp.ActiveConnection = DataConn
Response.write cmdTemp.CommandText
rstContacts.Open cmdTemp, , 1, 3
rstContacts.Move CLng(Request("Record"))
Response.write "loc=" & Server.URLEncode(rstContacts("loc")) & "&"
Response.write "indirizzo=" & Server.URLEncode(rstContacts("indirizzo")) & "&"
Response.write "ragsocintera=" & Server.URLEncode(rstContacts("ragsocintera")) & "&"
Response.write "citta=" & Server.URLEncode(rstContacts("citta")) & "&"
Response.write "cap=" & Server.URLEncode(rstContacts("cap")) & "&"
Response.write "telefono=" & Server.URLEncode(rstContacts("telefono")) & "&"
Response.write "responsabile=" & Server.URLEncode(rstContacts("responsabile")) & "&"
Response.write "email=" & Server.URLEncode(rstContacts("email")) & "&"
Response.write "messaggio=" & Server.URLEncode(rstContacts("messaggio")) & "&"
Response.write "orario1=" & Server.URLEncode(rstContacts("orario1")) & "&"
Response.write "orario2=" & Server.URLEncode(rstContacts("orario2")) & "&"
Response.write "orariostr=" & Server.URLEncode(rstContacts("orariostr")) & "&"
Response.write "done=" & "yes" & "&"
Response.write "TotalRecords=" & rstContacts.RecordCount
rstContacts.Close
DataConn.Close
%>


Rispondi quotando
