<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
IF Trim(Request.Form("action"))="savedata" Then
set rs=server.createobject("adodb.recordset")
sql="select * from orderform"
rs.open sql,conn,1,3
rs.addnew
rs("Given_name")=request.Form("Given_name")
rs("Family_name")=request.Form("Family_name")
rs("Father")=request.Form("Father")
rs("Mother")=request.Form("Mother")
rs("sex")=request.Form("sex")
rs("birth_YY")=request.Form("birth_YY")
rs("birth_mm")=request.Form("birth_mm")
rs("birth_DD")=request.Form("birth_DD")
rs("citizenship")=request.Form("citizenship")
rs("address")=request.Form("address")
rs("phone_O")=request.Form("phone_O")
rs("phone_H")=request.Form("phone_H")
rs("fax")=request.Form("fax")
rs("level_edu")=request.Form("level_edu")
rs("current_study")=request.Form("current_study")
rs("level_eng")=request.Form("level_eng")
rs("eap")=request.Form("eap")
rs("hsp")=request.Form("hsp")
rs("PSM_YY")=request.Form("PSM_YY")
rs("PSM_mm")=request.Form("PSM_mm")
rs("PSM_DD")=request.Form("PSM_DD")
rs("stotts_college")=request.Form("stotts_college")
rs("other_Highschool")=request.Form("other_Highschool")
rs("PSS_YY")=request.Form("PSS_YY")
rs("PSS_mm")=request.Form("PSS_mm")
rs("PSS_DD")=request.Form("PSS_DD")
rs("Airport_pickup")=request.Form("Airport_pickup")
rs("flight_no")=request.Form("flight_no")
rs("Flight_YY")=request.Form("Flight_YY")
rs("Flight_DD")=request.Form("Flight_DD")
rs("Flight_mm")=request.Form("Flight_mm")
rs("Homestay")=request.Form("Homestay")
rs("companyname")=request.Form("companyname")
rs("address_com")=request.Form("address_com")
rs("phone_com")=request.Form("phone_com")
rs("fax_com")=request.Form("fax_com")
rs("mobile_com")=request.Form("mobile_com")
rs("contact_com")=request.Form("contact_com")
rs("signature")=request.Form("signature")
rs("sign_parents")=request.Form("sign_parents")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "" & Chr(13)
response.End
End IF
%>
申请表
