首页 相关文章 新闻更新系统(2)

新闻更新系统(2)

更 新 新 闻

作者:米仙圣人 
功能:在滚动文本框中添加一定的文本格式,来自动的更新数据库。
方法:数据库名称News.mdb

1:AddNews.asp。
Dim DBStr
DBStr=""
DBStr=Request.Form("tNewsIndex")
AddRecord(DBStr)
DBStr=Request.Form("tNewsIndex")是用来读取滚动文本框中的数据,调用DataModal.asp中的ADDRecord过程。

2:DataModal.asp

Sub AddRecord(InputStr)
Dim LineStr, AllStr
Dim DBNews
Dim tempTextStream
Dim ObjFileSys
Dim FieldsStr(6)
Dim I, blpos, elpos, bApos, eAPos, LCStr, FCStr
Dim SqlStr

...[ 查看全文 ]

2016-01-29 标签:

新闻更新系统(2)的相关文章

手机页面
收藏网站 回到头部