opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 03:01:07 +08:00
Code Issues Packages Projects Releases Wiki Activity

Follow-up to r1103: Enable keys before unlocking the table, so things are done in reverse to the locking process.

Browse Source
This commit is contained in:
rosenfield
2007-11-06 14:20:11 +00:00
parent 62eb57abf1
commit fcc066d3e0
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/exportsql.pas
View File

@ -1099,20 +1099,20 @@ begin
if RecordCount_all > 0 then begin
if tofile then
begin
wfs(f, 'UNLOCK TABLES;' );
wfs(f, fixSQL( '/*!40000 ALTER TABLE '+destMask(checkListTables.Items[i])+' ENABLE KEYS;*/', target_version) );
wfs(f, 'UNLOCK TABLES;' );
end
else if todb then
begin
cwin.ExecUpdateQuery( 'UNLOCK TABLES' );
if target_version > 40000 then
cwin.ExecUpdateQuery( 'ALTER TABLE ' + sourceMask(destDb) + '.' + sourceMask(checkListTables.Items[i]) + ' ENABLE KEYS' );
cwin.ExecUpdateQuery( 'UNLOCK TABLES' );
end
else if tohost then
begin
RemoteExecNonQuery(win2export, 'UNLOCK TABLES');
if target_version > 40000 then
RemoteExecNonQuery(win2export, 'ALTER TABLE ' + destMask(destDb) + '.' + destMask(checkListTables.Items[i]) + ' ENABLE KEYS');
RemoteExecNonQuery(win2export, 'UNLOCK TABLES');
end;
end;
barProgress.StepIt;