CMS系统增加一个频道的问题 5

用的是OK3W4.9的CMS,,自带有文章及下载频道,,想自己弄一个产品展示频道,但就是不懂怎么增加相关的代码.系统设置保存的数据都在一个数据表里.我想另增加产品基本设置... 用的是OK3W4.9的CMS,,自带有文章及下载频道,,想自己弄一个产品展示频道,
但 就是不懂怎么增加相关的代码.
系统设置保存的数据都在一个数据表里.我想另增加产品基本设置,只能读出表里的,却写不进去,(水平有限,连解释都不懂怎么说清楚)
这一段是系统基本设置的
Public Sub Edit()
Sql = "select * from Ok3w_SiteConfig"
Rs.Open Sql,Conn,1,3
For i = 0 To Rs.Fields.Count - 1
If Left(Rs.Fields(i).Name,8)="SiteSoft" Then
Else
v = Request.Form(Rs.Fields(i).Name)
If v="" Then v="0"
Rs(Rs.Fields(i).Name) = v
End If
Next
Rs.Update
Rs.Close

Application(SiteID & "_Ok3w_SiteTitle") = ""
End Sub

这一段是下载频道基本设置的
Public Sub SoftEdit()
Sql = "select * from Ok3w_SiteConfig"
Rs.Open Sql,Conn,1,3
For i = 0 To Rs.Fields.Count - 1
If Left(Rs.Fields(i).Name,8)="SiteSoft" Then
v = Request.Form(Rs.Fields(i).Name)
Rs(Rs.Fields(i).Name) = v
End If
Next
Rs.Update
Rs.Close

Application(SiteID & "_Ok3w_SiteTitle") = ""
End Sub

就是说我想再增加一个Public Sub 应该怎么做
这段代码如果换才能不和原来的冲突
For i = 0 To Rs.Fields.Count - 1
If Left(Rs.Fields(i).Name,8)="SiteSoft" Then
v = Request.Form(Rs.Fields(i).Name)
Rs(Rs.Fields(i).Name) = v
End If
Next
展开
 我来答
hf527420
2010-03-15 · TA获得超过630个赞
知道小有建树答主
回答量:527
采纳率:0%
帮助的人:686万
展开全部
没听过这个CMS。。。。现在ASP类的CMS用的不多了。而且安全性没有PHP类的CMS强。

参考资料: 站长百科zzbaike

爱看流星的小猪
2010-03-16
知道答主
回答量:44
采纳率:0%
帮助的人:27.8万
展开全部
找人代做个商品页面模板吧!
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式