%@ Language=VBScript %> <% Option Explicit Dim objConn Dim objRsState Set objConn=Server.CreateObject("ADODB.Connection") objConn.Open application("ConnectionString") Set objRsState=Server.CreateObject("ADODB.Recordset") Set objRsState=objConn.Execute("SELECT * FROM PSLocation") Dim strLocation strLocation=Request.QueryString("cmbState") %>
|
|
|