<%
dim username
dim password
UserName = Request.Form(" UserName")
Password = Request.Form(" Password")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver="{Microsoft Access Driver (*.mdb)}"; &dbq=learnasp.mdb"
if session("username")=fgx then
response.Write"成功登录"
end if

%>

红色部分好像有问题～～