Maaf mas yohan, saya mau tanyak lagi utk masalah deparment. Saya sdh coba beberapa kali, tetap aja gagal. Maaf mas, saya kurang paham dgn apa yg mas bilang. Boleh kasih contoh atau tutorialnya yg jelas. Maaf sekali mas yohan, saya butuh bantuannya. Juga buat rekan2 yg lain yg bisa bantu saya.
Thx, Hendra --- In [email protected], "hendra" <[EMAIL PROTECTED]> wrote: > > Mas, Yohan utk yg jenis kelamin saya sdh bisa. > Saya buat seperti ini. (Kalau salah tolong di koreksi) > > if cmbkelamin.text="Pria" then > rssystem!jeniskelamin="L" > elseif cmbkelamin.text="Wanita" then > rssystem!jeniskelamin="P" > end if > > Sekarang saya mau pakai dept dengan menggunakan code (Mis:001 utk IT, 002 utk HRD) > Masalahnya mas yohan, dept di tmp kami byk sekali macamnya sampai 79 dept. Kalau saya buat seperti di atas, waduhhhh lama mas. > Maaf mas Yohan saya ini baru dlm program jadi saya agak bingung dgn apa mas yohan maksud. Tolong kasih masukan yg sederhana aja. > > Thanks and best regards, > Hendra P Sirait > ~~~~~~~~~~~~~~~~~~~~~~~~ > Office Add; > PT Sentraco Garmindo > Jl. Raya jati Pasar Kemis > Jl. Putera Utama No.39 > Tangerang Banten > > > > > ----- Original Message ----- > From: Yohan Widodo > To: [email protected] > Sent: Wednesday, July 04, 2007 12:51 PM > Subject: Re: [indoprog-vb] cara simpan file > > > mas hendra ini mungkin akan sedikit membantu > coba mas hendra yang simpan adalah index data dalam combo > mis > misalnya data.field(" JenisKelamin" )= cbojeniskelamin.index > maka nantinya akan tersimpan dalam table index saja yaitu numeric > (dengan default index dalm combo adalah index -1 = kosong, 0 data ke 1, 1 data ke=2 dst.....) > > untuk menampilkan tinggal membalik saja > cbojeniskelamin.listIndex=data.field(" JenisKelamin" ) > Ok semoga membantu.. > > ----- Original Message ---- > From: hendra <[EMAIL PROTECTED]> > To: [email protected] > Sent: Wednesday, July 4, 2007 1:14:23 PM > Subject: Re: [indoprog-vb] cara simpan file > > Thx kang andi utk infonya dan skr sdh bisa. > > Tapi saya ada sedikit masalah, bgm kalau codenya byk? kan capek juga kang ngetik if..then.. elseif > > Kira2 solusi yg enak bgm ya. Thx buat infonya > > Thanks and best regards, > > Hendra P Sirait > > ~~~~~~~~~~~~ ~~~~~~~~~ ~~~ > > Office Add; > > PT Sentraco Garmindo > > Jl. Raya jati Pasar Kemis > > Jl. Putera Utama No.39 > > Tangerang Banten > > ----- Original Message ----- > > From: Kang Andi > > To: indoprog-vb@ yahoogroups. com > > Sent: Friday, June 29, 2007 6:24 PM > > Subject: Re: [indoprog-vb] cara simpan file > > Gunakan fungsi Left(string, Length) untuk mengambil > > string atau karakter sejumlah tertentu dari suatu > > string. > > misalnya data.field(" JenisKelamin" )= _ > > left(cbojeniskelami n.text,1) > > maka nanti akan terseimpan satu huruf dari combo yang > > terpilih > > untuk menampilkan kembali kedalam combo gunakan > > pencabangan If .. else... > > Jangan lupa validasinya. .. > > --- hendra <[EMAIL PROTECTED] .net> wrote: > > > > > > Teman2 saya mau tanyak dekit. > > > Saya punya database mis: karyawan dan field-nya > > > jenis kelamin (Perempuan dan laki2, di databse-nya > > > hanya codenya aja P dan L). > > > Di Aplikasi saya dgn menggunakan vb6, combobox yg > > > text-nya adalah perempuan dan laki2. Waktu saya save > > > di database-nya kesimpan perempuan atau laki2, bgm > > > cara-nya waktu saya nyimpan yg kesimpan di database > > > adalah code jenis kelamin aja. > > > Terimakasih utk masukkanya dan saya minta maaf bila > > > penjelasannya kurang di mengerti dan harap maklum > > > krn saya org baru di VB. > > > > > > NB: Database-nya menggunakan access > > > > > > Thanks and best regards, > > > Hendra P Sirait > > > ~~~~~~~~~~~~ ~~~~~~~~~ ~~~ > > > Office Add; > > > PT Sentraco Garmindo > > > Jl. Raya jati Pasar Kemis > > > Jl. Putera Utama No.39 > > > Tangerang Banten > > > > > > > > > > > > > > > > > > [Non-text portions of this message have been > > > removed] > > > > > > > > ____________ _________ _________ _________ _________ _________ _ > > Sick sense of humor? Visit Yahoo! TV's > > Comedy with an Edge to see what's on, when. > > http://tv.yahoo. com/collections/ 222 > > [Non-text portions of this message have been removed] > > <!-- > > #ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;} > #ygrp-mlmsg table {font-size:inherit;font:100%;} > #ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean, sans-serif;} > #ygrp-mlmsg pre, code {font:115% monospace;} > #ygrp-mlmsg * {line-height:1.22em;} > #ygrp-text{ > font-family:Georgia; > } > #ygrp-text p{ > margin:0 0 1em 0;} > #ygrp-tpmsgs{ > font-family:Arial; > clear:both;} > #ygrp-vitnav{ > padding-top:10px;font-family:Verdana;font-size:77%;margin:0;} > #ygrp-vitnav a{ > padding:0 1px;} > #ygrp-actbar{ > clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;} > #ygrp-actbar .left{ > float:left;white-space:nowrap;} > .bld{font-weight:bold;} > #ygrp-grft{ > font-family:Verdana;font-size:77%;padding:15px 0;} > #ygrp-ft{ > font-family:verdana;font-size:77%;border-top:1px solid #666; > padding:5px 0; > } > #ygrp-mlmsg #logo{ > padding-bottom:10px;} > > #ygrp-vital{ > background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;} > #ygrp-vital #vithd{ > font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;} > #ygrp-vital ul{ > padding:0;margin:2px 0;} > #ygrp-vital ul li{ > list-style-type:none;clear:both;border:1px solid #e0ecee; > } > #ygrp-vital ul li .ct{ > font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;} > #ygrp-vital ul li .cat{ > font-weight:bold;} > #ygrp-vital a { > text-decoration:none;} > > #ygrp-vital a:hover{ > text-decoration:underline;} > > #ygrp-sponsor #hd{ > color:#999;font-size:77%;} > #ygrp-sponsor #ov{ > padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;} > #ygrp-sponsor #ov ul{ > padding:0 0 0 8px;margin:0;} > #ygrp-sponsor #ov li{ > list-style-type:square;padding:6px 0;font-size:77%;} > #ygrp-sponsor #ov li a{ > text-decoration:none;font-size:130%;} > #ygrp-sponsor #nc { > background-color:#eee;margin-bottom:20px;padding:0 8px;} > #ygrp-sponsor .ad{ > padding:8px 0;} > #ygrp-sponsor .ad #hd1{ > font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;} > #ygrp-sponsor .ad a{ > text-decoration:none;} > #ygrp-sponsor .ad a:hover{ > text-decoration:underline;} > #ygrp-sponsor .ad p{ > margin:0;} > o {font-size:0;} > .MsoNormal { > margin:0 0 0 0;} > #ygrp-text tt{ > font-size:120%;} > blockquote{margin:0 0 0 4px;} > .replbq {margin:4;} > --> > > __________________________________________________________ > Building a website is a piece of cake. Yahoo! Small Business gives you all the tools to get online. > http://smallbusiness.yahoo.com/webhosting > > [Non-text portions of this message have been removed] > > > > > > [Non-text portions of this message have been removed] >
