Actually Tom,
when i delved into this further it is now working on my laptop, in both ie6 and firefox and also on the clients pc, ie6. But still when i dial into their server, w2k3, and use the web frontend there with ie6 the session variables do not work!
~M


>Mark;
>
>

>< %
>
>Dim de_usrnam, de_paswrd
>de_usrnam=ucase(trim(request.form("de_usrnam")))
>de_paswrd=ucase(trim(request.form("de_pwrd")))
>
>Dim ag_RS, ag_SQL, wheretogo, de_type
>de_type = "AGENT"
>Set ag_RS = Server.CreateObject("ADODB.Recordset")
>
>' Run the select command to verify the password
>ag_sql = "SELECT * FROM agpeople WHERE upper(p_code) = '" & de_usrnam & "' AND upper(p_string) ='" & de_paswrd &"' AND p_type ='" & de_type &"'"
>Set ag_RS = objConn.Execute(ag_sql)
>
>If NOT ag_RS.EOF Then
>

>' Suggested in place of the above...
>IF NOT ag_RS.RecordCount > 0 THEN
>' Another suggestion is to be sure you are getting through the conditional statement...
>Response.Write "Here I am!"
>

>
>	SESSION("USERCODE") = ag_RS("p_code")
>	SESSION("USERNAME") = ag_RS("p_name")
>
>	' get the agent name
>	Dim ag3_SQL, ag3_RS, agentref
>	agentref = ag_RS("p_mcode")
>	ag3_SQL = "SELECT ref, name FROM KFSMA WHERE smau6 = 2 AND ref = '" & agentref & "'"
>
>	Set ag3_RS = objConn4.Execute(ag3_SQL)
>
>	If NOT ag3_RS.EOF Then
>		SESSION("USERWORK") = ag3_RS("name")
>	Else
>		SESSION("USERWORK") = "NOT FOUND"
>	End If
>
>
>	ag3_RS.Close
>	Set ag3_RS = Nothing
>
>	ag_RS.Close
>	Set ag_RS = Nothing
>
>	objConn.Close
>	Set objConn = Nothing
>
>	response.redirect ("agent.asp")
>
>

>
>Tom