Visualizzazione dei risultati da 1 a 6 su 6
  1. #1
    Utente di HTML.it
    Registrato dal
    Apr 2006
    Messaggi
    49

    inserire template in pagina asp

    ciao a tutti...
    sto cercando di creare un blog...sono riusdcito a creare le varie pagine in asp, adesso volevo inserire un template .xml all'interno delle pagine, ma non riesco...potete darmi una mano???
    grazie a tutti e ciao

  2. #2
    Hai un template XSLT che dovrebbe trasformare un flusso XML?

  3. #3
    Utente di HTML.it
    Registrato dal
    Apr 2006
    Messaggi
    49
    no ho un template scritto in xml che devo inserire in una pagina asp gia scritta...ti posto i file magari mi spiego male io!!



    pagina asp

    <%@LANGUAGE = VBScript%>

    <%
    Dim pag, com
    pag = Request.QueryString("pag")
    com = Request.QueryString("com")
    If IsNumeric(pag) = False Or pag < 1 Then pag = 1
    Call CnOpen()
    Dim SQL
    %>
    <html>
    <head>
    <title>Un Blog in ASP</title>
    </head>
    <body>
    <h1>Un Blog in ASP</h1>
    <%
    Dim conta, quanti, numero, commenti
    conta = 0
    quanti = 5
    SQL = "SELECT * FROM messaggi ORDER BY mes_id DESC"
    rs.Open SQL, cn, 1
    rs.PageSize = quanti
    rs.AbsolutePage = pag
    While rs.EOF = False And conta < quanti
    SQL = "SELECT COUNT(com_id) AS temp FROM commenti "
    SQL = SQL & "WHERE com_mes = " & rs("mes_id")
    Set numero = cn.Execute(SQL)
    %>
    <h2><%=rs("mes_titolo")%></h2>



    <%=rs("mes_messaggio")%>



    Scritto in data: <%=rs("mes_data")%> -
    Commenti: <%=numero("temp")%> -
    ">Aggiungi un commento
    <%
    If numero("temp") > 0 Then
    %>
    -
    ">Leggi i commenti
    <%
    End If
    %>

    </p>
    <%
    If com <> "" And CInt(com) = rs("mes_id") Then
    SQL = "SELECT * FROM commenti WHERE "
    SQL = SQL & "com_mes = " & com & " ORDER BY com_id ASC"
    Set commenti = cn.Execute(SQL)
    %>
    <blockquote>
    <h3>Commenti</h3>
    <%
    While commenti.EOF = False
    %>


    <%=commenti("com_commento")%></p>
    <%
    commenti.MoveNext
    Wend
    %>
    </blockquote>
    <%
    Set commenti = Nothing
    End If
    Set numero = Nothing
    conta = conta + 1
    rs.MoveNext
    Wend
    %>



    Pagina:
    <%
    Dim x
    x = 1
    For x = 1 To rs.PageCount
    If CInt(pag) <> x Then
    %>
    [<%=x%>]
    <%
    Else
    %>
    [<%=x%>]
    <%
    End If
    Next
    %>
    </p>
    <%
    rs.Close
    %>


    Nuovo messaggio</p>
    </body>
    </html>
    <%
    Call CnClose()
    %>

    questo è il link dal quale ho scaricato il template:
    http://www.bloggerbuster.com/2007/08...plate-for.html

  4. #4
    L'XML non ha alcuna rappresentazione grafica propria.
    La rappresentazione grafica di un file XML è demandata ad un file XSLT.
    Forse te parlavi di XHTML e non di XML...

  5. #5
    Utente di HTML.it
    Registrato dal
    Apr 2006
    Messaggi
    49
    ok allora il codice che ho scaricato probabilmente non è solo a livello grafico perchè il file è un xml...adesso provo...

  6. #6
    Posta qui il codice del tuo file XML così possiamo dirti cos'è esattamente.

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 © 2026 vBulletin Solutions, Inc. All rights reserved.