Monday, February 23, 2009
Contributors
|
<% Dim con, strSQL, objConn, objRS
Dim nRecord
nRecord=1
con = "provider=SQLOLEDB;Data Source=65.61.140.171,4120;Initial Catalog=339411_neekam;Persist Security Info=True;User ID=339411_neekam;Password=slapdicks11"
strSQL = "SELECT * FROM neekam_directories where directory_name='craigscasinoblognetwork' order by domain_name"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open con
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objConn
Do While Not objRS.eof
Response.Write("" + objRS.fields(2).value + " ") +chr(13) objRS.movenext Loop objRS.Close objConn.Close %> |
Previous Posts
- The Freemont Street Experience - Great Casino Netw...
- Gambling Network in Works for Pennsylvania Taverns...
- Online Casino Reports Links Internet Gamblers Via ...
- Betsafe Joins Huge Online Poker Network
- Internet Casino News - New Years Eve in Vegas
- Craig's Casino Blog - Online Casino News
- Welcome
Subscribe to
Posts [Atom]
 

2 Comments:
This post has been removed by the author.
That's great stuff up on the roof, or dome or whatever. Are those fractals?
Post a Comment
<< Home