<% drawValidateJS = true if session("isUser") then response.redirect "user_home.asp" end if dim rs, rsEdit dim addnew, update, delete, saverec dim table table = "Users" addnew = true: update = false: saverec = false select case request.querystring("action") case "1" addnew = true case "2" update = true case "3" delete = true end select if request.querystring("saverec") = "1" then saverec = true end if if saverec then set rsEdit = server.createobject("ADODB.RecordSet") if delete then else if addnew then rsEdit.Open table, Application("RTW_DSN"), 3, 3 rsEdit.addnew rsEdit("DateEntered").value = Now() end if rsEdit("DateLastEdited").value = Now() rsEdit("FirstName").value = formatStringForDB(request.form("FirstName")) rsEdit("LastName").value = formatStringForDB(request.form("LastName")) rsEdit("EmailAddress").value = makeNull(request.form("EmailAddress")) 'rsEdit("MailServerAddress").value = formatStringForDB(request.form("MailServerAddress")) 'rsEdit("MailServerUserName").value = formatStringForDB(request.form("MailServerUserName")) 'rsEdit("MailServerPassword").value = formatStringForDB(request.form("MailServerPassword")) rsEdit("GiftsInPacking").value = checkBoxVal(request.form("GiftsInPacking")) rsEdit("Password").value = makeNull(request.form("Password")) rsEdit("AccountActive").value = True rsEdit("isUser").value = True rsEdit("UserLevel").value = 10 end if rsEdit.update if addnew then rsEdit.movenext rsEdit.moveprevious rsEdit("FolderKey").value = zeroPad(rsEdit("ID"),4) & "_" & left(HashEncode(generateRandomKey() & session("adminUsername") & now()),8) rsEdit("LastEditedBy").value = rsEdit("ID") rsEdit.update end if rsEdit.close set rsEdit = nothing %> <% end if %>

Sign Up
Want to sign up? In just a couple minutes you can start writing about your travels, be they out on the road or just around the corner. You will be able to write journal entries about where you have been, the things you have done, the people you have met and anything else that you feel is worth taking the time to write about. You can keep a packing list for each journey that you make to help you get organized, and you can keep a log of all your expenses to help make sure that you're not going to blow the budget. People who read your journal can easily sign up to your email list, which you can manage, update, and utilize all from within this web site. You can also upload scans or digital photos of important documents that you might need in an emergency. When you're ready enter your information below and then press "SAVE" down at the bottom:
<%= drawSpacer(517,1) %>	<%= drawSpacer(123,1) %>