<%@ Language=VBScript %> <% Dim strID, strLogged, strDEdit, strAction strID = Session("id") strLogged = Session("logged") strDEdit = Session("dedit") strAction = "dap0new.asp" if Len(strID) > 0 then strLogged = "1" strDEdit = "1" strAction = "dapnew2.asp" end if %>