Move Back to Nebraska

<%@ LANGUAGE = "VBSCRIPT" %> <% OPTION EXPLICIT %> Move Back to Nebraska

site map

Cabela's Positions

<% Dim myConn Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open "driver={MySQL};server=mysql.preferredpartnersllc.com;uid=prefer14;pwd=hal987;database=prefer14" Dim myRS Set myRS = Server.CreateObject("ADODB.Recordset") 'myRS.Open "SELECT * FROM positions", myConn myRS.Open "SELECT ID, Location, Job_Title, Company, Description FROM positions WHERE COMPANY = 'Cabelas' ORDER BY ID DESC", myConn dim i i=1 %>

<% While Not myRS.EOF %> <% myRS.MoveNext i=i+1 Wend myRS.Close Set myRS = Nothing myConn.Close Set myConn = Nothing %>

Location	Job Title
"<% if i=1 then response.write "checked" end if %>> <%=myRS("Location")%>	<% If IsNull(myRS("Job_Title")) or myRS("Job_Title")="" Then Response.Write " " Else Response.Write myRS("Job_Title").Value End If%>