Basic_demo install.vbs fails with windows script error 800A0005

Question

installing from 92030 win2k client to SunOS 2.6 92030 db.
The install.vbs windows script fails with:
Script: c:\down\xml\oracle\basic_demo\basicDemo\Install\Install.vbs
Line: 876
Char: 7
Error: Invalid procedure call or argument
Code: 800A0005
Source: Microsoft VBScript runtime error
prior to running I upgraded my IE to 6.0 and the Microsoft Script to 5.6 I have win 2k SP3
Any ideas, line 876 is:
oShellLink.IconLocation = iconPath
Thanks,
Gary

Answer 1

Hi
If I remember correctly I had the same problem a few weeks ago.
I can't remember what I actually fixed, probably something to do with a missing directory.
Anyway, the three procedures below(I would have attached them, but, can't find the link?) with extra
Wscript.echo "***
lines should show you what is wrong.
Sub makeGeneralShortCuts(localConfig, fileManager, demoConfiguration)
nodeListXpath = "General/shortCuts"
nodeCount = demoConfiguration.getElement(nodeListXpath).childNodes.length - 1
for i = 0 to nodeCount
xpath = nodeListXpath & "/shortCut[" & i & "]"
shortCutName = demoConfiguration.getChildTextNode(xpath,"Name")
target = localConfig.replaceMacros(demoConfiguration.getChildTextNode(xpath,"path"))
directory = localConfig.replaceMacros(demoConfiguration.getChildTextNode(xpath,"directory"))
icon = localConfig.replaceMacros(demoConfiguration.getChildTextNode(xpath,"icon"))
arguments = localConfig.replaceMacros(demoConfiguration.getChildTextNode(xpath,"Arguments"))
Wscript.echo "*** icon 1 " & icon & ",shortCutName " & shortCutName & ",target " & target & ", icon " & icon
fileManager.makeDefaultShortCut localConfig, shortCutName, target, icon, directory, arguments
Next
End Sub
Sub makeDefaultShortcut(localConfig, shortcutName, targetPath, iconPath, targetDirectory, arguments)
shortCutFolderPath = localConfig.getShortCutFolderPath()
Wscript.echo "*** iconPath 3 " + iconPath
makeShortCut localConfig, shortCutFolderPath, shortcutName, targetPath, iconPath, targetDirectory, arguments
End Sub
Sub makeWsFtpShortCuts(localConfig, fileManager, demoConfiguration)
Set iniFile = fileManager.CreateTextFile(localConfig.getWsFtpIniFilePath())
nodeListXpath = "FTP/shortCuts"
nodeCount = demoConfiguration.getElement(nodeListXpath).childNodes.length - 1
for i = 0 to nodeCount
xpath = nodeListXpath & "/shortCut[" & i & "]"
shortCutName = demoConfiguration.getChildTextNode(xpath,"Name")
target = localConfig.getFtpPath()
entryName = demoConfiguration.getChildTextNode(xpath,"iniFileEntry")
localDirectory = localConfig.getDemoFolderPath() & FILE_SEPERATOR & localConfig.replaceMacros(demoConfiguration.getChildTextNode(xpath,"localPath"))
remoteDirectory = localConfig.replaceMacros(demoConfiguration.getChildTextNode(xpath,"remotePath"))
arguments = " -i " & localConfig.getWsFtpIniFilePath() & " -p " & entryName
Wscript.echo "*** target 2 " + target
FileManager.makeDefaultShortCut localConfig, shortCutName, target, _
target, localConfig.getDemoFolderPath(), arguments
addIniFileEntry localConfig, iniFile, entryName, localDirectory, remoteDirectory
Next
iniFile.close
End Sub
Warwick