unload txtnew
- Original Message -
From: xkelabu
To: indoprog-vb@yahoogroups.com
Sent: Friday, September 29, 2006 11:34 AM
Subject: [indoprog-vb] delete controls ketika program running
Dear All,
Mo tanya neh, saya add text box ketika program running
Setuju deh sama Vista ( kok mirip nama OS ya ? berarti dapat hak royalty
dong dari Microsoft ... ^_^ )
Secara tidak langsung pengiriman berulang2 tersebut bikin spam lho ...
Best Regards,
Dhani Aristyawan, S.Kom.
EDP Supervisor PT. Trias Sentosa, Tbk.
Desa Keboharan KM 26
Krian -
Sebenarnya saya ngga terlalu yakin bahwa store procedure atau cara anda
mengaskses-nya yang beramasalah.
Saya lebih concern kepada cara anda membind datagrid anda ke recordset
tersebut.
Coba anda main-main sendiri dengan beberapa fungsinya datagrid ini:
Setelah baris
Set
Mohon maaf kalo salah, ini sekedar share aja.
Sebenarnya suatu program itu kita semua bisa tuk membuatnya, mungkin alur
program aja yang sebagian kita ada yang nggak tahu. Gimana kalo prosesnya itu
yang kita share bersama-sama, trus kalo ada yang nggak tahu bisa sama-sama kita
bahas.
Jujur
Anda bisa menggunakan fungsi-fungsi API berikut:
'untuk menulis
Private Declare Function WritePrivateProfileString Lib kernel32 Alias
WritePrivateProfileStringA (ByVal lpApplicationName As String, ByVal
lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
'untuk membaca
Ini Cuma salah satu dari banyak cara ya..
Contoh:
1. mengisi COMBO BOX.
Combobox.clear
Dim x as integer
For x=1 to 1000
Combobox.additem x
Next x
Tapi kalau saya perhatikan, dari pertanyaan nomor 2, sepertinya anda
akan mengisi ini untuk
for all,!
da yang mo bantu saya .!
ku punnya database di access
dengan nama pegawai.mdb
nama tabelnya tbnama
di dalama tabel terdapat kolom
1.nama
2.nip
3.peringkat
form
cbonama
txtnip
txtperingkat
saya ingin
pada saat
ass semua..
mo minta tolong neh.
ajarin bikin report pake crystal report donk...
aku koneksi-nya pake ado.
eh sekalian kalo bikin report-nya pake VB gmn sih?
makasih semua..
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Bagi terjangkit virus lokal, zip virus
Coba pake' ini,
Dim cn As New ADODB.Connection
Dim SQL As String
Private Sub cbonama_Click()
Dim rs As New ADODB.Recordset
SQL = SELECT * FROM tbnama WHERE Kolom_Nama =' cbonama.Text '
rs.Open SQL, cn, adOpenKeyset, adLockBatchOptimistic
txtnip.Text = rs!Kolom_Nip
txtperingkat.Text =
Klo gue sih fine2 aja asal bukan untuk tujuan comersial. Boleh juga tuh idenya
buat share alur. Gue dukung banget.
- Original Message -
From: Igit Syah Riza
To: indoprog-vb@yahoogroups.com
Sent: Friday, September 29, 2006 1:02 PM
Subject: Re: [indoprog-vb] Re: OOT - Program
Hello,
This email message is a notification to let you know that
a file has been uploaded to the Files area of the indoprog-vb
group.
File: /Parking2005.rar
Uploaded by : kuncux2000 [EMAIL PROTECTED]
Description : File Database SQL Server 2000 di Attach dl ya ..
You can
saya ada jg nih program parkir klo rekan-rekan mau ..
saya develop pake vb 6 DB-nya pk SQL Server 2000, udah sy implementasikan jg
dibandung .. tp masi sederhana seh .. karena waktu itu sy dikasi waktu cm 2
minggu aja.. sederhana aja seh kendaraan masuk direcord ke db trus di pos
keluarnya
coba dihilangin spasi antara :
1. microsoft .jet
2. OLEdB. 4.0
3. \ sppd
4. pegawai. mdb
Fahrul Rizal [EMAIL PROTECTED] wrote:
Private Sub Form_Load()
Set cnKoneksi = New ADODB.Connection
cnKoneksi.Open
mau dpnk filenya
dijapri dimana filenya?
--- In indoprog-vb@yahoogroups.com, Arief Kuncara [EMAIL PROTECTED]
wrote:
saya ada jg nih program parkir klo rekan-rekan mau ..
saya develop pake vb 6 DB-nya pk SQL Server 2000, udah sy
implementasikan jg
dibandung .. tp masi sederhana seh ..
Dear All,
Mari kita bantu Widodo
http://www.detiknew
http://www.detiknews.com/index.php/detik.read/tahun/2006/bulan/09/tgl/29/ti
me/101248/idnews/684765/idkanal/10
s.com/index.php/detik.read/tahun/2006/bulan/09/tgl/29/time/101248/idnews/684
765/idkanal/10
Best Regards,
Dhani
Mas Dhani,
Ini sih susah dan pahalanya belum jelas, gimana kalo
kita manfaatkan keahlian kita untuk membantu
pemerataan TI di Indonesia ? sepertinya lebih gampang
daripada nyariin Ibu Widari dan pahalanya lebih jelas.
Regards,
Ade Aan Wirama
Coding for Humanity
--- Dhani Aristyawan (EDP) [EMAIL
Program percabangannya salah Mas. TextBoxnya Anda buat Control Array
saja untuk memudahkan pemrogramannya saja. SEMOGA MEMBANTU.
Dim Arr(), Max
ReDim Arr(Text1.uBound, Text1.LBound)
Max = Text1(0).Text
For i = Text1.LBound To Text1.uBound
If Max Val(Text1(i).Text) Then
Max =
Dear Fahrul Rizal,
+ jawaban dari postingan anda sebelumnya :)
Ini Cuma salah satu dari banyak cara ya..
Contoh:
1. mengisi COMBO BOX.
Combobox.clear
Dim x as integer
For x=1 to 1000
Combobox.additem x
Next x
Tapi kalau saya perhatikan,
Dear Ronnytri A
Pada dasarnya, membuat program apa aja, itu sama saja prosesnya.
Yang penting anda harus mau berpikir.
pertama, Analisa sistem yang akan anda buat.
Jagngan berpikir semua program MLM itu sama. Bagaimana kalau
ternyata system MLM di tempat lain memiliki prosedure-prosedure
ada yang tau alamat nya website software class digital dan perpustakaan gak..
tolong dong..
[Non-text portions of this message have been removed]
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Bagi terjangkit virus lokal, zip virus tersebut
dan kirim ke [EMAIL
20 matches
Mail list logo