Dette er hva du trenger å gjøre. Forsikre deg om at databasen din er opprettet enten det er Access eller SQL. Når du har gjort det, må du merke tilkoblingsstrengen og tabellenavn. For denne øvelsen skal jeg bruke følgende:
artic - Automatisk nummer - dette nummeret vil bli integrert i lenken. (Bruk int med seed for SQL og autonummer for Access) Dato lagt til - Dato og klokkeslett for artikkelen ble lagt til Lagt til av - Forfatter av artikkelen ShortDesc - Enkel beskrivelse enten det er nyheter eller artikkel om informasjonstype ArticleContent - Selve nyhetsinformasjonen for artikkelen.
Nå, med denne versjonen, vil vi bruke den spesielle XML-formateringen for å sikre at når RSS Reader får nyhetsartiklene, vil den ikke mislykkes på grunn av noen spesielle tegn leseren ikke kan behandle. RSS med XML-format er veldig kresen når det gjelder hvilke tegn som blir behandlet, men vi vil sørge for at det ikke kan behandle noen dårlige tegn, og vi vil kalle det ApplySpecialFormat-funksjonen.
En ting til å merke seg, hvis du vil at brukere skal se artikkelen når de klikker på lenken i leseren, må du sørge for at du lager en side som viser artikkelen og informasjonen. Du har sannsynligvis allerede dette, men jeg ville bare sørge for at jeg sa det bare i tilfelle. På denne øvelsen bruker jeg article_view.asp.
Nå for koden: (Lagre filen som Articlesver2.rss på webserveren.)
<% 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 ved hjelp av ASP-kode //www.myserver.com RSS Bruke ASP-kode for å se nye og eksisterende artikler fra en database. en-us Copyright 2006
20
//www.myserver.com/images/logo.jpg RSS ved hjelp av ASP-kodelogo //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)
DOBBELT KLIKK HER for å få tilgang til koblingen til lastebilen
Har du noen gang ønsket å sende en melding på en flaske? Vi har alle lest historier om et barn som slipper en flaske ned i en elv eller et hav med navn og adresse bare for å få flasken å finne flere...
I mange år LightWave 3DR fra NewTek, Inc. har vært favoritten til profesjonelle og amatør 3D-artister som jobber innen mange felt, inkludert spill, film, animasjon og trykkproduksjon. En årsak til...
Om Forfatteren
Chow Yuan
Unge Talenter Journalistikk. Chef. Den Ansvarlige Og Ned Til Jorden.