社区
数据库相关
帖子详情
如何实现数据库访问的短连接,完全断开再打开
hohoxcn
2006-12-11 11:55:48
用Adoconnection定义了一个数据库连接DBConn,配制好后打开Open.执行Execute。获取数据后关闭连接close, connected=false。待需要时再打开Open,执行Execute.
但发现关闭连接后,不Open,仍然可以Execute。请高手指点一条真正断开连接,然后可以再连数据库的方法!谢谢谢谢!
...全文
129
1
打赏
收藏
如何实现数据库访问的短连接,完全断开再打开
用Adoconnection定义了一个数据库连接DBConn,配制好后打开Open.执行Execute。获取数据后关闭连接close, connected=false。待需要时再打开Open,执行Execute. 但发现关闭连接后,不Open,仍然可以Execute。请高手指点一条真正断开连接,然后可以再连数据库的方法!谢谢谢谢!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
1 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
老冯
2006-12-11
打赏
举报
回复
给你一个真正断开的例子:
var
Obj: IBusOrder;
MConnection: TADOConnection;
MQuery: TADOQuery;
begin
Result := False;
Visited.QueryInterface(IBusOrder, Obj);
if Obj <> nil then
begin
CoInitialize(nil);
MConnection := TADOConnection.Create(nil);
MConnection.ConnectionString := DBConnection;
MConnection.LoginPrompt := False;
MConnection.Open;
MQuery := TADOQuery.Create(nil);
with MQuery do
begin
try
Connection := MConnection;
MConnection.BeginTrans;
try
SQL.Text := ' Insert Into TPTMIS_BusOrderInfo(FBusOrderID, '+
' FBusOrderName, '+
' FLineID, '+
' FLineName, '+
' FLeaveTime, '+
' FSeatingPreset, '+
' FChildrenPreset, '+
' FIntervalDays, '+
' FOriginalDate ) '+
' Values(:FBusOrderID, '+
' :FBusOrderName, '+
' :FLineID, '+
' :FLineName, '+
' :FLeaveTime, '+
' :FSeatingPreset, '+
' :FChildrenPreset, '+
' :FIntervalDays, '+
' :FOriginalDate ) ';
Parameters.ParamByName('FBusOrderID').Value := Obj.BusOrderID;
Parameters.ParamByName('FBusOrderName').Value := Obj.BusOrderName;
Parameters.ParamByName('FLineID').Value := Obj.LineID;
Parameters.ParamByName('FLineName').Value := Obj.LineName;
Parameters.ParamByName('FLeaveTime').Value := FormatDateTime('HH:MMMM', Obj.LeaveTime);
Parameters.ParamByName('FSeatingPreset').Value := Obj.SeatingPreSet;
Parameters.ParamByName('FChildrenPreset').Value := Obj.ChildrenPreSet;
Parameters.ParamByName('FIntervalDays').Value := Obj.IntervalDays;
Parameters.ParamByName('FOriginalDate').Value := Obj.OriginalDate;
ExecSQL;
MConnection.CommitTrans;
Result := True;
except
MConnection.RollbackTrans;
Result := False;
end;
finally
MQuery.Free;
MConnection.Free;
end;
end;
end;
end;
(我的工程应用代码)
Go语言公链开发实战
区块链管理:涉及初始区块链下载、
连接
区块、
断开
区块、校验区块和保存区块,以及发现最长链条的顶区块。 内存池管理:即交易池管理。节点将通过验证的交易放在一个交易池中,并准备好将其放入下一步挖到的区块中。...
数据库
连接
池应用中
数据库
服务器
断开
超时
连接
的问题
尤其是在Web应用中,如果晚上时段没有
访问
,而第二天第一个访客的经历就是碰到一个
数据库
访问
错误,如果开发系统的程序员没有注意这个问题的话,可能终端用户
访问
会看到抛出的一堆
数据库
异常信息。 其实,这
ADO
数据库
连接
断开
重连
不会由于网络或者
数据库
服务器的原因导致
连接
断开
。 实际情形是:需要开发一个长时间运行的程序,
数据库
服务器可能在很远的地方,网络不可靠。人工在
连接
断开
的时候不可能及时的干预。最好的方式就是...
Ado.net中
数据库
连接
的两种模式:
连接
模式和
断开
模式
Ado.net为我们提供了两种
连接
数据库
的方式:
连接
模式和
断开
模式.对数据的读取和操作在
断开
数据库
连接
之前,这样的工作方式称为
连接
模式,一般使用DataReader称为
连接
模式.而对数据的读取在
断开
数据库
连接
之后,这样的...
四、
断开
式
连接
数据库
1.
断开
式
连接
到
数据库
//
断开
式
连接
//步骤1:创建
连接
数据库
的对象 SqlConnection conn = new SqlConnection("server=.;uid=sa;pwd=你的密码;database=bankdb"); //步骤2:
打开
(
连接
)
数据库
conn.Open(); string ...
数据库相关
2,495
社区成员
88,444
社区内容
发帖
与我相关
我的任务
数据库相关
Delphi 数据库相关
复制链接
扫一扫
分享
社区描述
Delphi 数据库相关
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章