获取页面的HTML
<script>
var oXmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
oXmlHttp.open("GET","http://www.163.com", false);
oXmlHttp.send()
var oStream = new ActiveXObject("ADODB.Stream");
if(oStream == null)
alert("您的机器不支持ADODB.Stream.")
else
{
oStream.Type=1;
oStream.Mode=3;
oStream.Open() ;
oStream.Write(oXmlHttp.responseBody);
oStream.Position= 0;
oStream.Type= 2;
oStream.Charset="gb2312";
var result= oStream.ReadText();
oStream.Close();
oStream = null;
var aa = window.open("","")
document.write(result);
aa.document.write(result);
}
</script>
[新开一个窗口]============================================================================================================
window.open('filename','','toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizable=1,width=400,height=570,top=200,left=300,bottom=0,right=0');
[关于JS调用]============================================================================================================
new.asp(调用文件)
<%
str = "循环取的要调用的数据"
'关键是下面这句,调用document函数打印输入str值--->
%>
document.write('<%=str%>')
OK,结束,在其他要调用的页面插入
<script language="javascript" src="new文件所在目录/news.asp></script>
[打开一个窗口,并且关闭当前窗口]============================================================================================================
<script language="JavaScript">
//-->
window.open('MenuMain.asp','','toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizable=1,width=,height=,top=0,left=0,bottom=0,right=0');
window.opener = "meizz"; //加了这句代码IE5.5+不会有关闭提示
window.close();
//--
</script>
[分页显示记录]============================================================================================================
一.
<%
dim MaxPerPage
dim totalPage
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
%>
二.
<%
set rs=server.createobject("adodb.recordset")
sql="select top 20 * from person order by id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "没有任何人才信息"
else
rs.pagesize=10
MaxPerPage=rs.pagesize
totalPage=rs.pagecount
if CurrentPage<1 then
CurrentPage=1
end if
if CurrentPage>totalPage then
CurrentPage=totalPage
end if
if CurrentPage>1 then
rs.move (CurrentPage-1)*MaxPerPage
dim bookmark
bookmark rs.bookmark
end if
i=1
do while not rs.eof and i<=10
%>
......本页显示的数据
<%
i=i+1
rs.movenext
loop
end if
rs.close
%>
三.
<a href="allrencai.asp?page=1>第一页  </a>
<a href="allrencai.asp?page=<%=CurrentPage-1%>上一页 </a>
<a href="allrencai.asp?page=<%=CurrentPage+1%>">下一页 </a>
<a href="allrencai.asp?page=<%=totalPage%>最末页</a>
按照上面的模式套进去就可以了,应该没什么问题!
[获取用户IP]============================================================================================================
request.servervariables("remote_addr")
[对象的显示与隐藏(style.display的应用)]============================================================================================================
document.name.style.display="none"; //隐藏
document.name.style.display="block"; //显示
[改变文本字体大小]============================================================================================================
<SCRIPT LANGUAGE="JavaScript">
<!--
function fontZoom(size)
{
document.getElementById("fontzoom").style.fontSize=size+"px"
}
//-->
</SCRIPT>
<TABLE>
<TR>
<TD id="fontzoom">1234fsdfsdfasd234234311dfasdfsd23</TD>
<TD><a href="javascript:fontZoom(12)">12</a></TD>
<TD><a href="javascript:fontZoom(18)">18</a></TD>
</TR>
</TABLE>
[随机抽取记录]============================================================================================================
rs.moveFirst
randomize
rs.move int(rnd*rs.recordCount)
[获取ID为R1的RADIO的值]============================================================================================================
<FORM name="form1" METHOD=POST ACTION="">
<INPUT type=radio value=l name="r1">左对齐
<INPUT type=radio value=r name="r1">右对齐
<INPUT type=radio CHECKED value=m name="r1">中间对齐
<INPUT type=radio value=s name="r1">两端对齐
<INPUT TYPE="button" name="cmd" value="getValue" onclick="getValue()">
</FORM>
<script language="javascript">
<!--
function getValue()
{
var msg="";
var i=0;
for(i=0;i<document.all.form1.r1.length;i++)
if(document.all.form1.r1[i].checked)alert(document.all.form1.r1[i].value);
}
-->
</script>
[向一个frame中载入页面]============================================================================================================
<HTML>
<HEAD>
<script language="JavaScript">
<!-- Hiding
function loadtwo(page2, page3) {
parent.fr2.location.href=page2;
parent.fr3.location.href=page3;
}
// -->
</script>
</HEAD>
<BODY>
<FORM NAME="buttons">
<INPUT TYPE="button" VALUE="同 时 载 入 两 份 文 件" onClick="loadtwo('frtest1.html',
'frtest2.html')">
</FORM>
</BODY>
</HTML>
[ASP动态输出一个图片或FLASH]============================================================================================================
<%
if rsDB("fileType")<>"SWF" then
%>
<a href="<%=rsDB("linkURL")%>" name="logoIMGLINK" target="_blank"><img src="/admin/adver/upload/<%=rsDB("id")%>.<%=rsDB("filetype")%>" width="550" height="100" name="logoIMG" border="0"></a>
<%
else
response.Write("<object classid=""clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"" codebase=""http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0"" width=""550"" height=""100""> <param name=""movie"" value=""/admin/adver/upload/"+cstr(rsDB("id"))+"."+rsDB("filetype")+"""> <param name=""quality"" value=""high""> <embed src=""/admin/adver/upload/"+cstr(rsDB("id"))+"."+rsDB("filetype")+" quality=""high"" pluginspage=""http://www.macromedia.com/go/getflashplayer"" type=""application/x-shockwave-flash"" width=""550"" height=""100""></embed></object>")
end if
%>
[连接SQL数据库]============================================================================================================
set dcnDB = server.createobject("ADODB.CONNECTION")
dcnDB.open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=帐号;pwd=密码;Initial Catalog=表名;Data Source=数据库IP(localhost本地)"
set rsDB = server.createobject("ADODB.RECORDSET")
[模糊查找(SQL数据库)]============================================================================================================
sql="SELECT * FROM [USER] WHERE User_Name like '%XXXXX%'"
[SQL数据库中时间的表示方法]============================================================================================================
sql="SELECT * FROM [USER] WHERE [date]<'2004-4-7'"
[浮动广告]============================================================================================================
第一步:把如下代码加入<head>区域中
<script language="JavaScript">
<!--//
//设置下面一些参数,小球移动速度1-50,数值大速度快;
var ballWidth = 40;
var ballHeight = 40;
var BallSpeed = 10;
var maxBallSpeed = 50;
var xMax;
var yMax;
var xPos = 0;
var yPos = 0;
var xDir = 'right'; //水平方向向右移动
var yDir = 'down'; //垂直方向向下移动
var superballRunning = true;
var tempBallSpeed;
var currentBallSrc;
var newXDir;
var newYDir;
function initializeBall() {
if (document.all) {
xMax = document.body.clientWidth
yMax = document.body.clientHeight
document.all("superball").style.visibility = "visible";
}
else if (document.layers) {
xMax = window.innerWidth;
yMax = window.innerHeight;
document.layers["superball"].visibility = "show";