<%@ LANGUAGE = "VBScript" %> <% if request.form("action") = "update" then firstname = request.form("first_name") lastname= request.form("last_name") email = request.form("email") pword = request.form("pword") strSQL = "UPDATE blog_users SET first_name = '" & firstname &"', " _ & "last_name = '" & lastname & "', " _ & "email = '" & email & "', " _ & "pword = '" & pword &"' " _ & "WHERE user_id = " & session("userid") & " " conn.Execute(strSQL) %> <% response.end end if%> Update Account
 Today's Blog  &year=<%= session("theYear") %>'" onMouseOver="highlight(this)" onMouseOut="unhighlight(this)"> Month View    
<% strSQL = "SELECT username, first_name, last_name, email, pword FROM blog_users WHERE user_id = " & session("userid") & "" set dbRS = conn.Execute(strSQL) %>

ClickBlog - Account Maintenance

User Name:<%= dbRS(0) %>
First Name:
Last Name:
Email:
Password:
  
<% dbRS.close set dbRS = nothing %>