Arsip: capture data

 
user image
more 17 years ago

nurez

hii all,, mau tanya nich bagaimana mengambil file detail data dari database A dan disimpan dalam file master database B memakai komponen ADO dgn dabase mdb. apakah dengan mensetting ODBC, atau dari code programnya yg di set ulang..? more urgent nich... tolong yha :) makasih
user image
more 17 years ago

ImanD

waduh kurang ngerti nih file detail data am file master, apan sih?
user image
more 17 years ago

nurez

sebenernya sama ajha :) tp databasenya dbf mau di simpan di mdb algoritmanya : 1. open data from server (dbf file dgn ODBC) databasenya nga bisa dibuka, kec lewat ODBC 2. view data from client (mdb file dgnADO) 3.capture data from server to client ok..? krn aplikasinya udah brjalan di salah satu kompie, trus mw di coba dipasang kompie lain biar bisa di akses ke server...lalu disimpan ke client.. mff klo smuanya kurang ngerti :) mff yha..
user image
more 17 years ago

ImanD

@nurez: sebenernya sama ajha :) tp databasenya dbf mau di simpan di mdb
jelas beda dong klo dilihat dari salah satu sudut(ga tau sudut mana) mungkin klo sama mdb kita bisa langsung pke

INSERT INTO tableclient FROM [path].[databasename].tablemaster
klo beda sih simplenya pke 2connection az, yang satu read data yg satu save data
user image
more 17 years ago

nurez

waaah, brt pakai zeos component.? klo ngga pke zeos..? gmn yha..?
user image
more 17 years ago

Manz

pake BDE lewat ODBC
user image
more 17 years ago

nurez

klo pakai 2 koneksi.. printah insert nya bagaimana ..? ex: with adoquery1 do begin sql.text:=('INSERT into tableclient (userid) SELECT tablemaster FROM tablemaster LEFT OUTER JOIN tableclient ON tablemaster.usrs = tableclient.userid WHERE tableclient.userid IS NULL'); klo dari sini diubahnya gimana.? makasih
user image
more 17 years ago

ImanD

ya udah ni sample simplenya, MISAL: ADOQuery1=Connection server ADOQuery2=Connection client

.
.
.
with ADOQuery1 do
begin
  Close;
  SQL.Text:='SELECT userid FROM tablemaster WHERE '; //  =seleksi lain2nya disini
  Open;
  if not IsEmpty then
    While not Eof do
    begin
      ADOQuery2.SQL.Text:=Format('INSERT INTO tableclient(userid) VALUES(%s)',[QuotedStr(Fields[0].AsString)]);
      ADOQuery2.ExecSQL;
      Next;
    end;
end;
.
.
.
more ...
  • Pages:
  • 1
Share to

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com