一个功能完善的专栏管理的程序->这是asp.net的第二个应用三 -pc6资讯

您的位置：首页 → 网页设计 → ASP实例 → 一个功能完善的专栏管理的程序->这是asp.net的第二个应用三

一个功能完善的专栏管理的程序->这是asp.net的第二个应用三 时间：2004/11/7 2:52:00来源：本站整理作者：蓝点我要评论(0): 一个功能完善的专栏管理的程序->这是asp.net的第二个应用(三)

/*

豆腐制作，都是精品

http://www.asp888.net 豆腐技术站

如转载，请保留完整版权信息

*/

刚才说了一些题外话，现在我们来看看我们如何将在add.aspx中输入的数据保存在sql server中

处理 SSI 文件时出错

<%

dim conn as SQLConnection

dim sqlRead as SQLDataReader

dim sqlCmd as SQLCommand

'这样我们通过 func.aspx 文件的使用，对连接代码等等很多通用的程序进行了同意的管理和调用

conn=GetConn()

dim strUserName as string

dim strPass as string

dim strSQL as string

strUserName=request.form("txtUserid")

strPass=request.form("txtPass")

strSQL="select UserPassword from lanmuuser where username='" & replaceSql(strUserName) & "'"

sqlCmd=new SQLCommand(strSQL,conn)

sqlCmd.ActiveConnection.Open()

sqlCmd.Execute(sqlRead)

sqlCmd.ActiveConnection.Close()

'这个部分是对添加文章的用户进行限制和管理

'在演示的版本中，这段代码是屏蔽起来的，如果我们需要对用户进行限制

'简单的作个lanmuuser 的 table 就可以了

if not sqlRead.Read() then

response.Write("这个用户不存在")

response.end

end if

if sqlRead(0)<>strPass then

'密码不正确

response.Write("密码不正确")

response.end

end if

'校验合法

dim strClassid as string

strClassid=request.form("selClass")

dim strTitle as string

strTitle=request.form("txtTitle")

dim strContent as string

strContent=request.form("txtContent")

dim strSelFrom as string

strSelFrom=request.form("selFrom")

strSQL="insert into lanmu(classid,title,content,dtime,userid,IsUse,viewnum,selFrom)values("

strSQL=strSQL & "" & strClassId & ",'" & replaceSql(strTitle) & "','" & replaceSql(strContent) & "',"

strSQL=strSQL & "getdate(),'" & replaceSql(strUserName) & "','0',0,'" & strSelFrom & "')"

sqlCmd=new SQLCommand(strSQL,conn)

sqlCmd.ActiveConnection.Open()

'response.write(strSQL)

sqlCmd.execute

response.write("恭喜，恭喜，您的文章已经成功的添加到了文章数据库，管理员会在下次更新的时候检查你的文章，如果没有什么问题的话，您的文章将会很快出现在我们的栏目中")

response.end

%>

呵呵，是不是很简单？：）别高兴的太早，这个只是把数据存入了数据库，下面我们就会在后面的文章中，看到我们是怎么样把数据显示出来的，毕竟，这个才识主要的：）

文章评论

查看所有0条评论>>

热门文章 没有查询到任何记录。