ASP.Net留言本[实际项目中...]

--创建数据库 Create DataBase advert on Primary ( name='advert', filename='D:\sky\App_Data\Adv_Data.mdf', size=1Mb, filegrowth=10% ) Log On ( name='advertLog', filename='D:\sky\App_Data\Adv_Log.ldf', size=1Mb, filegrowth=10% ) --留言表 Create Table tb_Adv ( Adv_id int identity(1,1) Primary Key not null, Adv_CompName varchar(50) null, Adv_Name varchar(50) not null, Adv_Email varchar(50), Adv_Tel varchar(50), Adv_HeadImgUrl varchar(50) not null, Adv_Ip varchar(50), Adv_TimeNow DateTime, Adv_Memo NText, Adv_AdmHelp NText, Adv_State bit null Default 0 Adv_Ad ) Select * From tb_Adv --创建添加留言的存储过程 Create Proc proc_Adv_Add @compName VarChar(50), @reName VarChar(50), @Email VarChar(50), @Tel VarChar(50), @imgUrl VarChar(50), @IP VarChar(50), @Memo NText AS Insert Into tb_Adv Values ( @compName, @reName, @Email, @Tel, @imgUrl, @IP, GetDate(), @Memo, '此贴目前还未回复!' ) GO --龌龊字过滤表 Create Table tb_contentFilter ( cf_id int identity(1,1) Primary Key not null, cf_content varchar(2000) ) Insert Into tb_contentFilter Values('妈,奸,淫,操,暴,死,') Insert Into tb_contentFilter Values('日,') --读取龌龊字的存储过程 Create PROC proc_Cont_Filter As Select * From tb_contentFilter GO --显示留言的存储过程 Create Proc proc_Adv_Select As Select * From tb_Adv GO --显示留言到回复的存储过程 Create Proc proc_Adv_SelId @Aid int As Select * From tb_Adv Where Adv_id=@Aid GO --回复留言 Create Proc proc_Adv_Rev @Aid int, @Content ntext, @result bit output As if Exists(Select * From tb_Adv Where Adv_id=@Aid And Adv_State=0) Begin Set @result=0 Update tb_Adv Set Adv_AdmHelp=@Content Where Adv_id=@Aid End Else Set @result=1 GO --删除留言 Create Proc proc_Adv_DelId @Aid int As Delete From tb_Adv Where Adv_id=@Aid GO --管理员表 Create Table Admin ( Adm_id int identity(1,1) Primary Key not null, Adm_Name varchar(50), Adm_Pwd varchar(50) ) Insert Into Admin Values('sky','123') --管理员登录检测 Create Proc proc_IsAdminExists ( @user_Name varchar(50), @user_Pwd varchar(50), @return_info varchar(50) output ) As If Exists (Select * From Admin Where Adm_Name=@user_Name And Adm_Pwd=@user_Pwd) Set @return_info='OK' Else Set @return_info='None' GO --茯取留言记录数 Create Proc proc_Adv_Count As Select Count(*) as Num From tb_Adv GO