<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% dsn="driver={Microsoft Access Driver (*.mdb)};dbq=e:\users\GSWSWindows03\db\rockridgedistrict\ml.mdb" %> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open dsn %> <% Set RSBODY = Server.CreateObject("ADODB.Recordset") SQLBODY = "SELECT * from Settings" RSBODY.Open SQLBODY, Conn, 1, 3 %> [an error occurred while processing this directive]

[an error occurred while processing this directive] [an error occurred while processing this directive] Join A Mailing List Email: First Name: Last Name: Format: HTML Text Subscribe To: <% Set RSLIST = Server.CreateObject("ADODB.Recordset") SQLLIST = "SELECT * FROM Newsletters ORDER BY Newsletter_Name" RSLIST.Open SQLLIST, Conn, 1, 3 %> <%Do While Not RSLIST.EOF%> "><%=RSLIST("Newsletter_Name")%> <% RSLIST.movenext Loop RSLIST.close set RSLIST = nothing %> Password: Repeat Password:   <% If Request("SecondTry") = "True" Then If Request("WrongPW") = "True" Then Response.Write "Invalid Password. Please try again." Else Response.Write "Email not found. Please try again." End If End If %> Already Signed Up? Login to Update Your Account Email: Password:   Lost your Password? Need help subscribing/unsubscribing? Simply email at mail@RockridgeDistrict.com and we will manually process your request. PLEASE INDICATE IN YOUR EMAIL WHETHER YOU WISH TO SUBSCRIBE OR UNSUBSCRIBE [an error occurred while processing this directive]

<% Conn.close set Conn = nothing %>