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

dear pak Aksan, terima kasih pak, combo box sudah bisa menampilkan isi folder lokal, tapi masih belum bisa untuk menampilkan isi didalam folder yang disharing dinetwork, misal "\\pcku\sharing\" saya coba modif jadi strItem = Dir("\\pcku\sharing\"), muncul pesan error "run-time error '52' : bad file name or number. mohon bantuannya untuk rekan-rekan sekalian. terima kasih atas bantuannya Rgds, deden ----------------------------------- Aksan Kurdin <aksan.kurdin@gmail.com> Sent by: belajar-access@yahoogroups.com 15/09/10 18:03 Please respond to belajar-access To: belajar-access@yahoogroups.com cc: Subject: Re: [belajar-access] combobox dengan sumber list shared folder Private Sub Form_Open(Cancel As Integer) Dim strValue As String Dim strItem As String With Me.Combo0 .RowSourceType = "Value List" strItem = Dir("c:\") If strItem <> "" Then Do While strItem <> "" strValue = strValue & strItem & ";" strItem = Dir Loop End If .RowSource = strValue End With End Sub