<% ' FP_ASP Frontpage 元件自動產生 ASP。請勿編輯。 On Error Resume Next Session("FP_OldCodePage") = Session.CodePage Session("FP_OldLCID") = Session.LCID Session.CodePage = 950 Session.LCID = 1028 Err.Clear strErrorUrl = "" If Request.ServerVariables("REQUEST_METHOD") = "POST" Then If Request.Form("VTI-GROUP") = "0" Then Err.Clear Set fp_conn = Server.CreateObject("ADODB.Connection") FP_DumpError strErrorUrl, "無法建立連線" Set fp_rs = Server.CreateObject("ADODB.Recordset") FP_DumpError strErrorUrl, "無法建立記錄項" fp_conn.Open Application("b5_guest1_ConnectionString") FP_DumpError strErrorUrl, "無法開啟資料庫" fp_rs.Open "結果", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable FP_DumpError strErrorUrl, "無法開啟記錄項" fp_rs.AddNew FP_DumpError strErrorUrl, "無法新增記錄項到資料庫" Dim arFormFields0(16) Dim arFormDBFields0(16) Dim arFormValues0(16) arFormFields0(0) = "mobile" arFormDBFields0(0) = "mobile" arFormValues0(0) = Request("mobile") arFormFields0(1) = "s1" arFormDBFields0(1) = "s1" arFormValues0(1) = Request("s1") arFormFields0(2) = "tel" arFormDBFields0(2) = "tel" arFormValues0(2) = Request("tel") arFormFields0(3) = "ielts_date" arFormDBFields0(3) = "ielts_date" arFormValues0(3) = Request("ielts_date") arFormFields0(4) = "e_name" arFormDBFields0(4) = "e_name" arFormValues0(4) = Request("e_name") arFormFields0(5) = "postcode" arFormDBFields0(5) = "postcode" arFormValues0(5) = Request("postcode") arFormFields0(6) = "email" arFormDBFields0(6) = "email" arFormValues0(6) = Request("email") arFormFields0(7) = "c_name" arFormDBFields0(7) = "c_name" arFormValues0(7) = Request("c_name") arFormFields0(8) = "enter_year" arFormDBFields0(8) = "enter_year" arFormValues0(8) = Request("enter_year") arFormFields0(9) = "ielts" arFormDBFields0(9) = "ielts" arFormValues0(9) = Request("ielts") arFormFields0(10) = "degree" arFormDBFields0(10) = "degree" arFormValues0(10) = Request("degree") arFormFields0(11) = "course" arFormDBFields0(11) = "course" arFormValues0(11) = Request("course") arFormFields0(12) = "add" arFormDBFields0(12) = "add" arFormValues0(12) = Request("add") arFormFields0(13) = "area" arFormDBFields0(13) = "area" arFormValues0(13) = Request("area") arFormFields0(14) = "language" arFormDBFields0(14) = "language" arFormValues0(14) = Request("language") arFormFields0(15) = "Comments" arFormDBFields0(15) = "Comments" arFormValues0(15) = Request("Comments") FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0 If Request.ServerVariables("REMOTE_HOST") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "遠端電腦名稱" End If If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "瀏覽器類型" End If FP_SaveFieldToDB fp_rs, Now, "時間戳記" If Request.ServerVariables("REMOTE_USER") <> "" Then FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "使用者名稱" End If fp_rs.Update FP_DumpError strErrorUrl, "無法更新資料庫" fp_rs.Close fp_conn.Close Session("FP_SavedFields")=arFormFields0 Session("FP_SavedValues")=arFormValues0 Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") Response.Redirect "../qub/b5_qub_form.htm" End If End If Session.CodePage = Session("FP_OldCodePage") Session.LCID = Session("FP_OldLCID") %> 英國女皇大學 留言板


請將您的基本資料或意見留在訪客意見欄內，如果您欲函索本校的各科系之相關資料及下載入學申請表格,亦請您填妥並提送此表格,以便本處能迅速與你聯絡.

中文姓名:          

英文姓名:

性別:男      女

學位:(申請大學或是研究所者,請在此點選)
          

預計入學年份:  

語言課程:(申請長,短期語言課程者,請在此點選) 
          

科系:

IELTS/ TOEFL (Grade) : (如:6.5 or 550)   

預計參加考試時間:(如:2001/01)

國家/地區:(如:台灣台北)

郵遞區號:                

地址:

電話: 

行動電話:

Email address :

留言 :    


英國國立女皇大學 - 駐台灣辦事處

地址: 231 台灣台北縣新店市僑信路68巷9號

電話: 886-2-2214-5868

Eamil: qub.asia@msa.hinet.net


將本站設為首頁

下載申請表

問與答

影片欣賞

留言簿/函索資料
 台灣學生感言