Thanks to tom and mudrack for their previous help...now
I'm stuck again...I want to import the ascii either into
the active sheet or a new sheet but with all the
delimitation included...here's what I have so far and now
I'm stuck...

Private Sub CommandButton1_Click()
sPath = "\\Filesrv01\PCBard-Raw\Dept.2260\KGF\2260.00946\"
Workbooks.Open sPath & Sheet2.TextBox1.Text,
Origin:=xlWindows, DataType:=xlDelimited,
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False,
Tab:=True, Semicolon:=False, Comma:=True, Space:=False,
Other:=False,
FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1),
Array(4, 1), Array(5, 1),
Array(6, 1), Array(7, 1), Array(8, 1), Array(9, 1), Array
(10, 1), Array(11, 1),
Array(12, 1), Array(13, 1))

End Sub

I'm not writing it correctly but I'm not sure how to fix
it...any help would be greatly appreciated!

Thanks!
Mad Scientist