<META c>
<%@ CODEPAGE="936"%>
<!--#include file="dbconn.asp" -->
<%
dim rs
dim sql
'定义接收数据的临时变量
dim n
dim date1
dim topic
dim people
dim note
'接收数据
n=request.Form("txtn")
date1=request.Form("txtdate")
topic=request.Form("txttopic")
people=request.Form("txtpeople")
note=request.Form("txtnote")
'查询是否有相同编号的信息，若没有则录入
set rs=server.CreateObject("ADODB.RecordSet")
sql="select * from file where n="&n
rs.open sql,conn,3,2
if rs.eof then
'录入新的信息
rs.addnew
rs("n")=n
rs("date")=date1
rs("topic")=topic
rs("people")=people
rs("note")=note
rs.update
response.write "录入成功"
else
response.write "已有相同编号的文件存在！"
end if
rs.close
set rs=nothing
response.redirect "DEFAULT.ASP"
%>
action add aggregate all
alter after and as
asc avg avg_row_length auto_increment
between bigint bit binary
blob bool both by
cascade case char character
change check checksum column
columns comment constraint create
cross current_date current_time current_timestamp
data database databases date
datetime day day_hour day_minute
day_second dayofmonth dayofweek dayofyear
dec decimal default delayed
delay_key_write delete desc describe
distinct distinctrow double drop
end else escape escaped
enclosed enum explain exists
fields file first float
float4 float8 flush foreign
from for full function
global grant grants group
having heap high_priority hour
hour_minute hour_second hosts identified
ignore in index infile
inner insert insert_id int
integer interval int1 int2
int3 int4 int8 into
if is isam join
key keys kill last_insert_id
leading left length like
lines limit load local
lock logs long longblob
longtext low_priority max max_rows
match mediumblob mediumtext mediumint
middleint min_rows minute minute_second
modify month monthname myisam
natural numeric no not
null on optimize option
optionally or order outer
outfile pack_keys partial password
precision primary procedure process
processlist privileges read real
references reload regexp rename
replace restrict returns revoke
rlike row rows second
select set show shutdown
smallint soname sql_big_tables sql_big_selects
sql_low_priority_updates sql_log_off sql_log_update sql_select_limit
sql_small_result sql_big_result sql_warnings straight_join
starting status string table
tables temporary terminated text
then time timestamp tinyblob
tinytext tinyint trailing to
type use using unique
unlock unsigned update usage
values varchar variables varying
varbinary with write when
where year year_month zerofill
IP卡
狗仔卡
显身卡
发表于 2007-4-2 22:13
发表于 2007-4-4 13:55
