<!--#include file="conn.asp" -->
<%
dim rs,strSQL
set rs=server.CreateObject("ADODB.Recordset")
strSQL="select * from xt_t_user_type where type_name='"&Type_name&"'"
%>
<%
Type_name=request.Form("Type_name")
IsUse=trim(Request.Form("IsUse"))
if IsUse= "" then
   IsUse=1
end if
remark=trim(Request.Form("Remark"))
checked=true  '用于叛断数据是否合法,如合法则保存数据
if len(Type_name)<1 then
   checked=false
end if
rs.Open strSQL,conn,1,3
if rs.eof then
  if checked then     
     rs.AddNew
     rs("Type_name")=Type_name
     rs("IsUse")=IsUse
     rs("Remark")=Remark
     rs.update    
     Response.Write"增加成功。"
   end if
else
   Response.Write"出错了。"
end if    
rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing
%>




我要实现的是向数据库增加内容。要求Type_name字段的内容不能重复。。。
strSQL="select * from xt_t_user_type where type_name='"&Type_name&"'"

执行这个SQL语句不是可以查出输入的Type_name表单的数据在数据库表中的Type_name字段中是否存在的吗?


if rs.eof then

判断查找的结果,,,游标是否到了最后一行。。。。如果到了最后一行,说明Type_name表单的数据在数据库表中的Type_name字段不存在的?


为什么结果是:不管
Type_name表单的数据是否与数据库Type_name字段数据相同,,,,,都会向数据库写入呢




要实现,,,如果Type_name表单的数据与数据库Type_name字段数据相同。就拒绝写入。。。要怎样改呢?