E
erbbchen
Unregistered / Unconfirmed
GUEST, unregistred user!
本地数据需要外网数据比对,怎么比较数据和插入数据,我觉得我的方法很笨,而且时间很慢,代码如下:Query_jc是内网的数据<br>DM.ADC_web.BeginTrans;<br>Query_jc.First;<br>while not Query_jc.Eof do<br> begin<br> //将数据与远程数据库比较上传<br> ls_sql := 'select * from t_jc where jch = ''' + Query_jc.FieldByName('jch').AsString + ''' and kh = ''' + Query_jc.FieldByName('kh').AsString + '''';<br> Query_webjc.Close;<br> Query_webjc.SQL.Clear;<br> Query_webjc.SQL.Add(ls_Sql);<br> Query_webjc.Open;<br> if Query_webjc.RecordCount = 0 then<br> begin<br> //外网新增<br> Query_webjc.Append;<br> Query_webjc.FieldByName('jch').AsString := Query_jc.FieldByName('jch').AsString;<br> Query_webjc.FieldByName('kh').AsString := Query_jc.FieldByName('kh').AsString;<br> Query_webjc.Post;<br> DM.ACmd.CommandText := '更新本地的';<br> DM.ACmd.Execute;<br> end;<br> Query_jc.Next;<br> end;<br><br>DM.ADC_web.CommitTrans;<br>Query_jc.Refresh;<br>这样的四行数据都很慢,几百行数据怎么办,执教一下。