#188147 - 2008-06-11 01:07 PM
readexcel2 error
|
Saleem
Hey THIS is FUN
Registered: 2001-04-11
Posts: 280
Loc: UAE
|
Hi there
this is my main script
Break on
$domain = GetObject("WinNT://" + @LDomain)
$domain.filter="User",""
Call "d:\kix\udf\readexcel.udf"
$range=readexcel2('D:\security\AD.xls',1,-1,-1,1,1)
For $counter=0 to Ubound($range)
$empid=$range[$counter,0]
For Each $user In $domain
If $user.name=$empid
? $user.Name
? $user.userAccountControl
EndIf
;Sleep 0.2
Next
Next
I am geting folowing error from this function
ERROR : error in expression!
Script: d:\kix\udf\readexcel2.udf
Line : 157
on line number 157
$ReadExcel2[$!-1,$_-1]=$.sheets($1).cells($!,$_).value
I am using kix ver 4.60.0.0
Office 2003
_________________________
“I’ll not change you unless you don’t have intention to change yourself”
--H:Quran
|
|
Top
|
|
|
|
|
#188174 - 2008-06-12 05:50 AM
Re: readexcel2 error
[Re: Glenn Barnas]
|
Saleem
Hey THIS is FUN
Registered: 2001-04-11
Posts: 280
Loc: UAE
|
when I display $! and $_ it is giving some values, If I disable ;$ReadExcel2[$!-1,$_-1]=$.sheets($1).cells($!,$_).value
even I change my first code to
$range=readexcel2('D:\security\AD.xls',,-1,3,)
if @error
"error occured: @serror (@error)"
else
For $counter=0 to Ubound($range,2)
? "name: " $range[$counter,0]
?
Next
Still same error !!!
_________________________
“I’ll not change you unless you don’t have intention to change yourself”
--H:Quran
|
|
Top
|
|
|
|
|
#188229 - 2008-06-16 10:02 PM
Re: readexcel2 error
[Re: Saleem]
|
Kdyer
KiX Supporter
Registered: 2001-01-03
Posts: 6241
Loc: Tigard, OR
|
Fixed..
Original example is missing an endif..
CLS
BREAK ON
$range=readexcel2(@scriptdir+'\AD.xls',,-1,3)
IF @error
"error occured: @serror (@error)"
ELSE
FOR $counter=0 TO ubound($range,2)
? "first name: " $range[$counter,0]
? "last name: " $range[0,1]
? "login: " $range[0,2]
?
SLEEP 0.2
NEXT
ENDIF
?'Script is complete'
GET $
In the UDF, locate the line:
Replace with:
Your code should run fine then..
I am sending a PM to Lonk to fix the original UDF..
Thanks,
Kent
Edited by Kdyer (2008-06-16 10:03 PM)
|
|
Top
|
|
|
|
Moderator: Jochen, Allen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Arend_, Mart
|
1 registered
(mole)
and 1300 anonymous users online.
|
|
|
