| 发表于:2007-06-29 09:45:40 楼主 |
dim strconnect as string = "data source=server;connect timeout=100;initial catalog=评估业务管理;user id=;password=; " sqlconnection1 = new system.data.sqlclient.sqlconnection(strconnect) sqlconnection1.open() dim sqlstr as string = "insert into [评估业务管理 ].[dbo].[立项表] ([项目名称] ,[项目编号])values( " + textbox1.text + " ', ' " + textbox2.text + " ') " 'dim sqlstr as string = "insert into 立项表(项目名称,项目编号) value ( ' " + textbox1.text + " ', ' " + textbox2.text + " ') " dim cmd as new sqlcommand cmd = new sqlcommand(sqlstr, sqlconnection1) try cmd.EXECutenonquery() catch ex as exception console.writeline(ex.message) end try msgbox( "记录添加完成 ") sqlconnection1.close() |
|
|
|
|