Dim strText
strText = "MyHello.txt"
Dim strItem()
Dim j
strItem = Split(strText, ".", -1)
For j = 0 To strItem.GetUpperBound(0)
MsgBox(strItem(j))
Next
Type mismatch at split line
************************
or
Dim strText
strText = "MyHello txt"
Dim strItem()
Dim j
strItem = strText.Split(".")
For j = 0 To strItem.GetUpperBound(0)
MsgBox(strItem(j))
Next
this one tells me I need Object..
**********************Hi!
This should be a very simple VBS code.
But it is giving me an error..
I am getting errors..
Can you help??
strText = "MyHello.txt"
Dim strItem()
Dim j
strItem = Split(strText, ".", -1)
For j = 0 To strItem.GetUpperBound(0)
MsgBox(strItem(j))
Next
Type mismatch at split line
************************
or
Dim strText
strText = "MyHello txt"
Dim strItem()
Dim j
strItem = strText.Split(".")
For j = 0 To strItem.GetUpperBound(0)
MsgBox(strItem(j))
Next
this one tells me I need Object..
**********************Hi!
This should be a very simple VBS code.
But it is giving me an error..
I am getting errors..
Can you help??