<!--#include file="../Inc/Function.asp"-->
<%
OpenDBConn
sql = "select * from dbo.sysobjects where id = object_id(N'[dbo].[TuiGuang]') and OBJECTPROPERTY(id, N'IsUserTable') = 1"
createRs
rs.open sql,conn,1,1
if rs.eof or rs.bof then
'创建TuiGuang(网站推广表)
sql ="create table [dbo].[TuiGuang]("&_
"[id][int] identity (1,1) not null,"&_ 'id标识
"[TName][varchar](100) collate chinese_prc_ci_as null,"&_ '名称
"[Content][ntext] collate chinese_prc_ci_as null,"&_ '产品描述
"[pic][varchar](100) collate chinese_prc_ci_as null,"&_ '图片
"[price][int] null,"&_ '价格
"constraint [pk_TuiGuang] primary key clustered("&_
"[id]"&_
")on [primary]"&_
")on [primary]"&_
rs.close
conn.execute(sql)
response.write "创建TuiGuang表成功<br>"
else
response.write "已存在"
rs.close
end if
Set rs = Nothing
CloseDBConn
%>