MS ACCESS MAILING LIST: Re: [belajar-access] combobox dengan sumber list shared folder

Thursday, September 16, 2010

Re: [belajar-access] combobox dengan sumber list shared folder

dear deden,
bukannya tinggal di textbox text2 saja di tuliskan: \\pkcu\sharing\*.accdb ?

aksan kurdin

On 9/16/2010 5:35 PM, easy goin wrote:

thanks pak Aksan atas motivasinya,
akhirnya ketemu juga,

tinggal modif jadi strItem = Dir(Text2 & "*.accdb") , jadi deh..

terima kasih atas bantuannya

Rgds,
deden
===========
Aksan Kurdin <aksan.kurdin@gmail.com>
Sent by: belajar-access@yahoogroups.com
16/09/10 17:53
Please respond to belajar-access
To: belajar-access@yahoogroups.com
cc:
Subject: Re: [belajar-access] combobox dengan sumber list shared folder

bah, udah kau coba belum, den .....

aksan kurdin
:P

On 9/16/2010 4:40 PM, easy goin wrote:

dear pak Aksan,
ternyata masalahnya di akhirannya harus ditambah "\" (lupa dimasukan..),

"\\pcku\data\" langsung muncul listnya...

apakah bisa juga pak kalo mau membatasi extensi tertentu saja yang ditampilkan di combo box ? mis. *.accdb

terima kasih banyak atas pencerahannya

Rgds,
deden

================
Aksan Kurdin <aksan.kurdin@gmail.com>
Sent by: belajar-access@yahoogroups.com
16/09/10 15:17
Please respond to belajar-access
To: belajar-access@yahoogroups.com
cc:
Subject: Re: [belajar-access] combobox dengan sumber list shared folder

Jalan, kok. Tuh muncul ......
Ada pesan error ? Apa katanya ?
Coba modifikasi kode jadi berikut:

Private Sub Command5_Click()
Dim strvalue As String
Dim strItem As String

On Error GoTo errHandle

With Me.Combo0
.RowSourceType = "Value List"
strItem = Dir(Text2)
If strItem <> "" Then
Do While strItem <> ""
strvalue = strvalue & strItem & ";"
strItem = Dir
Loop
End If
.RowSource = strvalue
End With
Combo0.SetFocus
Combo0.Dropdown

Exit Sub

errHandle:
MsgBox Err.Description, vbCritical, Err.Number
End Sub

aksan kurdin

On 9/16/2010 12:40 PM, easy goin wrote:

dear pak Aksan,
sudah saya coba bisa lewat command prompt, tapi error kalo lewat msaccess

terlampir sampelnya

terima kasih

Rgds,
deden

============================

Aksan Kurdin <aksan.kurdin@gmail.com>
Sent by: belajar-access@yahoogroups.com
16/09/10 12:45
Please respond to belajar-access
To: belajar-access@yahoogroups.com
cc:
Subject: Re: [belajar-access] combobox dengan sumber list shared folder

dear deden,
saya coba di tempat saya dengan menunjuk ke direktori share saya tetap keluar, kok.
coba di command prompt anda lakukan perintah :

dir \\pkcu\sharing

jika di command prompt keluar, maka seharusnya di access pun harus keluar.

aksan kurdin