|
|
|
|
|
|
| <% On Error Resume Next Set Cn = Server.CreateObject("ADODB.Connection") Cn.Open "Provider=SQLOLEDB;uid=webcust;PWD=Bigcap59;DATABASE=dropdown;SERVER=server12.windsornet.org" If Err.number <> 0 then TrapError Err.description End If set rs = cn.execute("Select url, boxtext From maindrop WHERE type1 = 's' order by url ASC") If Err.number <> 0 then TrapError Err.description End If %> | |
|
