首页 > 语言 > 关键词  > 正文

ASP程序实现网页伪静态页源代码

2008-04-18 11:59 · 稿源:建站学

很简单的教程,献给喜欢SEO的朋友们。把https://www.***.cn/article.asp?logID=26 替换成https://www.***.cn/article.asp?/a26.html。不需要通过iis+ISAPI_Rewrite做基于IIS的url rewrite

一、数据库很简单使用ACCESS,Data.mdb建立一个表Article,三个字段:ID,Title,Content;自动编号、标题、文章内容。

二、Config.asp
ASP/Visual Basic代码

以下为引用的内容:
<%
'数据库链接
db="data.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.open connstr
If Err Then
err.Clear
Set conn = Nothing
Response.Write "数据库连接出错,请检查连接字串。"
Response.End
End If
'定义新闻阅读界面的读取
Dim News_title,News_content
Sub ReadNews()
set rs1=server.createobject("adodb.recordset")
sql1="select id,title,content from article where id="& ID
rs1.open sql1,conn,3,3
News_title=rs1("title")
News_content=rs1("content")
rs1.close
set rs1=Nothing
End Sub
%>

三、Default.asp

以下为引用的内容:
ASP/Visual Basic代码
<!--#include file="config.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset")
sql="select * from Article"
rs.open sql,conn,1,1
do while not rs.eof
%>
<li><a href="article.asp?/<%=rs("id")%>.html"><%=left(trim(rs("title")),30)%></a></li>
<%
rs.movenext
loop
rs.close
set rs=Nothing
%>
</ol>

四、Article.asp

ASP/Visual Basic代码

以下为引用的内容:
<!--#include file="config.asp"-->
<%
id=request.QueryString("id")
If id="" Then
server_v40=Request.ServerVariables("QUERY_STRING")
id=Int(replace(replace(server_v40,"/",""),".html",""))
End If
Call ReadNews()
%>
<div>
标题: <b><%= News_title%></b><br />
内容: <%=News_content%>
</div>

这个教程已经能实现最基本的功能,具体大家就想怎么应用就八仙过海,各显神通了!

举报

  • 相关推荐
  • AI日报:阿里通义推Qwen-TTS模型;Cursor已支持网页和手机端;字节发布图像合成技术XVerse

    【AI日报】今日AI领域7大突破:1)阿里通义Qwen-TTS实现方言语音合成重大突破;2)Cursor发布Web版AI编程工具;3)字节XVerse技术实现多对象精准图像生成;4)NoteGen跨平台AI笔记工具革新知识管理;5)ManimML动画库可视化Transformer架构;6)TEN+Agent开源语音交互技术降低延迟;7)Chai-2抗体设计模型将药物研发周期缩短至两周。淘宝同时上线RecGPT推荐模型提升购物体验。

  • 27岁程序员敲代码时视网膜脱离 眼科医生提醒高危人群

    ​近日, 27 岁的合肥程序员小李经历了一场惊心动魄的健康危机。凌晨 2 点,连续加班数小时的他突然发现电脑屏幕上的代码扭曲变形,视野上方浮现固定黑影,紧急就医后被确诊为孔源性视网膜脱离,且病变已累及视觉中枢黄斑区。经眼科专家连夜实施视网膜复位手术,其右眼视力虽未完全恢复至术前水平,但已保住基本视觉功能。 "这类疾病就像'眼球内的地震'�

  • 销售易多页签能力上新:N个任务1屏聚合,丝滑体验0切换

    文章探讨了数字化办公时代CRM系统面临的两大痛点:1)多页面切换导致效率低下,如电销人员需同时处理多个客户咨询时,浏览器标签堆积造成混乱;2)业务流程跳转碎片化,如大客户经理需在不同模块间反复切换导致数据丢失。销售易CRM推出的多页签浏览模式通过分屏协作、多任务并行,显著提升了工作效率:电销人员单客户处理时间缩短33%,信息遗漏减少90%;大客户经理复�

  • 用心良苦不提降价!苹果发布81页幻灯片帮孩子说服父母买 Mac

    今日,有媒体报道称,苹果公司最新推出了一份长达81页的《家长推介》演示文稿,以帮助孩子说服父母将Mac作为学习设备收入囊中。 这份演示文稿目标受众明确指向学生群体,且十分贴心,提供了PowerPoint、Google Slides和Keynote等多种格式,方便不同使用习惯的学生使用。

  • 连打40万页创世界纪录,奔图“扛打”护航2025天津夏季达沃斯

    奔图打印机在2025年天津夏季达沃斯会议上发布新款"扛打"系列产品,以连续打印40万页、卡纸率低于0.02‰的卓越性能打破世界纪录,成为会议指定服务用机。该系列通过WRCA认证,获得"世界卓越的扛打耐用打印机"证书,展现了中国打印产业的技术突破。奔图建立了覆盖全国的快速响应服务体系,推出"三年20万页"超长质保服务,并针对物流、医疗等行业痛点提供解决方案。作为中国唯一掌握激光打印核心技术的品牌,奔图产品已热销全球110多个国家和地区,累计下线超2000万台,连续8年保持全球增速第一,推动中国打印产业从技术突围向创新引领转变。

  • 程序员被解雇 怒改公司所有密码!获刑7个月铁窗泪

    在英国西约克郡,一位被解雇IT技术人员因心怀怨恨,对雇主公司发动了一场数字攻击,最终被判处7个月零14天的监禁。 根据警方的公告,2022年7月,Mohammed Umar Taj在被公司暂停工作后的数小时内,便开始实施恶意的 数字暴行”。 他非法侵入公司系统,擅自更改登录凭证,还破坏了公司的多因素身份验证系统,致使公司日常运营受到严重干扰,造成至少20万美元的损失。 公�

  • 腾讯元宝上线AI编程模式:双栏界面实现边提需求边写代码

    今日,腾讯元宝发布更新,上线AI编程模式。 用户在电脑版选择DeepSeek模型并关闭深度思考后,输入@AI编程”后,即可进入AI编程模式。

  • 天九共享免费开放低代码,助力100万家企业低成本数智化

    6月18日,天九数科集团宣布其低代码平台正式面向全球免费开放。该平台通过可视化拖拽、模块化组件等功能,可快速搭建ERP、CRM等管理系统,显著降低中小企业数字化转型门槛。目前中国中小企业数字化率不足20%,面临"不愿转、不敢转、不会转"困境。天九平台具有零成本接入、高效部署等优势,已帮助某餐饮企业一周内建成智能订货系统,人工误差减少30%。集团计划未来3年服务超100万家企业,助力实现2027年中小企业上云率超40%的政策目标,推动普惠数字经济发展。

  • 余承东:开源鸿蒙代码规模超1.3亿行 软硬件产品数量超1200款

    今日,华为开发者大会(HDC2025)在广东东莞松山湖盛大举行。华为常务董事、终端BG董事长余承东以“共建共享鸿蒙新世界”为主题发表演讲,介绍了开源鸿蒙的最新发展情况。 余承东指出,开源鸿蒙代码规模已超过1.3亿行,社区贡献者接近9000位,软硬件产品数量超1200款,三方发行版达到69款。开源鸿蒙已广泛覆盖政务、交通、金融、电力、水利、建筑等多个行业领域,成�

  • 4个月大婴儿遭月嫂整晚暴力喂奶 母亲:将走司法程序

    近日,江苏苏州一起月嫂暴力对待婴儿的事件引发社会热议。 6 月 24 日,婴儿母亲王女士通过家中安装的监控设备,目睹了令人震惊的一幕:她雇佣的月嫂在夜间照顾仅 4 个月大的宝宝时,不仅强行扭转婴儿头部,还猛烈摇晃奶瓶硬塞入婴儿口中,甚至敲打奶瓶、踢踹婴儿床,且此类粗暴行为每小时便重复一次,导致孩子整夜无法安睡,哭闹不止。