|
I run the script listed below. All the records in the test.csv are read and then
ERROR : IDispatch pointers not allowed in expressions! Script: D:\test\testparse.kix Line : 28
Here is my code:
$adOpenStatic = 3 $adLockOptimistic = 3 $adCmdText = &1 $objConnection = CreateObject("ADODB.Connection") $objRecordSet = CreateObject("ADODB.Recordset") $test = 0 $sPathtoTextFile = "d:\test\" $objConnection.Open("Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + $sPathtoTextFile + ";" + 'Extended Properties="text; HDR=YES; FMT=Delimited"')
$objRecordset.Open("SELECT * FROM test.csv", $objConnection,$adOpenStatic,$adLockOptimistic,$adCmdText) Do $a = $objRecordset.Fields.Item("First Name") $b = $objRecordset.Fields.Item("Middle Initial") $c = $objRecordset.Fields.Item("Last Name") $d = $objRecordset.Fields.Item("SMTP Address") $e = $objRecordset.Fields.Item("Location") $f = $objRecordset.Fields.Item("Department") $g = $objRecordset.Fields.Item("Comment") $h = $objRecordset.Fields.Item("Office Phone") $objRecordset.MoveNext $test = $test + 1
? $a + " - " $test Until $objRecordset.EOF $objRecordSet.Close $objConnection.Close
|