Visualizzazione dei risultati da 1 a 2 su 2

Discussione: help script

  1. #1

    help script

    riporto il codice della pagina in questione, in locale funziona benissimo, online, mi da errore javascript...
    "Costante string senza terminazione"
    quale non so, perche' me lo dice alla riga 26, ossia il tag di apertura di asp...e in ogni caso non capisco cosa c'e' che non va nel codice...
    se qualcuno mi potesse dare una mano, magai qualche errore di sintassi non so....
    codice:
    <%
    ' zona riservata
    If Session("AccessoGarantito") = False Then
    	response.redirect("default.asp")
    End If
    %>
    
    
    <html>
    <head>
    <title><%=AdminPageTitle%></title>
    </head>
    <LINK REL="stylesheet" TYPE="text/css" HREF="/style/admin_stylesheet.css">
    <BODY leftmargin="10" rightmargin="10" bgcolor="<%=BgCol_1%>">
    <script language="javascript" type="text/javascript">
    function apri(url_foto,des_foto){
    	addr="/ita/fullsize.htm?"+url_foto+"&"+escape(des_foto)
    	alt=150
    	lar=150
    	rszb=(document.layers)?1:0;
    	props='height='+alt+',width='+lar+',top='+parseInt((screen.availHeight-alt)/2)+',left='+parseInt((screen.availWidth-lar)/2)+',scrollbars=0,resizable='+rszb+',toolbar=0,menubar=0,location=0,status=0';
    	window.open(addr,'_blank',props);
    }
    </script>
    <%
    id_offerta = request.querystring("id_offerta")
    %>
    [img]/images/adm_back.gif[/img]
    
    <hr size="1">
    <table width="100%" align="center" border="0" cellpadding="0" cellspacing="0">
    			<%
    			Conn.Open DbProdotti
    			Set rsCat = Server.CreateObject("ADODB.Recordset") 
    			rsCat.Open "SELECT * FROM categorie ORDER BY nome", Conn ,3,3
    			Do While Not rsCat.EOF
    				response.write ("<tr><td colspan='3' style class='trtitle'>")
    				response.write ("" & rsCat("nome") & "
    ")
    				response.write ("</td></tr>")
    				Set rsPro = Server.CreateObject("ADODB.Recordset") 
    				rsPro.Open "SELECT * FROM prodotti WHERE id_parent=" & rsCat("id") & " ORDER BY id", Conn ,3,3
    				Do While Not rsPro.EOF
    					response.write ("<tr><td align='left' class='trdiv'>")
    					response.write (rsPro("nome") & " </td>")
    					response.write ("<td class='trdiv'>( " & FormatNumber(rsPro("prezzo"),2) & " &euro;. )</td>")
    					response.write ("<td nowrap align='right' class='trdiv'>")
    					If rsPro("immagine") <> "" Then
    					%>
    					','<%=rsPro("nome")%>');return false;">[img]/images/adm_haveimg.gif[/img]
    					<%
    					End If
    					response.write ("[img]/images/adm_add.gif[/img] ")
    					response.write ("[img]/images/adm_addcpu.gif[/img] ")
    					response.write ("[img]/images/adm_addbundle.gif[/img] 
    ")
    					response.write ("</td></tr>")
    					rsPro.Movenext
    				Loop
    				rsPro.Close
    				Set rsPro = Nothing
    				rsCat.Movenext
    			Loop
    			rsCat.Close
    			Set rsCat = Nothing
    			Conn.Close
    			Set Conn = Nothing
    			%>
    </table>			
    </body>
    </html>

  2. #2
    Utente di HTML.it L'avatar di Xinod
    Registrato dal
    Sep 2000
    Messaggi
    13,649
    riprova con un titolo esplicativo
    (e posta l' output html, non è detto che tutti qui conoscano asp)
    ciao

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.