Arsip: bikin program Client-Server??????

 
user image
more 19 years ago

lela

aqu bikin program yang niatnyamah bisa Client-Server, disini database yang saya gunakan MySQL, dengan menggunakan DBExpress program yang saya buat ini databasenya disimpan pada komputer 1, saat program dijalankan pertamakali yang harus dilakukan yaitu koneksi terhadap database, tapi error terjadi saat komputer 2 menjalankan koneksi dan komputer 1 dalam keadaan sedang mengakses databasenya(koneksi ke database telah dilakukan), tapi klo komputer 1 sudah tidak menjalankan koneksi ke database(mendisconnect), komputer 2, koneksinya lancar2 aja tuh. begitu juga sebaiknya, klo aq koneksi dulu komputer 2, trus komputer 1 mengoneksi, maka akan terjadi error. sintak koneksi-nya with DataModule.SQLConnection do begin Close; Params.Clear; Params.Add('DriverName=MYSQL'); Params.Add('HostName='+FormKoneksi.ServerName.Text); Params.Add('Database='+FormKoneksi.Database.Text); Params.Add('User_Name='+FormKoneksi.UserName.Text); Params.Add('Password='+FormKoneksi.password.Text); Params.Add('Blobsize=-1'); Params.Add('LocaleCode=0000'); Open; end; DataModule.SQLQuery1.Active:=true; DataModule.ClientData1.Active:=true; . . . aq, nga tau apa yang terjadi sama program aq apakah ada yang salah dengan algoritma sintak koneksiku ini, apa yang harus saya lakukan karna yang apu pengen kedua komputer tersebut bisa menjalankan program dengan mengakses databasenya secara bersaman. mohon bantuannya ya.... .nuhun. :roll:
user image
more 19 years ago

saysansay

Uhm...asyik Nech....Klu Di SQLSERVER Kita Bisa Mengatur Hak Akses Untuk Setiap Client...Tapi klu Untuk Di MYSQL BLom Nyoba.. Tapi Kayanya Syntaxnya Juga Rada2 Mencurigakan...

  with DataModule.SQLConnection do 
begin 
Close; 
Params.Clear; 
Params.Add('DriverName=MYSQL'); 
Params.Add('HostName='+FormKoneksi.ServerName.Text); 
Params.Add('Database='+FormKoneksi.Database.Text); 
Params.Add('User_Name='+FormKoneksi.UserName.Text); 
Params.Add('Password='+FormKoneksi.password.Text); 
Params.Add('Blobsize=-1'); 
Params.Add('LocaleCode=0000'); 
Open; 
end; 
DataModule.SQLQuery1.Active:=true; 
DataModule.ClientData1.Active:=true; 
Yang Ini Punya Mbak Lela ya!!! Coba Direvsi Dikit

Begin
  DataModule.SQLQuery1.Close;
  DataModule.ClientData1.Close
  with DataModule.SQLConnection do 
  begin 
     Close; 
     Params.Clear; 
    Params.Add('DriverName=MYSQL'); 
    Params.Add('HostName='+FormKoneksi.ServerName.Text); 
   Params.Add('Database='+FormKoneksi.Database.Text); 
   Params.Add('User_Name='+FormKoneksi.UserName.Text); 
   Params.Add('Password='+FormKoneksi.password.Text); 
   Params.Add('Blobsize=-1'); 
   Params.Add('LocaleCode=0000'); 
   Open; 
   end; 
   DataModule.SQLQuery1.open;
   DataModule.ClientData1.open;
  end;
Ditest Dulu Ya....Coz Lom Dicoba Sech....Mungkin Nga Ngaruh Juga nech....wakakakaakakak
user image
more 19 years ago

DelphiExpert

Btw. pesan errornya apa?
user image
more 19 years ago

kaka-delphi

Oh iya Pesen errornya apaa mba ? :D
user image
more 19 years ago

lela

Access violation ...., buat lengkapnya aku lupa ga tercatat, kenapa yah?????? lieur ih!
user image
more 19 years ago

lela

errornya : unable to execute query, bukan yang tadi. bantuin ya
user image
more 19 years ago

kaka-delphi

DataModule.SQLQuery1.Active:=true;
errornya : unable to execute query, bukan yang tadi. bantuin ya
Pasti Query nya kosong tuch. Jadi sebelum di aktifkan, pastikan query nya terisi. Misal:
with DataModule.SQLQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add('SELECT * FROM NamaTable');
  Open; // baru open atau Active:= true;
end;
Oke silahkan dicoba... :D
user image
more 19 years ago

wongdee2t

iya nih., kalo dari errornya. Suspectnya ke querynya nih... :D btw.,mb' SQLQuery1 dan ClientData1 itu menjalankan perintah SQL apaan yah? numpang OOT nanya' (tp masih berhubungan seh..:D): komponen DBExpress bawaan delphi tuh untuk koneksi ke mySql hanya support ke versi 4.0.x saja yah? (tidak 4.1.x ato 5.x)
user image
more 19 years ago

mat_koder

... unable to execute Query .... hmmm aneh ya... klo ngga ada user laen yg sedang konek ( = sendirian ) , ngga error , tapi klo ada user laen yg konek, jadi error.... kayanya kita-kita harus diberi info yg lebih dalam lagi deh... spy bisa ambil kesimpulan.... so....
user image
more 19 years ago

kaka-delphi

numpang OOT nanya' (tp masih berhubungan seh..): komponen DBExpress bawaan delphi tuh untuk koneksi ke mySql hanya support ke versi 4.0.x saja yah? (tidak 4.1.x ato 5.x)
Saya juga pernah mengalami hal tersebut. Kayaknya ga support klo ke 4.1 dan 5.x karena berbeda fungsi tuch. Mendingan cari komponen lain aja, klo pake DBex saya kurang sreg tuch.
more ...
  • Pages:
  • 1
  • 2
  • 3
Share to

AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now: https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD

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