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

ʹÓÃ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 returnString
    Dim SoapRequest
 &n


Ïà¹ØÎĵµ£º

ÓÃASPʵÏÖ¶þ¼¶ÓòÃû

 






ÓÃASPʵÏÖ¶þ¼¶ÓòÃû
Òª´ïµ½¶þ¼¶ÃûµÄЧ¹û£¬±ØÐëÒ»ÏÂÌõ¼þÒÔ¼°Á÷³Ì£º
1¡¢±ØÐëÓÐÒ»¸ö¶¥¼¶ÓòÃû£¬¶øÇÒ´ËÓòÃû±ØÐë×öºÃ·º½âÎö²¢×öºÃÖ¸Ïò¡£
2¡¢±ØÐëÓÐһ̨¶ÀÁ¢µÄ·þÎñÆ÷¡£·º½âÎöµÄÓòÃûÖ¸Ïò¸Ã·þÎñÆ÷¡£
3¡¢ÔÚ·þÎñÆ÷ÉϵÄIIS½¨Ò»¸ö¿ÕµÄÖ÷»úÍ·ÃûµÄwebÕ¾µã¡£
4¡¢½«Ä¬ÈϵÄÒ³ÃæÉèÖÃΪÄãµÄ¶þ¼¶½âÎö³ÌÐ ......

ASPÈ¡²»Öظ´µÄËæ»úÊý

dim arr(36),xx,tt,tmp
for xx=1 to 36
arr(xx-1)=xx
next

for xx=1 to 5
Randomize
tt=clng((ubound(arr)-xx)*rnd())
response.write(arr(tt) & "<br>")

tmp=arr(tt)
arr(tt)=arr(ubound(arr)-xx)
arr(ubou ......

[ASPÖÐʹÓÃÈý²ã¼Ü¹¹] 9.Óû§µÇ¼֮һ User±íÓëÏà¹ØÀà

    ½ÓÏÂÀ´¿ªÊ¼½²½âÈçºÎÓÃÈý²ã¼Ü¹¹À´½¨Á¢Óû§µÇ¼¹ý³Ì.
    Õâ¸ö¹ý³ÌÓÃÒ»°ãµÄ±à³Ì·½Ê½Ð´ÆðÀ´ºÜ¼òµ¥,´ÓÕâÀïÈëÊÖÀ´½²½âÈý²ã¼Ü¹¹µÄʵÀý,Ïë±Ø´ó¼Ò¶¼»á¸üÈÝÒ×Á˽âÆäÖеÄÂß¼­½á¹¹.
   
    Ê×ÏÈÎÒÃÇ×öһЩ׼±¸¹¤×÷,¹¹ÔìÕâ¸öÒµÎñÐèÒªÓõ½µÄ¼¸¸öÀà,ÆäÖаüÀ¨Èý¸ö²¿ ......

asp³¤ÎÄÕ·ÖÒ³ÊÕ¼¯´æµµ

<%
if Request.QueryString("pageNo")="" then
PageNo=1
elseif IsNumeric(Request.QueryString("pageNo"))=false then
PageNo=1
else
PageNo=clng(Request.QueryString("pageNo"))
end if
´ò¿ªÊý¾Ý±í..²»Ð´Á˹þ.
set rs=server.CreateObject("adodb.recordset")
sql="............"
rs.open sql, ......

asp:chart ¿Ø¼þ»­Öù״ͼºÍ±ýͼ

          HTML²¿·Ö£º
        <asp:Chart ID="ChartBar" runat="server" Width="800px"   BackColor="#FFFFCC" Palette="BrightPastel" BorderWidth = "2" BorderColor = "#cc9900" >
    & ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ