% cst = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\websites\boisesearch\db\homesearch.mdb" set aConn = CreateObject("ADODB.Connection") aConn.open cst Set aRS = Server.CreateObject("ADODB.Recordset") aSQL = "SELECT * FROM Bio WHERE id = " & request.querystring("id") aRS.Open aSQL , aConn, 3 colcode = aRS.Fields("WebColor") %> <% if request.querystring("id") <> "" then agentid = request.querystring("id") else agentid = request.form("id") end if %>
|
|||||||||||||||||||||
![]() |
|
||||||||||||||||||||
|
|||||||||||||||||||||