<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% If Request("status") <> "" Then select case Request("status") case "success" Response.Write "" case "fail" Response.Write "" case "exist" Response.Write "" end select End If %> <% response.write "" response.write "" & vbCrLf Response.Write "" Response.Write Chr(13) & "" response.write "" & vbCrLf response.write "" & vbCrLf response.write "" & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write "

" & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " 客戶申請服務 " & vbCrLf response.write " 桃媽媽安排試作 " & vbCrLf response.write " 簽約付款 " & vbCrLf response.write " 桃媽媽開始服務 " & vbCrLf response.write " " & vbCrLf response.write " 電話申請 " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " 台北 02-2778-3953 桃園 03-356-2123 台南 06-313-7659 " & vbCrLf response.write " 線上申請 " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " " & vbCrLf response.write " 請填寫以下表格，送出後，二天內即有專人與您聯絡。 " & vbCrLf response.write " " & vbCrLf Response.Write " " Response.Write "" & vbCrLf Response.Write "" Response.Write "" Response.Write "" Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf If gender = "男" Then Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write "" Response.Write "" Response.Write "" Response.Write " *為必填 姓名* 姓:  名: 密碼* (填入 6 個字元以上的英文字母、數字、以及各種符號組合，但不含空白鍵、及「""」。) 確認密碼* (請輸入您剛填的密碼！) 性別 男 女" & vbCrLf Else Response.Write " 男 女" & vbCrLf End If Response.Write " 公司電話 行動電話 家裡電話 E-Mail* (請正確填寫) 通訊地址" & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " 基隆市" & vbCrLf Response.Write " 台北市" & vbCrLf Response.Write " 台北縣" & vbCrLf Response.Write " 桃園縣" & vbCrLf Response.Write " 新竹市" & vbCrLf Response.Write " 新竹縣" & vbCrLf Response.Write " 苗栗縣" & vbCrLf Response.Write " 台中市" & vbCrLf Response.Write " 台中縣" & vbCrLf Response.Write " 彰化縣" & vbCrLf Response.Write " 南投縣" & vbCrLf Response.Write " 雲林縣" & vbCrLf Response.Write " 嘉義市" & vbCrLf Response.Write " 嘉義縣" & vbCrLf Response.Write " 臺南市" & vbCrLf Response.Write " 臺南縣" & vbCrLf Response.Write " 高雄市" & vbCrLf Response.Write " 高雄縣" & vbCrLf Response.Write " 屏東鄉" & vbCrLf Response.Write " 臺東縣" & vbCrLf Response.Write " 花蓮縣" & vbCrLf Response.Write " 宜蘭縣" & vbCrLf Response.Write " 澎湖縣" & vbCrLf Response.Write " 金門縣" & vbCrLf Response.Write " 連江縣" & vbCrLf Response.Write " 南海諸島" & vbCrLf Response.Write " 釣魚台列嶼" & vbCrLf Response.Write " ---" & vbCrLf Response.Write " " & vbCrLf Response.Write " 103 大同區" & vbCrLf Response.Write " 106 大安區" & vbCrLf Response.Write " 111 士林區" & vbCrLf Response.Write " 104 中山區" & vbCrLf Response.Write " 100 中正區" & vbCrLf Response.Write " 114 內湖區" & vbCrLf Response.Write " 116 文山區" & vbCrLf Response.Write " 112 北投區" & vbCrLf Response.Write " 105 松山區" & vbCrLf Response.Write " 110 信義區" & vbCrLf Response.Write " 115 南港區" & vbCrLf Response.Write " 108 萬華區" & vbCrLf Response.Write " " & vbCrLf Response.Write " " & vbCrLf Response.Write " 家庭成員 人 需求項目 (可複選) " & vbCrLf strchecked = "" If need1 = "1" Then strchecked = " checked" Response.Write " 每天服務 " & vbCrLf strchecked = "" If need2 = "1" Then strchecked = " checked" Response.Write " 家庭清潔 " & vbCrLf strchecked = "" If need3 = "1" Then strchecked = " checked" Response.Write " 衣物清潔 " & vbCrLf strchecked = "" If need4 = "1" Then strchecked = " checked" Response.Write " 炊事服務 " & vbCrLf strchecked = "" If need5 = "1" Then strchecked = " checked" Response.Write " 簡易收納 " & vbCrLf strchecked = "" If need6 = "1" Then strchecked = " checked" Response.Write " 代為購物 " & vbCrLf strchecked = "" If need7 = "1" Then strchecked = " checked" Response.Write " 孩童接送 " & vbCrLf Response.Write " 得知桃媽媽訊息來源 " & vbCrLf strchecked = "" If source1 = "1" Then strchecked = " checked" Response.Write " 網路 " & vbCrLf strchecked = "" If source2 = "1" Then strchecked = " checked" Response.Write " 報紙 " & vbCrLf strchecked = "" If source3 = "1" Then strchecked = " checked" Response.Write " 廣播 " & vbCrLf strchecked = "" If source4 = "1" Then strchecked = " checked" Response.Write " DM " & vbCrLf strchecked = "" If source5 = "1" Then strchecked = " checked" Response.Write " 親友介紹 " & vbCrLf strchecked = "" If source6 = "1" Then strchecked = " checked" Response.Write " 電視 " & vbCrLf strchecked = "" If source7 = "1" Then strchecked = " checked" Response.Write " 雜誌" & vbCrLf strchecked = "" If source8 = "1" Then strchecked = " checked" Response.Write " 其他 " & vbCrLf Response.Write " " & vbCrLf Response.Write " 希望服務 時段 星期" & vbCrLf If time1 = "上午" Or time1 = "" Then Response.Write " 上午　 " & vbCrLf Else Response.Write " 上午　 " & vbCrLf End If If time1 = "下午" Then Response.Write " 下午" & vbCrLf Else Response.Write " 下午" & vbCrLf End If Response.Write "  每週次" Response.Write " 空間坪數 坪   " Response.Write " " response.write " " & vbCrLf response.write "

本網站版權屬於桃媽媽家事管理所有，未經本站同意，請勿擅用文字及圖案，違者必究。 Copyright © 2002 - 2008 MOMOSUN Ltd All Rights Reserved.

" & vbCrLf response.write "" & vbCrLf response.write "" & vbCrLf response.write "" & vbCrLf response.write "" & vbCrLf response.write "" If Request("action1") <> "" Then Response.Write "" End If %>