% dim con Set Con = Server.CreateObject("ADODB.Connection") con.open "Driver={SQL Server};Server=web\sqlexpress;Database=master;User ID=sa;Pwd=taksheel" 'response.write("open") sql = "select * from taksheelnews order by postdate" set rs = con.Execute(sql) %>
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||