ʹÓÃASP·¢ËÍ·ÉÐŵÄÃâ·Ñ¶ÌÐÅ
ʹÓÃASP·¢ËÍ·ÉÐŵÄÃâ·Ñ¶ÌÐÅ
ҪʵÏÖÔÚaspÍøÕ¾ÉÏ·¢ËÍ·ÉÐÅ£¬ÒªÇóÊÇÖйúÒÆ¶¯µÄÊÖ»úÓû§£¬²¢ÇÒ¿ªÍ¨Òƶ¯·ÉÐŹ¦ÄÜ¡£
ʹÓÃÒÔÏÂasp´úÂ룬Ð޸IJÎÊýΪÄãµÄÊÖ»úºÅ¼°·ÉÐÅÃÜÂ룬¾Í¿ÉÒÔʵÏÖÔÚÍøÕ¾·¢Ãâ·Ñ¶ÌÐŹ¦ÄÜ¡£
fsend.aspÎļþÔ´´úÂëÈçÏ£º
<%
Dim fno,fp,tofno,rurl
fno="138xxxxxxxx" 'ÊÖ»úºÅ
fp="xxxxxxxx" '·ÉÐÅÃÜÂë
tofno="137xxxxxxxx" '·¢ËÍÄ¿±êÊÖ»úºÅ(ÒªÇóÊÇ×Ô¼ºµÄºÅÂë»ò·ÉÐźÃÓÑ)
rurl="" 'Ìá½»ºó×ªÒÆµ½µÄÄ¿±êµØÖ·(Áô¿Õ½«²»×ªÒÆ)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>ÇëÁôÏÂÄãµÄÁªÏµÐÅÏ¢</title>
</head>
<body style="font-size: 10pt; font-family: ËÎÌå">
<%if (Request("msg")="") then%>
<form method="POST" action="fsend.asp">
<br>ÇëÁôÏÂÄãµÄÁªÏµÐÅÏ¢<br>
<hr>
ÁªÏµÐÅÏ¢:<br><textarea rows="5" name="msg" cols="27"></textarea><br>
<p><input type="submit" value="Ìá½»" name="B1"></p>
</form>
<%
else
Dim returnString
Dim msg
msg=Request("msg")
returnString=sendf(fno,fp,tofno,msg)
if rurl="" then
Response.Write returnString&"<br><a href='fsend.asp'>·µ»Ø</a>"
else
Response.Redirect rurl
end if
end if
%>
</body>
</html>
<%
function sendf(fno,fp,tofno,msg)
'º¯Êý²ÎÊý˵Ã÷:fno=µÇ¼ÊÖ»úºÅ,fp=µÇ¼ÃÜÂë,tofno=Ä¿±êÊÖ»úºÅ,msg=Òª·¢Ë͵ÄÐÅÏ¢
Dim
Ïà¹ØÎĵµ£º
'**************************************************
'º¯ÊýÃû£ºFSOFileRead
'×÷ ÓãºÊ¹ÓÃFSO¶ÁÈ¡ÎļþÄÚÈݵĺ¯Êý
'²Î Êý£ºfilename ----ÎļþÃû³Æ
'·µ»ØÖµ£ºÎļþÄÚÈÝ
'************** ......
Òý×Ô£ºhttp://blog.csdn.net/yizia/archive/2006/09/19/1248669.aspx
·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄÇé¿öÓÐÒÔϼ¸ÖÖ£º
1£©·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄaccessÊý¾Ý¿â
2£©·ÃÎÊÔ¶³ÌmssqlÊý¾Ý¿â»òoracleµÈÆäËû¹ØÏµÊý¾Ý¿â£¬µ«ÊÇÊý¾Ý¿âͨÐŶ˿ڱ»·À»ðǽ×èµ²»òÆäËûÍøÂçÔÒòÔì³ÉÎÞ·¨Ê¹Óøö˿Ú
±¾ÎĽöÔÚwindows2000 advance server,mdac2.8ϲâÊÔͨ¹ý£ ......
<%@Language="VBScript" CodePage="65001"%>
<% option explicit%>
<% on error resume next %>
<% Session.CodePage="65001" %>
<% response.charset="utf-8" %>
<%
dim conn,connstr,sql,rs,rs2,rs3
connstr="dbq=" & server.MapPath("../data091003/data09 ......
Õâ¶Î´úÂëµÄ¹¦ÄÜÊÇ£º½«Ò»¸öÊý×é´òÂÒ˳Ðò£¬ÏÔʾ³öÀ´£¬ÈÃÿһ´ÎÏÔʾµÄ˳Ðò¶¼²»Ò»Ñù¡£
<%
Dim tt
tt=Split("1,2,3,4,5,6",",")
'Ëæ»úÅÅÐò
leng=UBound(tt)
randomize
for ii=0 to leng-1
b=int(rnd()*leng)
temp=tt(b)
tt(b ......
±àд¹ý³Ì
¹ý³ÌÊÇÒ»×éÄÜÖ´ÐÐÖ¸¶¨ÈÎÎñÇÒ¾ßÓзµ»ØÖµµÄ½Å±¾ÃüÁî¡£Äú¿ÉÒÔ¶¨Òå×Ô¼ºµÄ¹ý³Ì£¬È»ºóÔڽű¾Öз´¸´µ÷ÓÃËüÃÇ¡£
Äú¿ÉÒÔ½«¹ý³Ì¶¨Òå·ÅÔÚµ÷Óùý³ÌµÄ .asp ÎļþÖУ¬Ò²¿ÉÒÔ½«Í¨Óùý³Ì·ÅÔÚÒ»¸ö¹²ÏíµÄ .asp ÎļþÖУ¬È»ºóÓà SSI #include Ö¸ÁÆä°üº¬½øÆäËûµ÷ÓÃÆä¹ý³ÌµÄ .asp ÎļþÖС£Äú»¹¿ÉÑ¡ÔñÁíÒ»ÖÖ·½·¨£¬¼´°ÑÕâЩ¹¦ÄÜ´ò°ü ......