<%
	Dim objConn
	Session.Timeout=15
	Set objConn=Server.CreateObject("ADODB.Connection")
	objConn.ConnectionString="DSN=wjf_employees;Uid=root;Pwd=WJF11sql"
	objConn.Open 
	set rs = server.createobject("ADODB.Recordset")
%>