<%
If Request.QueryString("mode") <> "doit" then
    Call ShowForm
Else
    Dim Err_msg
    Err_msg = ""
    if Request.Form("MemberId") = "" then Err_Msg = Err_Msg & "

你必须输入你的MemberId

"
    if Request.Form("Password") = "" then Err_Msg = Err_Msg & "

你必须输入你的Password

"
    'if request.form("MemberId")="" or request.form("password")="" then
        'response.write("请填写 memberId! or Password!")

    
        set myconn= Server.CreateObject("ADODB.Connection")
        myconn.open "PROVIDER=SQLOLEDB;DATA=192.168.0.193;User ID=sa;Password=boren@;DATABASE=mybase"
        strSql="select * from member where M_Id='"&request.form("MemberId")&"' and M_Password='"&request.form("password")&"'"
        set rs=myconn.execute(strSql)
            IF rs.EOF then
                 Err_Msg = Err_Msg & "

invalid UserName or Password

"
            else
        
                'Response.Redirect Session("Goback")
                'Response.Redirect "http://192.168.0.193/ccec/home/index.htm"
                'Response.END
            END IF
                rs.close
                myconn.close
            if Err_Msg <> "" then    
    
%>

你填写的信息有错误:

<%= Err_Msg %>

<！--#include file="form" -->








<%
        On Error Resume next
        my_conn.Close
        set my_conn = nothing
        Response.End
        


%>
<%else
Session("GoBack")=Request.ServerVariables("SCRIPT_NAME")
Response.Redirect Session("Goback")
'Response.Redirect "../home/index.htm"
%>

<%
On Error Resume next
my_conn.Close
set my_conn = nothing
end if
end if
%>

在最前面写上
Response.Buffer = TRUE

然后在Redirect前写上
Response.Clear

可以了，谢谢
再问一下：如何实现重定向到"原来的请求页"？