<!-- saved from url=(0022)http://internet.e-mail -->
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../../Connections/Email_data.asp" -->
<%
' *** Edit Operations: declare variables
MM_editAction = CStr(Request("URL"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Request.QueryString
End If
' boolean to abort record edit
MM_abortEdit = false
' query string to execute
MM_editQuery = ""
%>
<%
' *** Insert Record: set variables
If (CStr(Request("MM_insert")) <> "") Then
MM_editConnection = MM_Email_data_STRING
MM_editTable = "tblApply"
MM_editRedirectUrl = "../../success1.asp"
MM_fieldsStr = "訂購物品|value|訂單明細|value|金額|value|訂購人|value|稱呼|value|郵遞區號|value|縣市|value|鄉鎮市|value|地址|value|手機|value|公司電話|value|住家電話|value|E_Mail|value|宅配時間|value|源|value|備註|value"
MM_columnsStr = "訂購物品|',none,''|訂單明細|',none,''|金額|',none,''|訂購人|',none,''|稱呼|',none,''|郵遞區號|',none,''|縣市|',none,''|鄉鎮市|',none,''|地址|',none,''|手機|',none,''|公司電話|',none,''|住家電話|',none,''|E_Mail|',none,''|宅配時間|',none,''|源|none,none,NULL|備註|',none,''"
' create the MM_fields and MM_columns arrays
MM_fields = Split(MM_fieldsStr, "|")
MM_columns = Split(MM_columnsStr, "|")
' set the form values
For i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(i+1) = CStr(Request.Form(MM_fields(i)))
Next
' append the query string to the redirect URL
If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then
If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString
End If
End If
End If
%>
<%
' *** Insert Record: construct a sql insert statement and execute it
If (CStr(Request("MM_insert")) <> "") Then
' create the sql insert statement
MM_tableValues = ""
MM_dbValues = ""
For i = LBound(MM_fields) To UBound(MM_fields) Step 2
FormVal = MM_fields(i+1)
MM_typeArray = Split(MM_columns(i+1),",")
Delim = MM_typeArray(0)
If (Delim = "none") Then Delim = ""
AltVal = MM_typeArray(1)
If (AltVal = "none") Then AltVal = ""
EmptyVal = MM_typeArray(2)
If (EmptyVal = "none") Then EmptyVal = ""
If (FormVal = "") Then
FormVal = EmptyVal
Else
If (AltVal <> "") Then
FormVal = AltVal
ElseIf (Delim = "'") Then ' escape quotes
FormVal = "'" & Replace(FormVal,"'","''") & "'"
Else
FormVal = Delim + FormVal + Delim
End If
End If
If (i <> LBound(MM_fields)) Then
MM_tableValues = MM_tableValues & ","
MM_dbValues = MM_dbValues & ","
End if
MM_tableValues = MM_tableValues & MM_columns(i)
MM_dbValues = MM_dbValues & FormVal
Next
MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")"
If (Not MM_abortEdit) Then
' execute the insert
Set MM_editCmd = Server.CreateObject("ADODB.Command")
MM_editCmd.ActiveConnection = MM_editConnection
MM_editCmd.CommandText = MM_editQuery
MM_editCmd.Execute
MM_editCmd.ActiveConnection.Close
If (MM_editRedirectUrl <> "") Then
Response.Redirect(MM_editRedirectUrl)
End If
End If
End If
%>
<html>
<head>
<title>E 功夫 - EXCEL 2002 教學光碟</title>
<meta http-equiv="Content-Type" content="text/html; charset=big5">
<style type="text/css">
<!--
.words {font-size: 11pt; line-height: 18pt}
.words10 {font-size: 10pt; line-height: 15pt}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function YY_checkform() { //v4.65
//copyright (c)1998,2002 Yaromat.com
var args = YY_checkform.arguments; var myDot=true; var myV=''; var myErr='';var addErr=false;var myReq;
for (var i=1; i<args.length;i=i+4){
if (args[i+1].charAt(0)=='#'){myReq=true; args[i+1]=args[i+1].substring(1);}else{myReq=false}
var myObj = MM_findObj(args[i].replace(/\[\d+\]/ig,""));
myV=myObj.value;
if (myObj.type=='text'||myObj.type=='password'||myObj.type=='hidden'){
if (myReq&&myObj.value.length==0){addErr=true}
if ((myV.length>0)&&(args[i+2]==1)){ //fromto
var myMa=args[i+1].split('_');if(isNaN(parseInt(myV))||myV<myMa[0]/1||myV > myMa[1]/1){addErr=true}
} else if ((myV.length>0)&&(args[i+2]==2)){
var rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-z]{2,4}$");if(!rx.test(myV))addErr=true;
} else if ((myV.length>0)&&(args[i+2]==3)){ // date
var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);
if(myAt){
var myD=(myAt[myMa[1]])?myAt[myMa[1]]:1; var myM=myAt[myMa[2]]-1; var myY=myAt[myMa[3]];
var myDate=new Date(myY,myM,myD);
if(myDate.getFullYear()!=myY||myDate.getDate()!=myD||myDate.getMonth()!=myM){addErr=true};
}else{addErr=true}
} else if ((myV.length>0)&&(args[i+2]==4)){ // time
var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);if(!myAt){addErr=true}
} else if (myV.length>0&&args[i+2]==5){ // check this 2
var myObj1 = MM_findObj(args[i+1].replace(/\[\d+\]/ig,""));
if(myObj1.length)myObj1=myObj1[args[i+1].replace(/(.*\[)|(\].*)/ig,"")];
if(!myObj1.checked){addErr=true}
} else if (myV.length>0&&args[i+2]==6){ // the same
var myObj1 = MM_findObj(args[i+1]);
if(myV!=myObj1.value){addErr=true}
}
} else
if (!myObj.type&&myObj.length>0&&myObj[0].type=='radio'){
var myTest = args[i].match(/(.*)\[(\d+)\].*/i);
var myObj1=(myObj.length>1)?myObj[myTest[2]]:myObj;
if (args[i+2]==1&&myObj1&&myObj1.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
if (args[i+2]==2){
var myDot=false;
for(var j=0;j<myObj.length;j++){myDot=myDot||myObj[j].checked}
if(!myDot){myErr+='* ' +args[i+3]+'\n'}
}
} else if (myObj.type=='checkbox'){
if(args[i+2]==1&&myObj.checked==false){addErr=true}
if(args[i+2]==2&&myObj.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
} else if (myObj.type=='select-one'||myObj.type=='select-multiple'){
if(args[i+2]==1&&myObj.selectedIndex/1==0){addErr=true}
}else if (myObj.type=='textarea'){
if(myV.length<args[i+1]){addErr=true}
}
if (addErr){myErr+='* '+args[i+3]+'\n'; addErr=false}
}
if (myErr!=''){alert('資料錯誤 !!!\t\t\t\t\t\n\n'+myErr)}
document.MM_returnValue = (myErr=='');
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF" link="#330099" vlink="#990033" alink="#990033">
<div align="center">
<TABLE cellSpacing=0 cellPadding=0 width=500 border=0>
<TBODY>
<TR borderColor=#ffffff bgColor=#ffffff>
<TD>
<P align=center><IMG height=280
src="http://myweb.hinet.net/home6/astrong/email/ekf_excel_2002_ad_chu.jpg" width=650
border=0></P>
</TD>
</TR>
</TBODY>
</TABLE>
<TABLE width=600 border=0 align=center cellPadding=0 cellSpacing=0 class="words10">
<TBODY>
<TR>
<TD colspan="4" class=words> </TD>
</TR>
<TR vAlign=top>
<TD width="73" nowrap class=words>
<P class=words10><strong>第一單元:</strong> <BR>
</P>
</TD>
<TD width="238" nowrap class=words10>環境的介紹與設定<br>
工作視窗<br>
開啟與儲存檔案<br>
資料的輸入與編輯 1<br>
資料的輸入與編輯 2<br>
自訂清單<br>
複製、搬移與貼上<br>
刪除與清除<br>
欄與列<br>
公式與函數基本格式<br>
SUM、AVERAGE<br>
MAX、MIN、COUNT<br>
LARGE、SMALL、INT、ROUND<br>
資料的排序<br>
設定格式化條件<br></TD>
<TD width="70" nowrap class=words10><strong>第二單元:</strong></TD>
<TD width="219" class=words10>工作表的操作<br>
參照位址的定義<br>
2002預算表實例<br>
學期成績計算實例<br>
九九乘法對照表實例<br>
以工作表製作圖表<br>
圖表選取範圍的修改<br>
圖表的美化<br>
圖表進階的美化<br>
日期和時間的函數<br>
日期和時間的計算<br>
日期和時間的顯示<br>
年齡和年資的計算</TD>
</TR>
<TR vAlign=top>
<TD colspan="4" class=words10> </TD>
</TR>
<TR vAlign=top>
<TD colspan="4" class=words10></TD>
</TR>
<TR vAlign=top>
<TD colspan="4" class=words10> </TD>
</TR>
<TR vAlign=top>
<TD class=words10><strong>第三單元:</strong></TD>
<TD class=words10><p>EXCEL 的選項操作 1<br>
EXCEL 的選項操作 2<br>
VLOOKUP 與 HLOOKUP 函數<br>
小計、篩選圖表綜合應用<br>
插入註解<br>
工作表和工作表的連結<br>
IF 函數 : 成績表實例<br>
工作表的美化<br>
保護檔案工作表與儲存格<br>
</p>
</TD>
<TD class=words10> </TD>
<TD class=words10> </TD>
</TR>
</TBODY>
</TABLE>
<hr size="1" width="610">
<a name="1"></a> <form action="http://f2m.aac.com.tw/f2m.php?F=1041313721" method="POST" name="form1" onSubmit="YY_checkform('form1','訂購人','#q','0','請填寫訂購人姓名','地址','#q','0','請填寫地址','E_Mail','#S','2','請輸入正確的 E-Mail !');return document.MM_returnValue">
<table width="610" border="1" cellspacing="0" cellpadding="0" bordercolor="#000066">
<tr>
<td bordercolor="#000066">
<div align="center">
<table width="608" border="0" cellspacing="2" cellpadding="1" bgcolor="#EEF7FF">
<tr>
<td class="words10" valign="top" colspan="2">
<input type="hidden" name="訂購物品" value="E功夫 EXCEL 2002 教學光碟">
<input type="hidden" name="訂單明細" value="教學光碟(3片)">
</td>
</tr>
<tr>
<td valign="top" colspan="2"><b><font size="4">超值特惠價只要<font color="#CC0000" face="Verdana, Arial, Helvetica, sans-serif"> 399</font> 元</font></b><span class="words10"><font color="#990000">(貨到再付款,已含郵寄處理費
100 元 )</font></span></td>
</tr>
<tr>
<td valign="top" colspan="2"><span class="words10">產品名稱:E 功夫
- EXCEL 2002 教學光碟 ( 內含 3 片光碟 )
<input type="hidden" name="金額" value="399">
</span></td>
</tr>
<tr>
<td valign="top" colspan="2"><span class="words10">姓 名:
<input type="text" name="訂購人" size="8" maxlength="4">
請填寫中文全名 尊稱:
<select name="稱呼" id="稱呼">
<option value=" " selected>請選擇</option>
<option value="先生">先生</option>
<option value="小姐">小姐</option>
<option value="老師">老師</option>
<option value="主任">主任</option>
<option value="組長">組長</option>
</select>
</span></td>
</tr>
<tr>
<td valign="top" colspan="2"><font size="2"> <span class="words10">收件地址:
郵遞區號
<input type="text" name="郵遞區號" value="" size="5" maxlength="5">
<a href="http://isp.pchome.com.tw/code.html" target="_blank">查詢</a> 地址:
<input name="地址" type="text" id="地址" size="40">
</span></font></td>
</tr>
<tr>
<td valign="top" colspan="2"><span class="words10">手 機:
<input type="text" name="手機" size="11" maxlength="11">
公司電話:
<input type="text" name="公司電話" size="12">
住宅電話:
<input type="text" name="住家電話" size="13">
<font color="#990000">★ 請至少填寫一個</font></span></td>
</tr>
<tr>
<td valign="top" colspan="2"><span class="words10">電子郵件:<font color="#990000">
<input type="text" name="E_Mail" size="30">
★ 務必填寫否則無法確認回函!</font></span></td>
</tr>
<tr>
<td valign="top" colspan="2"><span class="words10">送達時段:
<select name=宅配時間 target="_blank">
<option value="09:00-17:00" selected><font size="2">09:00-17:00</font></option>
<option value="09:00-12:00"><font size="2">09:00-12:00</font></option>
<option value="14:00-17:00"><font size="2">14:00-17:00</font></option>
<option value="18:00-21:00"><font size="2">18:00-21:00</font></option>
</select>
</span></td>
</tr>
<tr>
<td valign="top" colspan="2"><span class="words10">交辦事項:
<textarea name="備註" cols="40" rows="5"></textarea>
自由填寫或空白</span></td>
</tr>
<tr valign="top">
<td class="words10" width="72"><font color="#000099">備註:1˙</font></td>
<td class="words10" width="536"><font color="#000099">貨品採宅配寄送方式,常不在家請記得交代家人、管理員或朋友幫忙代收付款。</font></td>
</tr>
<tr valign="top">
<td class="words10" width="72"><font color="#000099"> 2˙</font></td>
<td class="words10" width="536"><font color="#000099">收費採用<b><font color="#990000">【貨到再付款】</font></b>方式,由郵差向您收費,不用再擔心付了錢卻沒收到貨品,這是目前最方便安全的購物服務!因此請您填寫有人當場收件並付款的地址才方便!</font></td>
</tr>
<tr valign="top">
<td class="words10" width="72">
<p class="words10"><font color="#000099"> 3˙</font></p>
</td>
<td class="words10" width="536"><font color="#000099">24小時內若無電話或
email 確認,請再送出一次!!</font></td>
</tr>
<tr>
<td class="words10" colspan="2">
<div align="center">
<input type="submit" name="Submit" value="確定送出">
<input type="reset" name="Submit2" value="清除重填">
</div>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
<br>
</form>
</div>
</body>
</html><HR>
<CENTER>
<FORM ACTION="mailto:chusu@pchome.com.tw" METHOD="Post" ENCTYPE="text/plain">
如果您不想再收到相關訊息,請輸入您的電子郵件:<INPUT TYPE="Text" NAME="UnsubscribeMail" SIZE="10">
<INPUT TYPE="Submit" VALUE="送出">
</FORM>
</CENTER>