易截截图软件、单文件、免安装、纯绿色、仅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>


相关文档:

c# 验证码组件 可vb,asp,net调用

      今天公司要求用C#写个验证码组件,让asp可以调用,在网上找了一堆资料,终于给我给搞出来了,因为本人第一次写组件,也是第一次发表文章,所有可能说的不是很好,大家请见谅。
      csdn上有这么篇文章,想学习写组件的可以去看看:http://blog.csdn.net/KimmKi ......

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读取文本内容

'**************************************************    
'函数名:FSOFileRead    
'作 用:使用FSO读取文件内容的函数    
'参 数:filename ----文件名称    
'返回值:文件内容    
'************** ......

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号