生成html格式的新闻,在后台添加的时候能否使用ubb呢

agpsy 2004-12-29 08:22:28
能的话,该怎么操作,第一次接触ubb.还不懂.
谢谢
...全文
181 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
CodeBunny 2004-12-29
  • 打赏
  • 举报
回复
可以在生成页面之前替换成HTML呀,感觉比客户端替换好,毕竟是生成静态页面,只是麻烦一次而已,如果在客户端替换,还要考虑客户端是否支持JS,可是否支持你所写的JS,相对较麻烦

在okfile = replace(okfile,"Articlecontent",ArticleContent)这行之前把UBB替换掉就行了
deerchao 2004-12-29
  • 打赏
  • 举报
回复
ubb也是替换啊。

可以在服务器端替换,也可以用js在客户端替换。
agpsy 2004-12-29
  • 打赏
  • 举报
回复
生成的时候是从数据库中读取一个模板的内容,然后把输入的内容和模板的内容进行替换.那么ubb在什么时候使用呢,.
这是生成代码
dim conndemo
dim rsdemo
Set conndemo = Server.CreateObject("ADODB.Connection")
conndemo.Open "provider=microsoft.jet.oledb.4.0;data source="& _
server.mappath("../demo/test.asp")
Set rsdemo=Server.CreateObject("ADODB.RECORDSET")
sql="select demo_html from news_demo where demo_id="&demoid
rsdemo.open sql,conndemo,1,3
okfile=rsdemo("demo_html")
rsdemo.close
okfile = replace(okfile,"Articlecontent",ArticleContent)
okfile = replace(okfile,"fromaddress",fromsite)
okfile = replace(okfile,"addtime",temptime)
okfile = replace(okfile,"articletilte",ArticleTitle)
okfile = replace(okfile,"新闻首页",boardname)
okfile = replace(okfile,"timu",boardname)
okfile = replace(okfile,"NewDocument",Articletitle)
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FolderExists(server.mappath(fpath))<>true Then
fso.CreateFolder(server.mappath(fpath))
End If
Set f1 = fso.OpenTextFile(file, 2, true)
f1.Write okfile
f1.close()
set fso=nothing
whb147 2004-12-29
  • 打赏
  • 举报
回复
完全同意
html是ubb处理后生成的
nattyfish 2004-12-29
  • 打赏
  • 举报
回复
孟子大哥说的不错,html是后面处理后生成的,你可以查找一下替换方法
cncca 2004-12-29
  • 打赏
  • 举报
回复
当然可以,到网上搜个新闻系统,几乎都用了ubb!!
孟子E章 2004-12-29
  • 打赏
  • 举报
回复
当然可以啦。生成html是后台处理之后生成的。完全可以用。呢下载个动网论坛看看,那个里面有UBB的替换方法

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧