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

asp ÎÄ×ÖÑ­»·¹ö¶¯£¨up£©

<div id="storyScroller" style="width:100%;height:140px;line-height:28px;overflow:hidden;">
 <div id="storyScrollMid">
  <ul id="storyScrollUl" style=" list-style-type:circle; list-style-position: outside; margin-left:18px; margin-right:0px">
<li>item01</li>
<li>item02</li>
<li>item03</li>
<li>item04</li>
<li>item05</li>
<li>item06</li>
<li>item07</li>
<li>item08</li>
    </ul>
 </div>
</div>
<script type="text/javascript">
var scrollstory = document.getElementById('storyScroller');
var storycontainer = document.getElementById('storyScrollMid');
var storyliHeight;
var storylis = storycontainer.getElementsByTagName('li');
var isstory_stop = 0;
scrollstory.onmouseover = function() { isstory_stop = 1; }
scrollstory.onmouseout = function() { isstory_stop = 0; }
function story_scroller(){
 var story_step = 1;
 var timer1 = setInterval(function(){
 if(isstory_stop) return false;
 storyliHeight = storylis[0].offsetHeight;
 var timer2 = setInterval(function(){
 scrollstory.scrollTop += story_step;
 if(scrollstory.scrollTop >= storyliHeight){
  clearInterval(timer2);
  storylis[0].parentNode.appendChild(storylis[0]);
  scrollstory.scrollTop = 0;
            }
          },10);
          },5000);
       }
story_scroller();
</script>


Ïà¹ØÎĵµ£º

asp Éú³É¾²Ì¬

<%
Do_Url = "http://"
'Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")&"/shownews.asp" Ö÷Ŀ¼
aa=Request.Servervariables("url") 'ÐéÄâĿ¼
bb=InstrRev(aa,"/")
cc=left(aa,bb)
Do_Url = Do_Url&Request.ServerVariables("HTTP_HOST")&cc&"index.asp"
call SaveFile("index.h ......

asp»ñÈ¡ipµØÖ·

Õª×Ô£ºhttp://shawangkun.woku.com/article/2723424.html
×î¼òµ¥µÄÓÃÒÔÏÂÓï¾ä:
ip=request.ServerVariables("REMOTE_ADDR")
response.Write(ip)
µ«ÕâÖÖ·½·¨¶Ô´úÀí·þÎñÆ÷ÉÏÍøµÄ¾Í²»×¼ÁË,¹Ê±È½ÏÈ«ÃæµÄÊÇÓÃÏÂÃæµÄ·½·¨:
<%Private Function getIP()
Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_F ......

asp 11ÖÐÁ¬½ÓÊý¾Ý¿âµÄ·½·¨

¡¡ASPÁ¬½ÓÊý¾Ý¿âµÄ11ÖÖ·½·¨——±¾ÎÄ×ܽáÁËʹÓÃASPÁ´½Ó¸÷ÖÖÊý¾Ý¿âµÄ·½·¨£º
¡¡¡¡1.AccessÊý¾Ý¿âµÄDSN-lessÁ¬½Ó·½·¨:
set adocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.MapPath("Êý¾Ý¿âËùÔÚ·¾¶")
¡¡¡¡2.Access OLE DBÁ¬½Ó·½·¨£ ......

PHP±ÈASPÓÅÐãµÄÆß¸öÀíÓÉ ÄÏÈý·½

ASPÊÇ΢Èí¹«Ë¾ÊµÏÖ¶¯Ì¬ÍøÒ³µÄÒ»ÖÖ¼¼Êõ¡£
ASPÖ§³ÖһЩ½Å±¾ÓïÑÔ£¬Ö÷ÒªÒÔVBScriptΪÖ÷¡£
ÓëASPÏà±È½Ï£¬Ä㻹¿ÉÒÔÑ¡ÔñÁíÒ»Öпª·ÅÔ´´úÂë±à³ÌÓïÑÔ——PHP£¬PHP¿ÉÒÔÔËÐÐÔÚ¶àÖÖ²Ù×÷ϵͳÏ£¬ÆäÖаüÀ¨LinuxºÍwindows¡£
ËäÈ»ASPÊÇÒ»ÖÖ²»´íµÄ¼¼Êõ£¬µ«´Ó³¤Ô¶¿¼ÂÇÎÒÏàÐÅPHPÔÚ½«À´µÄ¼¼ÊõÁìÓòÀï»áÓв»·²µÄ±íÏÖ¡£
ÎÒÈÏΪÓÐÆß¸ ......

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))
......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ