Ecco cosa devi fare. Assicurati di avere il tuo database creato sia che si tratti di Access o SQL. Fatto ciò, annota la stringa di connessione e i nomi delle tabelle. Per questo esercizio, userò quanto segue:
ArticleID - Numero automatico: questo numero verrà incorporato nel collegamento (utilizzare int con seed per SQL e autonumber per Access) Data aggiunta - Data e ora in cui l'articolo è stato aggiunto Aggiunto da - Autore dell'articolo ShortDesc - Descrizione semplice che si tratti di notizie o informazioni tipo di articolo ArticleContent - Le informazioni sulle notizie effettive per l'articolo.
Ora, con questa versione applicheremo la speciale formattazione XML per assicurarci che quando il lettore RSS riceve gli articoli di notizie, non fallirà a causa di caratteri speciali che il lettore non può elaborare. RSS con il formato XML è molto esigente su quali caratteri vengono elaborati ma faremo in modo che non sia in grado di elaborare alcun carattere errato e lo chiameremo funzione applySpecialFormat.
Un'altra cosa da notare, se desideri che gli utenti visualizzino l'articolo quando fanno clic sul link nel loro lettore, assicurati di creare una pagina che mostri l'articolo e le sue informazioni. Probabilmente hai già questo, ma volevo solo assicurarmi di averlo detto per ogni evenienza. Per questo esercizio, userò article_view.asp.
Ora per il codice: (Salva il file come articlesver2.rss sul tuo server web.)
<% Response.Buffer = true Response.ContentType = "text/xml" Function applySpecialFormat(strInput) if len(strInput) > 0 then strInput = Replace(strInput,"&", "&") strInput = Replace(strInput,"'", "& apos;") 'REMOVE SPACE BETWEEN & apos; strInput = Replace(strInput,"""", "& quot;") 'REMOVE SPACE BETWEEN & quot; strInput = Replace(strInput, ">", "& gt;") 'REMOVE SPACE BETWEEN & gt; strInput = Replace(strInput,"<","& lt;") 'REMOVE SPACE BETWEEN & lt; else strInput = "" end if applySpecialFormat = strInput End Function %>
RSS utilizzando il codice ASP //www.myserver.com RSS Utilizzo del codice ASP per visualizzare articoli nuovi ed esistenti da un database. it-it Copyright 2006
20
//www.myserver.com/images/logo.jpg RSS utilizzando il logo del codice ASP //www.myserver.com
<% Dim objConn Set objConn = Server.CreateObject("ADODB.Connection") Set objRS = Server.CreateObject("ADODB.Recordset") objConn.ConnectionString = "Provider=sqloledb;Data Source=DBSERVER;Initial Catalog=ARTICLEDB;User Id=sa;Password=sqlpassword;" objConn.CursorLocation = 3 objConn.Open
Dim objRS, strSQL, strDesc strSQL = "SELECT * FROM ArticleDB WHERE (AddedDate <= '" & Now() & "') order by AddedDate DESC" objRS.Open strSQL, objConn
Do While Not objRS.EOF strDesc = "Article by " & objRS("AddedBy") & " on " & _ objRS("AddedDate") & " PST " & _ objRS("ArticleContent").Value %>
()
//www.myserver.com/article_view.asp?ArticleID=
asp@coffebreakblog.com (Christopher Combs)
DOPPIO CLICCA QUI PER ACCEDERE AL LINK PER IL DOWNLOAD DEGLI ALLEGATI
Foto di riferimento dell'artista: riflessi, trame e sfondi di Gary GreeneLa prima dimostrazione è stata un'interpretazione fotorealistica dell'artista acquarello Beverly Fortheringham. La sua...
Riflessi di base Ogni persona nasce con riflessi di base. Puoi vederli nei bambini sani mentre si muovono attraverso le loro fasi di sviluppo e si integrano a età prevedibili, in movimento regolare....
Circa L'Autore
Chow Yuan
Giovane Giornalismo Talento. Chef. La Persona Responsabile E Piedi Per Terra.