try this...
create a DirListBox (Dir1) and a command button, ff code will work :)
Private Sub Command1_Click( )
Dim i As Integer
Dir1.Path = "e:\ListOfXXXDi rs"
Dir1.Refresh
For i = 1 To Dir1.ListCount
MsgBox Dir1.List(i - 1)
Next i
msgbox "HAPPY CODIn :) " & chr(13) & "...
wappy
Last Activity: Aug 28 '06, 10:37 AM
Joined: Aug 26 '06
Location:
-
hey mannuvashishta .
~ U never try(to post ur code) U'll never (get help and ) learn ~
see :PLeave a comment:
-
me, im using unbound database connection to the crystal report(unbound fields). its handy to change the rec for display on-the-fly.Leave a comment:
-
it seems that ur vb application resides on one machine and u just shared it thru LAN. running your application remotely isnt a good idea, how abt installing it on every machine where ull use and just be sure to point the database connection on the computer where ur database file is located. MABUHAY!!!Leave a comment:
-
you shouldnt put a procedure name on listbox.additem since the syntax only requires a variable or a string value, besides sub procedures doesnt return a value, use functions instead of procedures it will work then.Leave a comment:
-
TRY THIS..........
Private Sub Command1_Click( )
Dim arr(4) As String
arr(0) = ""
arr(1) = "Kill"
arr(2) = "Zav"
arr(3) = "SAV"
arr(4) = "Jan"
AddTitle arr
End Sub
Private Sub AddTitle(ByRef arr() As String)
Dim i As Integer
ListBox1.Clear
...Leave a comment:
-
how about this... :)
Private Sub AddPrefixToArra y(ByRef arr() As String)
Dim i As Integer
For i = 1 To UBound(arr)
arr(i - 1) = "Sir " & Trim(arr(i - 1))
Next i
End SubLeave a comment:
-
you can add another column of type bigint make it auto increment by setting Identity properties to Yes. then you can mannually delete the row :)...Leave a comment:
No activity results to display
Leave a comment: