ss
| RSS | RSS Forum | AboutUS |
Disarankan menggunakan browser selain Internet Explorer, resolusi minimal 1024x768
...
UserName:
PassWord:
     Lost?
Daftar jadi Anggota !
Home
| onArtikel
| onForum
| onPenting |
 
  SEARCH !! Click, Before you Ask  


stress? deadline kelewat?
bos ngamuk? pc meledak?
masuk sini !

OpenID

(?)

e.g. myname.myhost.com


Main Menu
..:: onWebTools ::..
..:: onLastPosts ::..
LAST FORUM POSTS
goto Post[AKS] Gimana cara bikin file log(1)
 by mas_kofa
 on 09. Jan at 23:40
goto Postbackup database(2)
 by bimo_ganteng
 on 09. Jan at 18:33
goto PostCopy otomatis kedalam folder yang dbuat secara otomatis(6)
 by arjuna_1982
 on 09. Jan at 17:44
goto PostReportBuilder + Teechart Support(2)
 by wildan_m
 on 09. Jan at 13:28
goto Postcomponen menampilkan *.doc atau *.Pdf(0)
 by hafiezd
 on 09. Jan at 12:51
goto PostFormat DBEdit dengan Accesss(3)
 by LuriDarmawan
 on 09. Jan at 11:43
goto PostMohon Pertimbangan dan sarannya(12)
 by supermuam
 on 09. Jan at 08:54

[Access Forum]

FAQ FAQ  •  Search Search  •  Register Register  •  Log in to check your private messages Log in to check your private messages
Log in Log in  •  Maximize Maximize

ListBox
Delphi Indonesia Forum Index » Database » MsSQL
Post new topic   Reply to topic
View previous topic Printable version Log in to check your private messages View next topic
Author Message
aciang_007Offline
Post subject: ListBox  PostPosted: 04-09-2008 13:14
onNovice


Joined: 02-04-2007 20:01
Posts: 13

Status: Offline
halooo... para master sekalian...

mohon bimbingannya...

1. Bagaimana cara menyimpan, mengedit n menghapus data yang ada di
listbox ke database Ms Sql....

2. Bagaimana cara menyimpan hasil query select kita ke dalam variable
Misal : Query select stok barang, na gi mana tu cara menampung hasil
stok barangnya ke variable....

thanksss...

Very Happy
 
 View user's profile Send private message  
Reply with quote Back to top
madiOffline
Post subject: RE: ListBox  PostPosted: 04-09-2008 13:50
onUber-Skilled


Joined: 30-12-2005 07:58
Posts: 311

Status: Offline
Quote:

1. Bagaimana cara menyimpan, mengedit n menghapus data yang ada di
listbox ke database Ms Sql.... 



  1.   //nambah
  2.   listbox1.Items.Add('string');
  3.   //sql insert bla bla bla
  4.  //hapus
  5.   listbox1.Items.Delete('index listbox');
  6.   //sql delete bla bla bla
  7.  //ubah
  8.   listbox1.Items.Strings[listbox1.ItemIndex] := 'String';
  9.  //sql update bla bla blaaaaaaaaa......


Quote:

2. Bagaimana cara menyimpan hasil query select kita ke dalam variable
Misal : Query select stok barang, na gi mana tu cara menampung hasil
stok barangnya ke variable....


wah gak ketangkap nih maksudnya.. Laughing

_________________
"MAN BEHIND THE GUN"
Hidup ini sudah terlalu banyak masalah, Tambah satu masalah tidak jadi masalah.
Hidup ini simple, jgn dijadikan complex.
 
 View user's profile Send private message Send e-mail  
Reply with quote Back to top
bagussbOffline
Post subject:   PostPosted: 04-09-2008 15:31
onSkilled


Joined: 02-08-2007 15:28
Posts: 107

Status: Offline
maksudnya insert, update & delete dengan data yang di listbox bukan ?
kalo gitu kan bisa : 
  1. INSERT INTO TABLES VALUES (''' + ListBox1.Items.Strings[0] + ''')
  2. UPDATE TABLES SET COLUMNS = ''' + ListBox1.Items.Strings[0] + '''
  3. DELETE TABLES WHERE COLUMNS = ''' + ListBox1.Items.Strings[0] + '''


terus untuk nyimpen variable maksudnya di delphi ato di SP yah..
kalo di delphi kan bisa : 

  1. sString := ADOQuery.FieldByName('COLUMNS').AsString;


kalo di sql servernya.. 

  1. SELECT @Stock = StockBarang FROM TABLES


mudah2an beners.. he he he.. Mr. Green

_________________
spider boy on action ...
 
 View user's profile Send private message  
Reply with quote Back to top
bagussbOffline
Post subject:   PostPosted: 04-09-2008 15:36
onSkilled


Joined: 02-08-2007 15:28
Posts: 107

Status: Offline
maksudnya insert, update & delete dengan data yang di listbox bukan ?
kalo gitu kan bisa : 
  1. INSERT INTO TABLES VALUES (''' + ListBox1.Items.Strings[0] + ''')
  2. UPDATE TABLES SET COLUMNS = ''' + ListBox1.Items.Strings[0] + '''
  3. DELETE TABLES WHERE COLUMNS = ''' + ListBox1.Items.Strings[0] + '''


terus untuk nyimpen variable maksudnya di delphi ato di SP yah..
kalo di delphi kan bisa : 

  1. sString := ADOQuery.FieldByName('COLUMNS').AsString;


kalo di sql servernya.. 

  1. SELECT @Stock = StockBarang FROM TABLES


mudah2an beners.. he he he.. Mr. Green

_________________
spider boy on action ...
 
 View user's profile Send private message  
Reply with quote Back to top
aciang_007Offline
Post subject:   PostPosted: 05-09-2008 16:41
onNovice


Joined: 02-04-2007 20:01
Posts: 13

Status: Offline
1.
INSERT INTO TABLES VALUES (''' + ListBox1.Items.Strings[0] + ''')
2.
UPDATE TABLES SET COLUMNS = ''' + ListBox1.Items.Strings[0] + '''
3.
DELETE TABLES WHERE COLUMNS = ''' + ListBox1.Items.Strings[0] + '''

masss.... kan data yg ada di listbox itu lebih dari satu itemsss... apa nga pakai penggulangan dalam proses save data... bisa tolong lebih di perjelas... or di kasih sample code sederhana delphi...

bisa kirim ke : aciang007@gmail.com

thanksss....

Very Happy
 
 View user's profile Send private message  
Reply with quote Back to top
wahyu_elrahmaOffline
Post subject:   PostPosted: 06-09-2008 09:40
onConfident


Joined: 26-02-2008 15:49
Posts: 25

Status: Offline
halo mas acing,... untuk save perulangan gini...

<pas>
var i : shortint;
begin
for i:= 0 to ListBox1.Items.Count -1 do
begin
kode:=;
with query1 do
begin
close;
sql.clear;
sql.add('INSERT INTO nama_tabel(coba) VALUES ("ListBox1.Items[i].Caption");
Execsql;
end;
end;
end;
</pas>
 
 View user's profile Send private message  
Reply with quote Back to top
aciang_007Offline
Post subject:   PostPosted: 06-09-2008 13:25
onNovice


Joined: 02-04-2007 20:01
Posts: 13

Status: Offline
thankssss... tp gue rada binggung dengan script Anda.... gue akan cuba dl...

tp loe nga keberatan bisa tolong di buat contoh sederhana nga.. pake delphi n ms sql...

trusss kirim ke : aciang007@gmail.com

Note : saya menggunakan ADOQuery dalam proses simpan data.. thanksss...

Very Happy
 
 View user's profile Send private message  
Reply with quote Back to top
Display posts from previous:     
Jump to:  
All times are GMT - 5 Hours
Post new topic   Reply to topic
View previous topic Printable version Log in to check your private messages View next topic
 Delphi Indonesia Forum Index » Database »  MsSQL
Powered by PNphpBB2 © 2003-2007 The PNphpBB Group
Credits