/* */

Thursday, September 16, 2010

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



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

No comments:

Post a Comment