% if request.form("confirm") = "OK" then set connNews = server.createobject("ADODB.Connection") connNews.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("/cgi-bin/member01.mdb") sql = "INSERT into member ( name, email, webname, address, describ ) SELECT " sql = sql & " '" & request.form("name") & "' as name, " sql = sql & " '" & request.form("email") & "' as email, " sql = sql & " '" & request.form("webname") & "' as webname, " sql = sql & " '" & request.form("address") & "' as address, " sql = sql & " '" & request.form("describ") & "' as describ; " set rsArticles = connNews.Execute(sql) connNews.close set connNews = nothing response.write("
") response.write("Add new member (Complete)