C
C.Richard
Unregistered / Unconfirmed
GUEST, unregistred user!
asp.net(language="vb" 表sys04a
sub add_click(sender as object,e as eventargs)
if page.isvalid then
dim str as string
str="server=server1;
uid=pm pwd=1234567890 database=a"
dim conn as sqlconnection
conn=new sqlconnection(str)
conn.open
dim cmd as sqlcommand
dim sqlstr as string
sqlstr="insert into sys04a values("
&
sys04a01n.text &
"','"
&
sys04a02i.text &
"','"
&
sys04a03n.text &
"','"
&
sys04a04i.text &
"','"
&
sys04a05n.text &
"','"
&
sys04a06n.text &
"','"
&
sys04a07n.text &
"','"
&
sys04a08n.text &
"','"
&
sys04a09n.text &
"','"
&
sys04a010n.text &
""
cmd=new sqlcommand(sqlstr,conn)
cmd.executenonquery()
conn.close()
conn = Nothing
response.write("添加成功")
sub add_click(sender as object,e as eventargs)
if page.isvalid then
dim str as string
str="server=server1;
uid=pm pwd=1234567890 database=a"
dim conn as sqlconnection
conn=new sqlconnection(str)
conn.open
dim cmd as sqlcommand
dim sqlstr as string
sqlstr="insert into sys04a values("
&
sys04a01n.text &
"','"
&
sys04a02i.text &
"','"
&
sys04a03n.text &
"','"
&
sys04a04i.text &
"','"
&
sys04a05n.text &
"','"
&
sys04a06n.text &
"','"
&
sys04a07n.text &
"','"
&
sys04a08n.text &
"','"
&
sys04a09n.text &
"','"
&
sys04a010n.text &
""
cmd=new sqlcommand(sqlstr,conn)
cmd.executenonquery()
conn.close()
conn = Nothing
response.write("添加成功")