如何在asp生成静态页面前替换原来页面中的内容

来源:百度知道 编辑:UC知道 时间:2024/05/27 11:39:12
我现在要生成一个静态新闻列表页面 下面的列表分页原来是asp的 比如<a href=XXX.asp?page=2 target=_parent
<a href=XXX.asp?page=3 target=_parent
现在我要把XXX.asp?page=替换成list_
然后把 target=_parent替换成.html
好实现静态分页

一下是代码

<%
dim strUrl,Item_Classid,id,FileName,FilePath,Do_Url,Html_Temp,ss,tt
Html_Temp="<UL>"
For i=1 To 3
Html_Temp = Html_Temp&"<LI>"
Item_Classid = i
FileName = "list"&Item_Classid&".htm"
FilePath = Server.MapPath("/")&"\"&FileName
Html_Temp = Html_Temp&FilePath&"</LI>"
Do_Url = "http://"
Do_Url = Do_Url&Request.Servervariables("SERVER_NAME")&"/indexx.asp"
Do_Url = Do_Url&"?page="&Item_Classid
strUrl = Do_Url
dim objXmlHttp
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",strUrl,false
o

建立access的数据库news,还有表news,表的字段(id,title),id唯一,输入数据保存,用下面代码可查询,可分页
-----------------------下面保存为search.asp--------------------------
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>文件</title>
</head>
<body bgcolor="#ffffff">
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<script>
function btn_ck_bh_Click()
{
var cx = document.form1.cxsj.value;
form1.action ="search.asp?cx="+cx;
}
</script>
<table border="1" cellspacing="0" bgcolor="#F0F8FF" bordercolorlight="#4DA6FF" bordercolordark="#ECF5FF" width="88%" style="word-break:break-all">
<tr>
<td width="778" align="center" colspan="7">
<form me