file_name=web_dim(6)&"style/data_link_cms.js"
  filetype=links_txt("txt",7)
  call create_file(file_name,filetype)



function links_txt(lt,nummer)

查看更多...

<%Class ImgWHInfo '获取图片宽度和高度的类，支持JPG，GIF，PNG，BMP
    Dim ASO
    Private Sub Class_Initialize
        Set ASO=Server.CreateObject("ADODB.Stream")
        ASO.Mode=3
        ASO.Type=1
        ASO.Open

查看更多...

<script language="javascript">
            function window.onload()
            {
                var div = window.parent.document.getElementById('div1');
                div.style.height=document.body.scrollHeight+20;
            }
        </script>

查看更多...

Tags: 框架框架

脚本1:进入主页以后自动播放声音 
<embed src="pnm://10.13.31.90/~kayvin/mihunji.rm" hidden=true autostart=true loop=true> 

脚本2:进入主页后自动最大话,省的去在自己单击了 
<script> 
self.moveTo(0,0) 
self.resizeTo(screen.availWidth,screen.availHeight) 

查看更多...

该日志是私密日志，只有管理员或发布者可以查看！

<script language="javascript">
<!--
function IsDigit(){
  return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
// -->
</script><SCRIPT language=JavaScript>

查看更多...

该日志是私密日志，只有管理员或发布者可以查看！

call web_head(0,0,3,0,0)
改为
call web_head(0,0,0,0,0)
再在
response.write vbcrlf&"article_view1("&id&",'"&topic&"','"&joekoe_cms.time_type(tim,5)&"','"&comto&"','"&author&"');"
之上插入下列行
call web_center(0)

查看更多...

①、打开index2.asp，查找
  <table border=0 cellspacing=0 cellpadding=0 width="100%">
  <tr valign=top>
  <td align=center><%call web_search()%></td>
  </tr>
  </table>
  替换为：

查看更多...

执行一条SQL语句，需要返回记录集
sql="selet top 10 id.topic,tim from news where hidden=1 order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  '...
  rs.movenext
loop

查看更多...