当前位置: 移动技术网 > IT编程>开发语言>.net > asp.net连接数据库 增加,修改,删除,查询代码

asp.net连接数据库 增加,修改,删除,查询代码

2017年12月12日  | 移动技术网IT编程  | 我要评论

云合同,中国球王txt下载,学园默示录 动漫

复制代码 代码如下:

'数据库连接
public sub connectiondb()
try

serverurl = readfromini(my.application.info.directorypath & "\config.dll", "service information", "ipaddress")

serverid = readfromini(my.application.info.directorypath & "\config.dll", "service information", "password")
servername = readfromini(my.application.info.directorypath & "\config.dll", "service information", "userid")
serverdatabase = readfromini(my.application.info.directorypath & "\config.dll", "service information", "databasename")
if serverid <> "" then
connectionsqlstring = "server =" + serverurl + ";database=" + serverdatabase + ";uid =" + servername + ";pwd=" + serverid + ";max pool size=500"
else
connectionsqlstring = "server =" & serverurl & ";integrated security = sspi ;database = " & serverdatabase & ""
end if
consql = new sqlconnection(connectionsqlstring)
objcommand.connection = consql
catch ex as exception
msgbox(ex.message)
end try
end sub


'数据操作执行
public sub getconn(byval sqlstr as string, byval tablename as string)
try
objcommand.commandtext = sqlstr
objdataset.clear()
objdataadapter.selectcommand = objcommand
objdataadapter.fill(objdataset, tablename)
catch ex as exception
errno = 1
msgbox(ex.message)
end try
end sub
'数据更新
public sub updatetable(byval strsql as string)
objcommand.commandtext = strsql
try
consql.open()
trans = consql.begintransaction
objcommand.transaction = trans
objcommand.executenonquery()
trans.commit()
catch ese as exception
msgbox(ese.message)
trans.rollback() '如果更新异常则取消所有更新
finally
consql.close() '关闭连接
end try
end sub

如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!! 点击进行留言回复

相关文章:

验证码:
移动技术网