help in scripting excel2k3
- From: JasonMeyer <jason.meyer@xxxxxxxxxxxxxxxxx>
- Date: Tue, 12 Jul 2005 10:04:41 -0500
I had this script that would open an Excel File, loop through it then close the file. It worked when I had ExcelXP installed on my machine, but now I can't get the script to work with Excel2k3. Here is the portion of the script that checks for excel. I am fairly confident that the other checks are working just fine. By the way client system is WinXPsp2. Any help would be appreciated.
If strExcelWorkBook = "" Then
WScript.Echo "No input file provided. Script execution terminated. Please make sure you provide a valid Excel file as input."
Else
' Check if necessary objects are installed by simply create an instance of each
Err.Clear
Set objExcel = WScript.CreateObject("Excel.Application")
If Err.Number = 0 Then
blnExcelInstalled = True
End If
Err.Clear
Set objPerson = CreateObject("CDO.Person")
If Err.Number = 0 Then
blnCDOInstalled = True
End If
Err.Clear
Set objExchangeServer = CreateObject("CDOEXM.ExchangeServer")
If Err.Number = 0 Then
blnCDOEXMInstalled = True
End If
' Check if required components are installed
If (blnExcelInstalled = False Or blnCDOInstalled = False Or blnCDOEXMInstalled = False) Then
' Display error message
WScript.Echo "One of the required components could not be started. Please make sure the machine is running the following software: " & _
strCRLF & " Microsoft Windows 2000 (or higher) Server or Professional" & _
strCRLF & " Microsoft Winodws 2000 (or higher) Administrative Tools (a separate install if running on Windows 2000 Professional)" & _
strCRLF & " Microsoft Exchange 2000 (or higher) System Manager" & _
strCRLF & " Microsoft Excel 2000 (or higher)"
Else
.
- Prev by Date: Re: German date format causes error?!?
- Next by Date: Re: [OT]MSDN is wrong in this link...
- Previous by thread: German date format causes error?!?
- Next by thread: RAS
- Index(es):
Relevant Pages
|
