Ever wanted to display random tips or quotes on your website? Well, Look no further. Here is a random text displayer that we used on a website we built that displays a random tip every time the browser is refreshed.
The first thing you need to do is create a database with a table called tblQuickTips with these fields:
fID - autonumber
fTip - text field or memo field depending on how long your tips are
Then, start adding some tips to your database.
Next, create a page called randomtext.asp and copy the below code into your page:
<%
DIM mySQL, objRS
mySQL = "SELECT MAX(fID) AS MaxTip FROM tblContent_Quick_Tips"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open mySQL, objConn
Randomize
DIM intRecord
intRecord = Int(objRS("MaxTip") * Rnd + 1)
objRS.Close
Set objRS = Nothing
mySQL2 = "SELECT fTip FROM tblContent_Quick_Tips WHERE fID = '" & intRecord & "'"
Set objRS2 = Server.CreateObject("ADODB.Recordset")
objRS2.Open mySQL2, objConn
Response.Write objRS2("fText")
objRS2.Close
Set objRS2 = Nothing
%>
All done. Just publish your page and database and click refresh on your browser. Each time you refresh, a random tip will be displayed.
http://www.aspwebpro.com/aspscripts/contentmgmt/randomtext.asp
No comments:
Post a Comment