Parsing Item Between List Boxes

Parsing Data From Two List Boxes
Hello,

I have two listboxes both containing dates. One list box has a list of complete dates from 11/11/2002 to 11/20/2002. The second listbox has only some of the dates in the same range, i.e. 11/12/2002, 11/15/2002 and 11/16/2002. I would like to be able to take the dates from the first listbox, that do not appear in the second listbox and display them in a third listbox. Does anyone have an idea as to how this might be done?? I've been trying and just can't seem to pulli ti together.

---

Selecting The Nth Item In Several List Boxes
Hi

I was wondering is it possible to select say the fourth item in several list boxes so they are all highlighted in the same place. The coding would be greatly appreciated!

---

Remove Item From 2 List Boxes
Hi!

I have 2 list box controls with same values - the first list is sorted and the other one is not. I hide/show approprate lists if user wants sorted/unsorted items.

Now I would also like to let the user to delete items from the list - deleting from one list is simple, but how can I delete the same entry in another one (as the list index is not the same)?

I guess it could work by looping thorugh the list and deleting the list entry that has the same text, but is there and easier way?

Bostjan

---

Moving Item Between List Boxes
I have a command button with the Caption ">". When clicked I want the selection the user has made in ListBox1 to be moved to ListBox2.

Anyone ever do something like this before?

thx..

---

List Boxes Remove Item
how would you remove an item from a list box?

---

Parsing Through Each Item In Combo Box
Hi there,

When I click a button, I want a message box to pop up with the combo box value, one by one. Something like this...


Quote:




Private Sub Command1_Click()
For Each Item In Form1.Combo1
MsgBox Combo1.ItemData
Next Item
End Sub




However, the value does not appear. In other words, the message box appears but there is NO value although I can see that the combo box is populated. Can someone help? Thanks

---

Parsing The List Recieved From The LIST Command On An FTP Server
I need to parse the list that is recieved from differnet servers. Now, the list is not always in the exactly same format, but always is in some kind of pattern.

This list is the directory information that you request. I need help in parsing it, into the different data it contains

I know of 2 main types of listing - UNIX-type and DOS-type.

The UNIX type is a more full, with serveral details like Owner, Group Permissions etc, while the DOS-type is like a scaled-down version of the UNIX type.

format of Unix Type

Code:
drwxrwxrwx 1 owner group 43 oct 18 1996 Directory number 1
-rwxrwxrwx 1 owner group 43 oct 18 1996 This is file 1.txt
-rwxrwxrwx 1 owner group 43 oct 18 1996 This is file 2 .txt
-rwxrwxrwx 1 owner group 43 oct 18 1996 This can be file 3 etc.txt
format of DOS-type

Code:
10-18-96 11:10AM 43 This is file 1.txt
10-18-96 11:10AM 43 this is File 1.txt
10-18-96 11:10AM 43 this is File 2.txt
But also there are other variations to those types. If all the responses followed that style, that would be no problem.

The unix-type can sometimes be sent like this.

Code:
drwxrwxrwx 1 owner 43 oct 18 1996 Directory number 1
The dos-type can sometimes be also sent like this

Code:
07-13-03 09:12AM 20151 diablo.jpg
07-13-03 09:12AM 11927 dls.jpg
07-13-03 01:44AM <DIR> doc
07-13-03 08:50AM <DIR> docu
etc.

I developed a parsing routine that first determines if the list is Unix/DOs type.

First it parses the list into lines

This can be done by checking for a "d", "-", or "l" at the begining of the line.

But all the different types of responses are not easy to generalize. There is no responsible RFC for generalizing them, or making them standard. It just says that they must be in a "Human-Readable Form".

I've seen FTP clients that do parse almost all (I've yet to see any client that is not parsed by a tested client).

Does anyone know a good routine, or anything that might help me on my venture in parsing ? hehe

thanks a lots in forward!

any help, more than appreciated!

PS: Didnt put this in the Communications cause i dont tink it has anything to do with Winsock, cause i am not asking HOW TO recieve the LIST command.

---

ComboBox List/add Item, If Item Exists, Dont Add It Again!
Dudes and Dudeesses I need help!

I have a problem with a combobox within a form. I'm scanning down the spreadsheet for values and asking a combobox to .additem, however, the same value may appear twice whilst scanning down. Is there an if statement that will look and check the combobox to see if it is already added, if so dont add it again, if not, add it?

as below,

Code:
combobox.AddItem "Hotmail"
combobox.AddItem "Yahoo"
combobox.AddItem "Hotmail"
Hotmail will be added twice, how can I stop that?

If worst comes to the worst, I can sort it out with a long winded method, but I'm hoping theres a quicker way.

Thanks for all your help

---

All Things In Form Text Boxes List Boxes...Saving
Is the a command thats save every thing that is changed changed in form ...all text boxes all list boxes ...everything that has changed

---

Cbo Boxes Parsing Table For Info
I would like to parse a database for specific reporting information. This design uses two combo boxes to find specific information from a main table - one which identifies a first source (based on a column), and the second which identifies information found in the row that contains the first source only. This resulting information would be modified by variables (<, ., =, <=, >=, etc), and further filtered by text box information (which would be alphanumeric).

So far, I have this code, but it's not returning any requested information into the display subform or query which it references:


Private Sub cmdRun_Click()
On Error GoTo Err_cmdRun_Click
Dim strSQL As String, strPipe As String, strTypeA As String, strReport As String, strTypeB As String, strVariable As String, strValue As String, strOp As String, strCaption As String
Dim strSQL1 As String, strSQL2 As String, strFilter As String, strFilter2 As String, strErr As String, strInput As String
Dim intX As Integer, intY As Integer
Dim blnOp As Boolean, blnValid As Boolean
Dim bln1 As Boolean, bln2 As Boolean, bln3 As Boolean, bln4 As Boolean, bln5 As Boolean

intY = 0
blnValid = False
For intX = 1 To 5
Select Case intX

Case 1
strPipe = Nz(Me.cboPipe1.Value, "000")
strReport = Nz(Me.cboReport1.Value, "000")
strTypeA = Nz(Me.txtTypeA1.Value, "000")
strTypeB = Nz(Me.txtTypeB1.Value, "000")
strVariable = Nz(Me.cboVariable1.Value, "000")
strValue = Nz(Me.txtValue1.Value, "000")
If intY > 0 Then
strOp = ""
End If

Case 2
strPipe = Nz(Me.cboPipe2.Value, "000")
strReport = Nz(Me.cboReport2.Value, "000")
strTypeA = Nz(Me.txtTypeA2.Value, "000")
strTypeB = Nz(Me.txtTypeB2.Value, "000")
strVariable = Nz(Me.cboVariable2.Value, "000")
strValue = Nz(Me.txtValue2.Value, "000")
If intY > 0 Then
strOp = Nz(Me.cboOp1.Value, "000")
Else
strOp = ""
End If

Case 3
strPipe = Nz(Me.cboPipe3.Value, "000")
strReport = Nz(Me.cboReport3.Value, "000")
strTypeA = Nz(Me.txtTypeA3.Value, "000")
strTypeB = Nz(Me.txtTypeB3.Value, "000")
strVariable = Nz(Me.cboVariable3.Value, "000")
strValue = Nz(Me.txtValue3.Value, "000")
If intY > 0 Then
strOp = Nz(Me.cboOp2.Value, "000")
Else
strOp = ""
End If

Case 4
strPipe = Nz(Me.cboPipe4.Value, "000")
strReport = Nz(Me.cboReport4.Value, "000")
strTypeA = Nz(Me.txtTypeA4.Value, "000")
strTypeB = Nz(Me.txtTypeB4.Value, "000")
strVariable = Nz(Me.cboVariable4.Value, "000")
strValue = Nz(Me.txtValue4.Value, "000")
If intY > 0 Then
strOp = Nz(Me.cboOp3.Value, "000")
Else
strOp = ""
End If

Case 5
strPipe = Nz(Me.cboPipe5.Value, "000")
strReport = Nz(Me.cboReport5.Value, "000")
strTypeA = Nz(Me.txtTypeA5.Value, "000")
strTypeB = Nz(Me.txtTypeB5.Value, "000")
strVariable = Nz(Me.cboVariable5.Value, "000")
strValue = Nz(Me.txtValue5.Value, "000")
If intY > 0 Then
strOp = Nz(Me.cboOp4.Value, "000")
Else
strOp = ""
End If

End Select

If strPipe <> "000" And strPipe <> "" Then
strErr = CheckValid(strPipe, strTypeA, strReport, strTypeB, strVariable, strValue, strOp, intY)
strInput = strVariable & " " & strValue

If strErr = "" Then
'strFilter = GetCriteria(strPipe, strReport, strInput)
strFilter = BuildCriteria(txtSQL, dbText, strInput)
strFilter2 = BuildCriteria(txtSQL2, dbText, strInput)
If Not IsNull(strFilter) And strFilter <> "" Then
intY = intY + 1
If Not IsNull(strFilter2) And strFilter2 <> "" Then
intY = intY + 1
End If
End If

If intY > 0 Then
strSQL2 = strSQL2 & " " & strOp & " " & strFilter
Else
strSQL2 = strSQL2 & " " & strFilter
End If
Else
MsgBox strErr

End If
End If

Next


strSQL2 = "SELECT Pipeline, Feature, WheelCountFT, WheelCountIN, StationNumberFT, DepthPERCENT, WTIN, LengthFT, LengthIN, " _
& "InteriorExterior, OrientationCLOCKWISE, BurstModB31G, RPRModB31G, BurstEffArea, RPREffArea, SMYS, DistFromUSWeldFT, " _
& "DistFromUSWeldIN, DistFromDSWeldFT, DistFromDSWeldIN, DistToUSAGMIN, DistToUSAGMIN, DistToDSAGMFT, " _
& "DistToDSAGMIN, JointLengthFT, JointLengthIN, Comments, Latitude, Longitude, Elevation, AdditionalComments " _
& "FROM qryOpenQryTrans_Report "
'& "FROM qryOpenQryTrans "


If intY > 0 Then
strSQL = strSQL & " WHERE " & strSQL2
End If

Me.txtSQL2.Value = strSQL2
Me.frmSubOpenQryTrans.Form.RecordSource = strSQL2

Close_cmdRun_Click:
Exit Sub

Err_cmdRun_Click:
MsgBox Err.Description
Resume Close_cmdRun_Click

End Sub

---

Single Item List Box (item Not Really Selecting)
Application=Access2002

The following code has worked for me in the past but won't now for some reason.
I have a private function and/or subs that performs a few simple operations such as setting listbox rowsources and simple math functions on a form. The queries set as rowsource use criteria from other single item listboxes.
Now, for some reason, the queries won't return values until the previously .selected(0) = true (single item) list boxes have been clicked on.
Problem has only been in creating a new form. Perhaps the problem did not occur in older created forms due to compatibility?


Private Sub fraEWTo_AfterUpdate()

[Edited]
    lstRotorHoursPriorTo.RowSource = "qryRotorSwapHoursTotTo" 'gets hoursprior from tblRotors
    lstRotorHoursPriorTo.Selected(0) = True ' This is one place where the problem seems to exist, the control does not function until it has been clicked on via mouse.

    LstClockInTo.RowSource = "qryRotorSwapRAHoursIPTo"
    LstClockInTo.Selected(0) = True

    txtRACHIPTo.Locked = False
    txtRACHIPTo.Value = txtClockHoursTo.Value - lstClockInTo.Value 'nor will this until the lstClockInTo box has been manually selected


A Mechanic in a Programmers shoes
Thanks




Edited by - greenfch on 12/7/2005 11:22:52 AM

---

Web Control, List Boxes, Text Boxes, Please Help This Is Winding Me Up!
Hi guys i need some help with the webcontrol function in VB6

Part of my program needs to put listbox data from the program into a text box on the web and then click a submit button...

The list box i have has a list of multiple directories in (for the location of my files), from there i just want the program to put the top directory of the list box into a text box on the web and click a submit button on the web (its for uploading a queue of files), then after that has finished uploading, do the next directory in the list box... etc

It sounds pretty simple but i have no idea how to do it...

Thanks for any help you can give me, i will write a really good review about you and good rating etc.

Any knowledge of this would be greatly appreciated

thanks a bunch

toodle pipples

Alex

---

Parsing A Text File Into Combo Boxes
I have a comma delimited text file I am trying to get to split into two combo boxes. I want the first item in the CboID then the second item in cbospokenword. I have attached an example of my test file. I used this code to get all into one combo box.

Dim lngFileNo As Long
Dim str As String

CboID.Clear
lngFileNo = FreeFile

Open "C:JoeyVisual BasicVocab_LocaterMyFile.txt" For Input As lngFileNo

Do While Not EOF(lngFileNo)
Line Input #lngFileNo, str
CboID.AddItem str
Loop

Close lngFileNo

CboID.ListIndex = 0 'select first item in list

---

Combo And List Boxes To Text Boxes?
Connecting sub-menus to rich text boxes is fine is most cases but the user does not always want to use menus to load and display text. Applying the same technique as sub menus to text boxes with combo or list boxes just wont work could someone please help me out with this one.

Both combo and list boxes will for example:

Contain an alphabetic list.
When the user clicks on a file it should locate the text file from the drive.
It should then open it into a rich text box on the same form.

Could this be possible?

Please any help will greatly be appreciated.

---

Help With File List , Dir List And Drive List Boxes..
How do i link my drive list , file list and dir list boxes to gether , so that when i for exaple set the drive list to c: , the dir list will then give all dir in there, and file list will show me files from the directory, right now the default file list is set to my vb file list and i cant change it...

---

Finding List Item As U Typed In Combo Box(Dropdown List Style).
Basically the title say it all.

When I type a letter in combo box it finds item by matching the letter that I typed, but when I type in a second letter it searchs item that starts with the second letter.

I wonder is there a way to macthing list item as u typed in combo box(Dropdown List style).

Thanks in advance.
Joon

---

Create List Of Files From Folder But Allow Double Click On List Item To Run Bat
I am a newbie
But am making some progress
My next plan is to make a simple dialog with a list box and 3 buttons to do the following
List all the batch files in a folder
then allow me to highlight one item in the list so when I click the button it will run that bat file.

Sounds easy enough but I just keep hitting a brick wall and am not making any progress at all.

All help or similar snipits of code that I can re-organise will be greatfully apperciated.

Thanks in advance

---

HighLight List Box Selected List Item With User Defined Color
Hi Friends,

I need a help from u all. My problem is to change the Backcolor of the selected listitem of a listbox.

Let me explain detail. Normally in a listbox if we selected the list, the list item will be highlited with blue backgroud (ie. the selected item color settings of the system). Now I need to hightlight the selected list in the list box with my own color say red, green or something else.

Would anyone help me.

V.P. Vijayavel

---

If Item Selected In Combo Box Then Clear List Box Then Add New Items In The List Box
how?

---

How To Change Back Color Of List Item In List View
Dear members,

i am having small problem with listview control , I want to assing alternate colors to list items, but i con't,

hope someone will help

regards
D.L.Narayana

---

List Box Item Scrolling (Next Item)
Hello,

I was wondering what the code would be for a command button to make the next item in the list box be selected?

Kind of like a NEXT button.
EXAMPLE:
List box Line 1
List box Line 2
List box Line 3
List box Line 4

If List box Line 2 is selected then clicking the next button would DESELECT List box Line 2 and SELECT List box Line 3.

If I didn't explain enough just let me know.

Stilekid007

---

ListBox - Move List Item To Place In List
I have a list box with several items. I am trying to make a button that when the user selects an item in the list box, they can click on the button which will move the item up one in the list box:

So if my list looked like this:

ONE
TWO
THREE
FOUR
FIVE

and the user selected FOUR and clicked the button the list would look like this:

ONE
TWO
FOUR
THREE
FIVE


Does anyone know how to do this?

Thanks,
M

---

Combine List Items To Create New Item In Same List?
Hi all,

This has been giving me fits for a few days - any help would be most appreciated. I'm sure it's pretty simple, but I'm new to VB (and programming in general) and can't seem to come up with the correct syntax to get this to work:

I have a listbox from which the user can select mutliple items. Once user performs a multi-select, I enable a button (no problem there). When user clicks that button, I want to create a new item in that same list consisting of all selected items with "AND" between them.

Thus, if user had selected <item 1>, <item 2>, and <item 4>, the new item would be "<item 1> AND <item 2> AND <item 4>". Can someone please help me with the logic and syntax on this?

Here's what I have up to this point (I've removed the parts that I believe - based on the fact that this is not working - to be wrong and replaced them with ?????):

Code:
        Dim terms As String
        For Each terms In List.SelectedItems
            If List.SelectedItems.Count > 1 Then
                terms = ??????? & " AND " & ???????
            End If
        Next
        List.Items.Add (???????)


Thanks!!



Edited by - troy_atl on 10/17/2005 12:04:26 PM

---

Change Background /Forgroound Of Each List Item In A List Box
How would i be able to change the back color of a listitem in a list control ? For example i want item number 1 to have a red background item number 2 to have a blue background etc.
Thanks for the help

Jerry

---

LIST BOX HELL. Please Save, Remove Items, Many List Boxes...one Last Name
ok, so the code so far, or as much as you need to see, is
****************************
***************************
***************************
***************************
***************************

Sub LoadCal()
Dim gdtDate As Date
Dim i As Integer
Dim x As Integer
Dim startDay As Integer
Dim giMaxDays As Integer

' clear list boxes before filling again
For i = 0 To 41
List1(i).Clear
Next

' * * * * * * * * * * * * * * * * * * * * * *
' * * * * * ADD DAY NUMBERS * * * * *
'label at top of form
Label1.Caption = MonthName(giMonth) & " " & giYear

'this is the current date
gdtDate = CDate(giMonth & "/01/" & giYear)

'minus one so the first line is never completely empty
startDay = Weekday(gdtDate) - 1

'the number of days in this month
giMaxDays = Day(DateAdd("m", 1, gdtDate) - 1)

'populates list boxes with days
x = 1
i = startDay
While i < (giMaxDays + startDay)
List1(i).AddItem (x)
x = x + 1
i = i + 1
Wend

' * * * * * * * * * * * * * * * * * * * * * *
' * * * * * ADD NAMES TO DAYS * * * * *

' !!!!!!!!!!!!!!!!!check to see that list is not empty !!!!!!!!!!!
If lstAgentList.ListCount = 0 Then GoTo done
'!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

'agent list counter, "at which item" index
x = -1
'populate list boxes from the first day of the month with numbers
i = startDay
'counter for number of days until sunday
a = startDay - 1

'from the first day to the last day
While i < (giMaxDays + startDay)
If a < 6 Then
'a maximum of 3 names per day
While (List1(i).ListCount) < 4
' if there are no more items in the items list ('x' is greater than counter)
If x < (lstAgentList.ListCount - 1) Then
x = x + 1
' otherwise set it back to 0 (zero)
Else
x = 0
End If
'add the next name from the established agent list
List1(i).AddItem (lstAgentList.List(x))
Wend
a = a + 1
Else
'a maximum of 3 names per day
While (List1(i).ListCount) < 4
'add the next name from the established agent list
List1(i).AddItem (lstAgentList.List(x))
'here we do not increment name for it is a sunday
Wend
'reset 7 days until sunday counter
a = 0
End If
'increment day count
i = i + 1
Wend

done:
' end
End Sub



***************************
***************************
***************************
***************************
now see the shaddy thing with this is...well, it's a calendar month see, and every day is a list box....first item, the date, 1st, 2nd, 3rd, 4th, and so on...each list box can hold that first item, the date, plus 3 names.

if someone double clicks on one of those names (which are populated through other methods...not important) i want that name to be deleted...now where i am out of ideas is: how do i delete one item from one list when my list (List1) is an array of about 41 list boxes all named List1 (x) see....

also if I wanted that name which was double click to delete itself through the entire month, then ....well...the rest is my own trouble...but so far i can't seem to be able to delete.

grrr.
...

thanks in advance,
-munchkin

---

Parsing Content Of Text Boxes To Crystal Report Writer - Public Variables
Dear Expert,

I'm parsing contents of text boxes on a form to crystal report writer.

These text boxes don't write to any datatables.

What is the approriate syntax to send say


1. a numeric figure

2. a name


straight from the form to crystal report writer without saving into a datafile.


Thanks

---

Combo Boxes Or List Boxes?????
A bit of a beginners question. Hope it makes sense

I dont know which is the best to use. Here is the problem:

I want some kind of drop down list that allows the user to pick one of 12 items. Then that item is linked to a set of numbers. For e.g. if user chooses the item "A" then this means the numbers 0.025689 and 0.85696 is linked to each. Now do i use a combo or a list item or something else.

In addition what kind of code do you use to enter new items in a combo box or list item box. I tried to use:

ComboBox1.AddItem "A"
ComboBox1.AddItem "B"

within the combo box private sub - but when i play it back the combo box is empty. Any ideas???

Thanks

---

List Boxes And Text Boxes
Ok i have a list box that has a list of movies to choose from then you choose how many tickets you want i want to know how to display them in a text box and how to clear the dat file that i saved it in

---

List Boxes And Text Boxes
I have a list box with a bunch of items in it. I'm trying to make it so that when you click on an item in a list, the text appears in a text box. I don't know too much.. but what I have so far is

Private Sub List1_Click()
Dim i As Integer
Text1.Text = List1.List(i)
End Sub

What this does is when I click an item, it makes the text of the textbox the first item in the list. How do I change it so that I can pick an item from the list and have the text of that item displayed in the text box? Thanks in advance!

---

List Boxes Vs Check Boxes
How much harder are List boxes to program compared to Check boxes?

---

List Boxes = Text Boxes
Hi I'm new here (and to VB). I'm using VB in Excel and trying to get a list box to write to a series of three text boxes. I have a mobile phone user form and the list box has a selection of phones in it. I want the user to be able to choose three phones from the same list box and have the results display - one in each box. Can I do this and, if so, how?

---

DataList Boxes Vs. List Boxes
OK - I currently have a DataList box which displays all of my records using the "List Field" Property. I need to enable a multiselect feature though. So I decided to use the REGULAR List Box, since it has a multiselect property. Yet, I cant seem to get the list box to have all of the records in there (or any of them for that matter). Is there a similar property in regular list boxes like the "List Field" Property, or is there a similar property in DataList Boxes which can enable multiselect?

Someone help!

---

Add A List Item To A Loaded Form List
help please. this is probably very simple.

i have a form loaded and showing. i need to add items to a list box, and my code is in a public sub in a different module.

my code follows. i wind up getting an "object doesn't support this type of property..."

i feel like i am close, i just don't seem to be referencing the form list correctly.

thanks much!

Public Sub BuildOverviewList()

Dim dbSOURCE As Database
Dim dbTARGET As Database
Dim rsSOURCE As Recordset
Dim rsTARGET As Recordset
Dim strDatabase As String
Dim strTable As String

strDatabaseName = "ProductCategories.mdb"
strTableName = "tblCurrentPresentation"
Set dbTARGET = OpenDatabase(dbPath & strDatabaseName)
Set rsTARGET = dbTARGET.OpenRecordset(strTableName, dbOpenDynaset)

'aryProductGroup provides the selected categories
For i = 1 To UBound(aryProductGroup)
'aryCategory1
For j = 1 To UBound(aryCategory1)
If aryCategory1(j) = -1 Then
strDatabaseName = "Category1_information.mdb"
strTableName = "CategorySlides"
Set dbSOURCE = OpenDatabase(dbPath & strDatabaseName)
Set rsSOURCE = dbSOURCE.OpenRecordset(strTableName, dbOpenSnapshot)
'write the record to the target table and add to list1
'USE THE ARRAY POSITION (j) TO GET THE SLIDE NAME FROM THE CORRECT TABLE
'ADD THAT SLIDE NAME TO THE LIST.
With rsSOURCE
rsSOURCE.Move (j)
With rsTARGET
.AddNew
![StepID] = 4
![CategoryID] = aryProductGroup(i)
![ProductID] = j
![Name] = rsSOURCE.Fields("SlideName").Value
.Update
End With
'Forms.frmPresOview6.List1.AddItem rsSOURCE.Fields("SlideName").Value
Forms.frmPresOview6.List1.AddItem rsSOURCE.Fields("SlideName").Value
End With
'also add record to ProductCategories/tblCurrentPresentation
End If
Next j

Next i

---

Combo Boxes Next Item
THANK TO ALL !!
my application has a combobox simple with N items

How to move to next item and show on combo with vb 6 code?

CMBX.ADDITEM = "EXAMPLE"
CMBX.ADDITEM = "EXAMPL1"
CMBX.ADDITEM = "EXAMPL2"

EVERY TIME THE USER PRESS A COMMAND THE COMBO CHANGE TO NEXT ITEM ON LIST
THANKS

---

Drive List And Directory List Boxes
I have one drive list box and one directory list box in my program.
When I run my program I can see all Local and Mapped network drives.
But I need to add the Network Neighborhood in the Drive list box.
I need to be able to see all servers and drives on the network. Can anyone tell me how to do this? Thanks!

---

Drive List And Directory List Boxes
I have one drive list box and one directory list box in my program.
When I run my program I can see all Local and Mapped network drives.
But I need to add the Network Neighborhood in the Drive list box.
I need to be able to see all servers and drives on the network. Can anyone tell me how to do this? Thanks!

---

Parsing A List In A Webpage
Hey I want to parse a list in a webpage.......Im not too hot with parsing overall but I figured this would be the best place to ask for help.....

For example

if the HTML was


<tr>
<td>1</td><td><A target="_self" href=#><font color=#ff0000>Number1</font></a><td><font face=verdana size=2>IDNUMBER1</td>

<td><A target="_self" href=#><font color=#ff0000>Number2</font></a><td><font face=verdana size=2>61506</td><td><font face=verdana size=2>ID NUMER2</td>


If i wanted to parse that into a list box where it showed
Number ID
---------------
Number1 IDNUMBER1
Number2 IDNUMBER2


Hopefully you guys can make some sense of that....

---

Parsing Data In A List Box
I have data in a list box that that looks like the below information. I want to be able to double click on line in the list box and have it move the data on the right side into a text box.



Quote:





FRANKK 123509SDFSDF
BILLS 536546SDFDSFSA
BTRAKLAS ASDASD9787





(note, there is more than one space between the left and right sides. The vbforums seem to make extra spaces go down to one space)

For example,
I would double click the line "BTRAKLAS ASDASD9787" and "ASDASD9787" would be moved into a text box.


Any help would be wonderful. Thank you.

---

Listview Item Into Text Boxes
I have a form (form A) with 6 text boxes and a command button. The button opens another form
(form B) with a listview of a table. Can someone tell me how to do the following:

When I double click on the a record in the listview form (form B), I want to take 6 fields and populate my 6 textboxes on the previous form (form A).

I have been working with VB for about 6 months now, mostly database connectivity.

Thanx, Brian

---

Unique Item In Combo Boxes
Anyone use a short script to make sure all items in a combobox are unique?

---

Parsing A Colon Delimited List
i have a user file that has 1 line per user and each value is seperated by : it looks like this

krazie:2::ind:1:0:0:3:-1:1:4:2:NOT SET:eng:16002:15.00:0:0:1100101-:0:0:0:
desi:2::default:1:0:0:3:2:0:0:683998::eng:17522:0.00:1:0::0:0:1:
testie:3::Trial:1:0:0:3:2:0:0:0:NOT SET:eng:37597:0:0:0::0:1:1:
chopowa:2:chopowa:default:1:0:0:0:0:1:0:372220::default:41352:1000.00: 0:0:1100101-::1:1:

basicly im just trying to parse the line, eventually i would like each persons name in a listbox and when i click on their name it brings up their stuff. i can read 1 line from the text file, i then used split() that worked somewhat, i just need to figure out how to go through each line inthe file and then assign the split values to dynamic array names.

---

Cute Little Check Boxes That Appear In List Boxes... How To Use (check/uncheck) Those With Code?
how can i set my list box up so when theres an error with some item int eh lsitbox (that the user added), the check box will select.. or deselect...

note: the checkbox style is 1 - checkbox =)

-joe

?

---

AddItem To Combo List And Have The Combo List Be Able To Retain The Item Upon Recall
I have a project that I need to do for school. You are to have a command button, a combo/dropdown list and a text box, you are to enter a name and birthday in the text box and when you click on the command button it is supposed to enter it in the combo box. My problem is that I got it to enter into the combo box with additem, but it will not retain the item that I just added. When I close the program the item I added does not stay there. How do I get the combobox to retain everything that I add through the textbox on command click. PLEASE HELP

---

Last List Box Item
I have a list box that is filled dynamically and I don't know in advance how many items it will contain. How can I get the last item value? Here is what I tried:

Code:
lstBibPlace.Index(lstBibPlace.ListCount - 1)
but that generated a 'wrong number of arguments' error message.

Thanks!

---

List Item I
I have a loop here for saving a list's contents. i want the i item of the list. how can i take that? and as soon as i save i want to store the i item read from the file put into the list. how can i do that too? thanks anyway for any answers....

---

Add Item To List Box
Hi,
Below is the code im using to sort a file into a list box.
Only thing is though im putting it into a rich text box first.
When i do this the file is to big and so when it goes to sort it i get an overflow error.

How can i chnage this code so it dosent go through the right text box and gets sorted into the list box straight away.


Code:
otext = Display.Text
mtext = Replace (otext , Chr$(0) , " ")

Display.Text = mtext

Dim Count As Integer
Count = 0

Dim sentence As String
sentence = "the fat cat eats fork.txd from the can"

Dim words() As String
words = Split(sentence) ' Split up the sentence into words

Dim i As Integer

For i = 0 To UBound(words) ' Loop through each word
Dim word As String ' Set the word to a variable
word = words(i)

If Right$(word, 4) = ".txd" Then ' If the word ends in .txd
Count = Count + 1
List1.AddItem Count & ": " & word
End If
Next i

Thanks for any help.
-Dave

---

Add An Item To List 6
I would like to add an item to list 6 after pressing a button.

the item simply and always says End of Search. Can anyone tell me how to do this?

Also I have a timer8 and it counts in seconds. Is there a way that when the button is pressed, the timer is enabled and starts to count, and as each second goes on, a labeltime.caption number is increased by one. And when the list 6 gets the end of search item added to it, the timer is disabled? thanks!

---

Add An Item In A List Box
I have a list box and i am trying to add elements as follows

ns = 4
Dim temp As String
For x = 1 To ns - 1
temp = "Stage " + x + " Oulet"

List1.AddItem temp, List1.ListCount
Next

Basically i would like the items in the list box to appear as follows:

Stage 1 Outlet
Stage 2 Outlet
Stage 3 Outlet
etc

A mismatch error comes up when i try to this!
I tried to change the + x + part of the expression to
+String(x) +
But this did no work either!

Please help !!!

---

List Box Item
I have to list box. If i add an item from list1 to list2 and the item already exists a beep sound

But how can i change the color of that item in list2 and make it blink?

---