Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ʹÓÃ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


Ïà¹ØÎĵµ£º

ASPдµÄÅúÁ¿µ¼³öIISÓòÃûÁбí

×î½ü¹À¼ÆºÜ¶àÈ˶¼Åöµ½ºÍÎÒͬÑùµÄÎÊÌ⣬¾ÍÊÇÒòΪɨ»Æ¼°±¸°¸¹ÜÀí·Ç³£ÑÏ£¬Ò»¸öû±¸°¸Ö±½Ó¹Ø·þÎñÆ÷£¬Ò»¸ö»ÆÕ¾Ö±½Ó·â»ú·¿¡£ÏÖÔÚÍøÕ¾ËùÓÐÓòÃû±ØÐèͨ¹ý±¸°¸£¬ÒÔǰ»¹Ëɵ㡣µ«ÎÒÃÇ·þÎñÆ÷100¶à¸ö£¬×ܲ»ÄÜÒ»¸öÒ»¸ö¼ì²é°É£¬ÉÏÍøËÑÁËÏ£¬Óиö³ÌÐòÉÔºÏÊÊ£¬µ«µ¼³öµÄÊÇÍøÕ¾ÓòÃûÕ¾µãÃû£¬ÎÒÐÞ¸ÄΪµ¼³öÓòÃûÁÐ±í£¬Í¬Ê±½â¾öÁ˵¼³öÒ»¸öÕ¾µã°ó¶¨¶à¸ ......

ASPÖÐByValÓëByRefµÄÇø±ð

·Ï»°²»¶à˵£¬Ìù´úÂ룺
ÏÈÀ´¿´¿´ByVal´«Öµ£º
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Call sub1(arr)
Sub sub1(ByVal a)
a(0) = 9
a(1) = 8
a(2) = 7
Response.Write("ÎÒÔÚsub¹ý³ÌÖиü¸ÄÁËÖµ£º"&a(0)&","&a(1)&","&a(2))
......

aspÖеÄrs.openÓÚconn.executeµÄÇø±ð

aspÖеÄrs.openÓÚconn.executeµÄÇø±ð
    rs.open sql,conn£ºÈç¹ûsqlÊÇdelete,update,insertÔò»á·µ»ØÒ»¸ö¹Ø±ÕµÄ¼Ç¼¼¯£¬ÔÚʹÓùý³ÌÖв»ÒªÀ´¸örs.closeÔÚÎļþ×îºóÔÙдrs.close
    Öмä¿ÉÒÔÀ´¶à¸ö¼Ç¼¼¯rs1.open sql1,conn£¬×îºóÒ»¿é¹Ø±Õ¼Ç¼¼¯:rs.close rs1.close
    con ......

asp utf 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 ......

asp /asp.net c#Á´½ÓOrcale Êý¾Ý¿âµÄ·½°¸

1£¬ÔÚweb·þÎñÆ÷Éϰ²×°OracleÊý¾Ý¿â¿Í»§¶Ë£¬ÕâÊÇÁ¬½ÓOracleÊý¾Ý¿âµÄ»ù´¡£¨µ«£¬²»Ò»¶¨ÊDZØÐëµÄ£©¡£
2£¬ÔÚ¿Í»§¶ËµÄNet Manager ÖнøÐÐÅäÖ÷þÎñµÄÃû³Æ£¬ÅäÖÃÈçͼ£¨ÕâÒ»µã·Ç³£µÄÖØÒªÒÔºóµÄÁ´½ÓÈ«¶¼ÔÚÕâ¸ö·þÎñÃû³ÆµÄ»ù´¡ÉϽøÐеģ©
3£¬ASPÁ´½Ó·þÎñµÄÁ´½Ó×Ö·û´®ºÍ·½·¨ÈçÏ£º
<%
connstr= "Provider=MSDAORA.1;Password=***; ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ