Grazie Optime, sulla riga rossa restituisce:Originariamente inviato da optime
quale riga?Error Type:
Microsoft VBScript compilation (0x800A0400)
Expected statementcodice:Set objRs = Server.CreateObject("ADODB.Recordset") strSQL = "Select * from Tab where ... " objRs.Open strSql, cn, 3, 3 If Not objRs.EOF Then eseguito = objRs("eseguito") Response.Write "<TR><TD ALIGN='CENTER' CLASS='MARGIN' WIDTH=70>"&I&"" _ &"</TD><TD WIDTH='90' CLASS='MARGIN'>" &aMessageMOD4(I) &"</TD><TD WIDTH='90' CLASS='MARGIN'>" &aMessageMOD3(I) &"</TD><TD WIDTH='90' CLASS='MARGIN'>" &aMessageMOD2(I) &"</TD><TD WIDTH='90' CLASS='MARGIN'>" &aMessageMOD5(I) &"</TD><TD WIDTH='500' CLASS='MARGIN'>" &aMessages(I) _ &"</TD><TD WIDTH='300' CLASS='MARGIN'>" &aMessageContentSplit(I)&"</TD><TD WIDTH='300' CLASS='MARGIN'>" &aMessageMOD6(I)&"</TD><TD WIDTH=150 CLASS='MARGIN'><a href='pagina.asp?iduoat="&iduoat&"&code=1&time=" &I &"" &"&date=" _ &dtDate &"'>[img]./images/modify.gif[/img]</a>" &"<a href='pagina.asp?iduoat="&iduoat&"&code=2&time=" &I &"" &"&date=" &dtDate _ &"'>[img]./images/delete.gif[/img]</a>" &"<a href='pagina.asp?uoat="&aMessageMOD4(I)&"&imp="&aMessageMOD5(I)&"&odm="&odm _ if eseguito = false then &"'>[img]./img/img1.gif[/img]</a>"</TD></TR> else &"'>[img]./img/img2.gif[/img]</a>"</TD></TR> end if end if

Rispondi quotando