Scusate
ma non riesco a risolvere questo problema
ho un db con una tabella News
News
Id(contatore)
News(memo)
data(data)
InBy(testo)
devo modificare il campo news
<%
if session("admin")="true" then
else
response.redirect("msg.asp?tempo=3000&msg1=Non puoi entrare in questa sezione senza esserti autenticato.&redirect=index.asp")
end if
%>
<%
dim idb,StrOutput
idb=request("ida")
stroutput="Errore interno."
dim strCodedb
strCodedb="***"
if idb<>"" then
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("***.mdb")
strConn=strConn & ";pwd=" & strCodedb
Conn.Open (strConn)
strSql = "SELECT * FROM News WHERE id="&idb
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSql,conn ,3,3
rs(1)= request.form("testo")
rs.update
strOutput ="Memorizzazione effettuata con successo"
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
end if
response.redirect("msg.asp?tempo=2000&msg1="&strOu tput&"&redirect1=ed_de.asp")
%>
mi dà questo errore su la riga 26 quella rs(1)=
Informazioni tecniche (per il personale del supporto tecnico)
Tipo di errore:
ADODB.Recordset (0x800A0BCD)
Il record corrente corrisponde all'inizio o alla fine del file oppure è stato eliminato. Per eseguire l'operazione richiesta è necessario disporre di un record corrente.
/poseidon76/edit2.asp, line 26
Tipo di browser:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)
Pagina:
POST 22 bytes to /poseidon76/edit2.asp
POST Data:
testo=rasfasf&B1=Invia
Ora:
venerdì 27 agosto 2004, 19.32.19
Informazioni aggiuntive:
Supporto Microsoft
cmq query string c'è
http://localhost/edit2.asp?ida=1
aiutatemi
grazie in anticipo
Rispondi quotando
