ciao,
ho questo script:
if ( oper = "INSERT") then
' Recupero paramentri
lingua = request("lingua")
id = request("id")
annuncio = request("annuncio")
requisiti = request("requisiti")
sede = request("sede")
data = request("data")
'Controllo dati passati da form
if (annuncio = "") then
Response.Redirect("messaggio.asp?cod=37&ind=I")
end if
if (requisiti = "") then
Response.Redirect("messaggio.asp?cod=38&ind=I")
end if
if (sede = "") then
Response.Redirect("messaggio.asp?cod=39&ind=I")
end if
' eseguo l'inserimento dell'annuncio job
strsql = "INSERT INTO job (data_ins, annuncio, requisiti, sede, lingua) VALUES ('" & data & "', '" & annuncio & "', '" & requisiti & "', '" & sede & "', '" & lingua & "')"
'lancio l'insert
set DBrec = Server.CreateObject("ADODB.Recordset")
DBrec.open strsql, Conn, , ,adCmdTable
CHIUDO QUI
Response.Redirect("messaggio.asp?cod=33&ind=H")
end if
if ( oper = "UPDATE") then
' Recupero paramentri
lingua = request("lingua")
id = request("id")
annuncio = request("annuncio")
requisiti = request("requisiti")
sede = request("sede")
data = request("data")
'Controllo dati passati da form
if (annuncio = "") then
Response.Redirect("messaggio.asp?cod=37&ind=I")
end if
if (requisiti = "") then
Response.Redirect("messaggio.asp?cod=38&ind=I")
end if
if (sede = "") then
Response.Redirect("messaggio.asp?cod=39&ind=I")
end if
' eseguo l'inserimento dell'annuncio job
strsql = "UPDATE job SET data_ins='" & data & "', annuncio='" & annuncio & "', requisiti='" & requisiti & "', sede='" & sede & "' WHERE lingua='" & lingua & "' AND id=" & id
response.write strsql
'lancio l' update
set DBrec = Server.CreateObject("ADODB.Recordset")
DBrec.open strsql, Conn, , ,adCmdTable
CHIUDO QUI
Response.Redirect("messaggio.asp?cod=35&ind=H&ind= I")
end if
come mai se chiudo il recordset con :
DBrec.close
e set DBrec=nothing, alla fine di ogni if, mi restituisce l' errore che il record è chiuso e non può effettuare l' operazione...come posso fare?
Esiste un modo per chiudere in automatico tutte le connessioni e recordset non neccessariamente dalla pagina che li apre...?
GRAZIE
Rispondi quotando
