Visualizzazione dei risultati da 1 a 6 su 6

Discussione: Problemi con INCLUDE

  1. #1

    Problemi con INCLUDE

    Salve, scrivo perchè ho un problema con una pagina in ASP del mio sito (http://www.gemonahomepage.it/avvenim...?idprodotto=92) che presenta due file inclusi, uno per l'intestazione (head_hp_N.htm) ed uno per il piè di pagina (foot_pag_N.htm). Come potete vedere dal link, al caricamento della pagina viene restituito un errore che mette in dubbio l'esattezza di una tabella del database. Ora, premesso che non sono per nulla un esperto e che mi sto barcamenando col codice, io penso che l'errore non sia quello, infatti se metto online la stessa pagina ma senza l'inclusione () il problema non si presenta e non sussiste nemmeno nella vecchia pagina (http://www.gemonahomepage.it/eventi.asp?idprodotto=92) in cui un file incluso per l'intestazione c'era seppur diverso.
    Non posso pensare nemmeno che il problema stia nel file incluso (head_hp_N.htm) in quanto nelle altre pagine viene incluso senza problemi (più sotto trovate il codice anche di quest'ultima).
    Spero che qualcuno voglia molto pazientemente e gentilmente darmi una mano!
    Grazie

    Qui sotto inserisco il codice della pagina "avvenimenti_nel_gemonese.asp":
    ------------------------------
    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">


    <title>
    AVVENIMENTI NEL GEMONESE
    </title>

    <META NAME="description"
    CONTENT="EVENTI in FRIULI VENEZIA GIULIA">

    <META NAME="keywords"
    CONTENT="Eventi Manifestazioni Incontri Mostre Avvenimenti Festeggiamenti Sagre Feste Musei Convegni Rassegne Spettacoli Cinema Teatri Concerti Esposizioni Gemona Venzone Moggio Bordano Trasaghis Osoppo Forgaria Buia Buja Majano Artegna Montenars Festa della Zucca Festa del Maiale Festa delle Castagne Festa del Formaggio Agosto Medievale Feste autunnali">

    <meta name="category"
    content="eventi, turismo, infomazioni">

    <META name=revisit-after
    content="2 day">

    <META HTTP-EQUIV="Content-Language"
    CONTENT="IT">

    <META NAME=author
    CONTENT="Emiliano Rossi, NEXT01 srl">

    <meta name="Copyright"
    content="Emiliano Rossi">

    <meta name="Doc-rights"
    content="Copywritten Work">

    <META NAME="ROBOTS"
    CONTENT="ALL">

    <script language="JavaScript" type="text/JavaScript">
    <!--

    function MM_preloadImages() { //v3.0
    var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
    }
    //-->
    </script>
    <link href="ghp.css" rel="stylesheet" type="text/css">

    <%

    sub ScriviRisultato()
    dim idprodotto
    idprodotto = Request("idprodotto")
    dim cn, rs, strSQL

    set cn = Server.CreateObject("Adodb.Connection")
    cn.Open strConnect
    set rs = Server.CreateObject("Adodb.Recordset")

    strSQL = "SELECT * FROM T_prodotti where idprodotto =" & IDprodotto
    rs.Open strSQL, cn
    %>

    <table width="100%" cellspacing="0" cellpadding="0" border="0" width="100%" >
    <tr>
    <td align="center">

    <%
    if Rs.EOF then
    Response.Write "<h3>Nessun risultato</h3>" & vbCRLF
    exit sub
    end if
    %>
    </td>
    </tr>

    <tr valign="top">
    <td width="80%">
    <table width="100%" class="lista" border="0" cellspacing="0" cellpadding="2">

    <tr align="top">
    <td>
    [img]public/img_primopiano/<%=rs([/img]" width="200" height="200" hspace="0" vspace="0" border="1">


    <a align="top"><%=rs("nome")%></a>


    <a align="top">Dove:</a><a> <%=rs("azienda")%></a>


    <a align="top">Quando:</a><a> <%=rs("data")%></a>


    <a align="top">Genere:</a><a> <%=rs("idcategoria")%></a>
    </td>
    </tr>

    <tr align="top">
    <td align="top">
    <%=rs("descrizione")%></td>
    </tr>

    <tr align="top">
    <td class="proddesc"> </td>
    </tr>

    </table>
    </td>
    </tr>
    <% if Len(session("id_utente")) <> 0 then %>
    <tr bgcolor="#ff3424" align="left"><td colspan="2">
    <table width="100%" class="lista" border="0" cellspacing="0" cellpadding="2">
    <tr valign="middle">
    <td class="login" colspan="2" valign="top">[img]images/carrello.gif[/img] ">Aggiu ngi questo prodotto al carrello</td>
    <td align="right" class="login"> Prezzo: <%=rs("prezzo")%> €</td>
    </tr>
    </table>
    </td>
    </tr>


    <% end if %>

    </table>

    <%
    rs.Close
    set rs = nothing
    end sub

    %>

    </head>

    <body>



    <table width="770" border="0" align="center" cellpadding="2" cellspacing="0" bgcolor="#FF0000">
    <tr>
    <td height="10" colspan="2" bgcolor="#FFFFFF"></td>
    </tr>
    <tr>
    <td width="250" background="img/bg_tit_aziende.gif" class="link_categorieAZ">Ultime Notizie dal GEMONESE</td>
    <td width="520" height="16" class="link_preferiti">Torna alla homepage | Segnala ad un amico | Stampa questa pagina</td>
    </tr>
    </table>
    <table width="770" class="TABLE_evento_NOborder" border="0" align="center" cellpadding="3" cellspacing="0" bgcolor="#FFFFFF">
    <tr valign="top">
    <td width="250" class="testo_nero11"><table width="100%" border="0" cellpadding="3" cellspacing="0" class="TABLE_evento">
    <tr>
    <td height="19" valign="top"><table border="0" cellpadding="0" cellspacing="0" width="100%">
    <%
    DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSNtemp=dsntemp & "DBQ=" & server.mappath("/mdb-database/notizie.mdb")
    sqlstmt = "SELECT * FROM journal ORDER BY id DESC"
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.Open sqlstmt, DSNtemp, 3, 3
    TotalRecs = rs.recordcount
    x = 0
    For x = 1 to 6
    If rs.eof then
    Exit For
    Else
    date1 = rs("pdate")
    id = rs("ID")
    name1 = rs("pname")
    link = date1
    loc = rs("ploc")
    description = "" & name1 & ""
    %>
    <tr>
    <td height="18" class="link_categorieAZ"><% =link%>


    <% =description%>


    <span class="loc_eventi_hp">[
    <% =loc%>
    ]</span></td>
    </tr>
    <tr>
    <td height="7"></td>
    </tr>
    <%
    rs.MoveNext
    End If
    Next%>
    </table>
    </table></td>
    <td width="520" class="testo_nero11"><table width="100%" class="TABLE_evento_NOborder" border="0" align="center" cellpadding="3" cellspacing="0" bgcolor="#FFFFFF">
    <tr>
    <td class="testo_nero11"><span class="tit_notizie"><span class="articoli_testo">
    <% ScriviRisultato() %>
    </span> </span></td>
    </tr>
    <tr>
    <td height="30" valign="bottom" class="testo_nero11"> </td>
    </tr>
    </table></td>
    </tr>
    </table>


    </body>
    </html>
    ------------------------------

    Qui inserisco il codice della pagina "head_hp_N.asp":
    -----------------------------
    <html>
    <head>


    <script language="JavaScript1.2">
    //configure the two variables below to match yoursite's own info
    var bookmarkurl="http://www.gemonahomepage.it"
    var bookmarktitle="GEMONA DEL FRIULI - Informazioni turistiche, gli eventi, le migliori aziende"
    function addbookmark(){
    if (document.all)
    window.external.AddFavorite(bookmarkurl,bookmarkti tle)}
    </script>



    <script language="JavaScript1.2" type="text/javascript">

    /***********************************************
    * Flashing Link Script- © Dynamic Drive (www.dynamicdrive.com)
    * This notice must stay intact for use
    * Visit http://www.dynamicdrive.com/ for full source code
    ***********************************************/

    var flashlinks=new Array()

    function changelinkcolor(){
    for (i=0; i< flashlinks.length; i++){
    var flashtype=document.getElementById? flashlinks[i].getAttribute("flashtype")*1 : flashlinks[i].flashtype*1
    var flashcolor=document.getElementById? flashlinks[i].getAttribute("flashcolor") : flashlinks[i].flashcolor
    if (flashtype==0){
    if (flashlinks[i].style.color!=flashcolor)
    flashlinks[i].style.color=flashcolor
    else
    flashlinks[i].style.color=''
    }
    else if (flashtype==1){
    if (flashlinks[i].style.backgroundColor!=flashcolor)
    flashlinks[i].style.backgroundColor=flashcolor
    else
    flashlinks[i].style.backgroundColor=''
    }
    }
    }

    function init(){
    var i=0
    if (document.all){
    while (eval("document.all.flashlink"+i)!=null){
    flashlinks[i]= eval("document.all.flashlink"+i)
    i++
    }
    }
    else if (document.getElementById){
    while (document.getElementById("flashlink"+i)!=null){
    flashlinks[i]= document.getElementById("flashlink"+i)
    i++
    }
    }
    setInterval("changelinkcolor()", 1000)
    }

    if (window.addEventListener)
    window.addEventListener("load", init, false)
    else if (window.attachEvent)
    window.attachEvent("onload", init)
    else if (document.all)
    window.onload=init
    </script>


    </head>

    <body>

    <div align="center">
    <table width="770" height="80" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#333333">
    <tr>
    <td height="50" align="center" valign="middle"><div align="center"></div></td>
    </tr>
    </table>

    <table width="770" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FF0000">
    <tr>
    <td height="16">
    <table width="770" border="0" cellspacing="0" cellpadding="1">
    <tr valign="middle">
    <td height="20" class="link_preferiti">
    <div align="left"><a HREF title="Fai di www.gemonahomepage.it la Tua pagina iniziale" style="cursor:hand" onClick="this.style.behavior='url(#default#homepag e)';this.setHomePage('http://www.gemonahomepage.it');">GHP come homepage</a> | GHP come preferito | Dillo ad un Amico</div>
    <div align="center"></div></td>
    </tr>

    <tr>
    <td height="5" bgcolor="#D90000"></td>
    </tr>
    <tr>
    <td height="70" bgcolor="#FFFFFF"></td>
    </tr>

    </table>
    </td>
    </tr>
    </table>

    <table width="770" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr bgcolor="#EBEBEB">
    <td width="350" height="24" align="left" valign="middle"> Login AZIENDE</td>
    <td width="420" class="testo_nero11" valign="middle"><div align="right">
    <div align="right">
    <%
    strConnect = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/mdb-database/") & "/commerciale.mdb"
    set cn = Server.CreateObject("Adodb.Connection")
    cn.Open strConnect
    set rs = server.CreateObject("adodb.recordset")
    strsql="SELECT count(IDAzienda) as conta FROM tblAziende WHERE tblAziende.IsKilledAz=False"
    rs.open strsql,cn
    con = rs("conta")
    rs.close
    %>


    Ci sono <%= con%> aziende online |

    Ci sono <%=response.write(Application("visitors"))%> utenti online
    </div></td>
    </tr>
    </table>

    </body>
    </html>
    --------------------------

  2. #2
    Utente di HTML.it L'avatar di [trodat]
    Registrato dal
    Oct 2004
    Messaggi
    2,135
    Con quale versione di windows server lavori?
    Lo Stato dà un posto. L’impresa privata dà un lavoro. – Indro Montanelli

  3. #3
    Il sito sta su un server windows 2003

  4. #4
    In locale i path dei file inclusi visti da browser sono uguali rispetto a quelli online?

  5. #5
    Non ho un server in locale poichè sto lavorando con un portatile da casa con windows xp home edition.

  6. #6
    Ho risolto come si può vedere qua >>> http://www.aspcode.it/forum/forum.as...7760&mode=last

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.