|
CA-105 ±þµß·À¾þ¾¯ |
CA-125 ¨¾«¯¨¾ùפô³B²z¾¯ |
CA-117 ´â¿õ |
CA 102 ¤ô«¯²M¬~¾¯ |
CA-135 ¦B¤ô»G»k§í¨î¾¯ |
CA-205 ¤Æ¾Ç°£«¯¾¯ |
CA-305 ¾TÅ_¤ù²M¬~¾¯ |
CA-405 ¤u·~¥Î¤ô·»©Ê²M¬~¾¯ |
CA-110 ®øªw¾¯ |
CA-473 ·L¥Íª«¤À´²¾¯ |
CA-205S ª¿½è¤ô«¯³n¤Æ¾¯ |
§J¤O¥Û-30
¤p«¬ªÅ½Õ¨t²Î§N«o¤ô³B²z¾¯ |
|
|
|
|
|
<%
If Request.Form("send")="ok" Then
name=trim(request.Form("name"))
address=trim(request.Form("address"))
cell=trim(request.Form("cell"))
phone=trim(request.Form("phone"))
fax=trim(request.Form("fax"))
email=trim(request.Form("email"))
contents=trim(request.Form("contents"))
Set mail = CreateObject("CDO.Message")
mail.Subject = "WEB-MESSAGE"
mail.From = "WEB-MESSAGE"
mail.To = "ca583079@ms64.hinet.net"
mail.TextBody = "©m¦W¡G"&Name&"¡C¦a§}¡G"&address&"¡C¤â¾÷¡G"&cell&"¡C¹q¸Ü¡G"&phone&"¡C¶Ç¯u¡G"&fax&"¡C¹q¶l¡G"&email&"¡C¤º®e¡G"&contents
mail.Send
%>
<%
End If
%>
|
|