Rank: Member
Groups: Member
Joined: 6/5/2006(UTC) Posts: 1
|
I am upgrading from Image Uploader 3.5 to 4.1. In 3.5, I use the following javascript to detect if the ImageUploader ActiveX v3 is installed: Code: if ((navigator.userAgent.indexOf('MSIE') != -1) && (navigator.userAgent.indexOf('Win') != -1)) {
document.writeln('<scr' + 'ipt language="VBscript">');
document.writeln('Function supportImageUploader()');
document.writeln(' If ScriptEngineMajorVersion >= 2 Then');
document.writeln(' On Error Resume Next');
document.writeln(' supportImageUploader = "NotInstalled"');
document.writeln(' Dim installed');
document.writeln(' installed = False');
document.writeln(' installed = IsObject(CreateObject("Aurigma.ImageUploader3"))');
document.writeln(' If installed Then');
document.writeln(' supportImageUploader = "Installed"');
document.writeln(' End If');
document.writeln(' Else');
document.writeln(' supportImageUploader = "Unsupported"');
document.writeln(' End If');
document.writeln('End Function');
document.writeln('</scr' + 'ipt>');
}
else
{
document.writeln('<scr' + 'ipt language="JavaScript">');
document.writeln('function supportImageUploader() {');
document.writeln(' return "Unsupported";');
document.writeln('}');
document.writeln('</scr' + 'ipt>');
}
When upgrading to version 4, this always reports 'Not Installed'. What is the proper class name to use instead of Aurigma.ImageUploader3 when using ImageUploader4.cab ? thanks dave Edited by user Thursday, February 21, 2008 7:24:30 PM(UTC)
| Reason: Not specified
|
|
|
|
Rank: Advanced Member
Groups: Member
Joined: 8/3/2003(UTC) Posts: 998
|
Hello Dave, Quote: What is the proper class name to use instead of Aurigma.ImageUploader3 when using ImageUploader4.cab ? You should "Aurigma.ImageUploader.4". You can also getActiveXInstalled method of ImageUploaderWriter class to check if ActiveX version installed. Edited by user Thursday, February 21, 2008 7:23:44 PM(UTC)
| Reason: Not specified |
|
|
|
|
Rank: Member
Groups: Member
Joined: 1/10/2007(UTC) Posts: 15
|
Simply changing that did not work, the below is returning not installed when it is.: Code:<script type="text/vbscript">
<!--
Function supportImageUploader()
If ScriptEngineMajorVersion >= 4 Then
supportImageUploader = "NotInstalled"
Dim installed
installed = False
installed = IsObject(CreateObject("Aurigma.ImageUploader.4"))
If installed Then
supportImageUploader = "Installed"
End If
Else
supportImageUploader = "Unsupported"
End If
End Function
Function isInstalled()
On Error Resume Next
installed = false
installed = IsObject(CreateObject("Aurigma.ImageUploader.4"))
If installed Then
isInstalled = "yes"
Else
isInstalled = "no"
End If
end function
-->
</script>
Edited by user Thursday, February 21, 2008 7:24:44 PM(UTC)
| Reason: Not specified
|
|
|
|
Rank: Advanced Member
Groups: Member
Joined: 8/3/2003(UTC) Posts: 998
|
Hello,
Did you try to use getActiveXInstalled method which I advised you to use? VBScript is not the best language to use because it is supported by IE browser only. |
|
|
|
|
Rank: Member
Groups: Member
Joined: 3/16/2007(UTC) Posts: 3
|
Alex,
I am also upgrading from 3.5 to the new version (4.1) and used the example included in the release notes for 3.5 (script shown in dviner's original post.) to detect the uploader. It no longer works as expected for me either.
This change was not mentioned in the upgrade notes and will surely trip up anyone upgrading from the old version. I think a code snippet to help people with this problem is needed...
Can you please include a new example for the best use of getActiveXInstalled to detect if the uploader is installed?
Thanks.
|
|
|
|
Rank: Member
Groups: Member
Joined: 1/10/2007(UTC) Posts: 15
|
I need to do this check before I try to load the activex tool. We are only displaying the this for IE users so VB script is fine. (also checked before hand) This code, testing the old version works fine: Code: Function supportImageUploader()
If ScriptEngineMajorVersion >= 1 Then
supportImageUploader = "NotInstalled"
Dim installed
installed = False
installed = IsObject(CreateObject("FortuneCity.EasyUploadTool"))
If installed Then
supportImageUploader = "Installed"
End If
Else
supportImageUploader = "Unsupported"
End If
End Function
Function isInstalled()
On Error Resume Next
installed = false
installed = IsObject(CreateObject("FortuneCity.EasyUploadTool"))
If installed Then
isInstalled = "yes"
Else
isInstalled = "no"
End If
end function
But this code, testing the new version is not working: Code: Function supportNewImageUploader()
If ScriptEngineMajorVersion >= 4 Then
supportNewImageUploader = "NotInstalled"
Dim installed
installed = False
installed = IsObject(CreateObject("FortuneCity.ImageUploader.4"))
If installed Then
supportNewImageUploader = "Installed"
End If
Else
supportNewImageUploader = "Unsupported"
End If
End Function
Function isNewInstalled()
On Error Resume Next
installed = false
installed = IsObject(CreateObject("FortuneCity.ImageUploader.4"))
If installed Then
isNewInstalled = "yes"
Else
isNewInstalled = "no"
End If
end function
Edited by user Thursday, February 21, 2008 7:25:12 PM(UTC)
| Reason: Not specified
|
|
|
|
Rank: Member
Groups: Member
Joined: 1/10/2007(UTC) Posts: 15
|
Woops... found the problem our tool is called FortuneCitycomInc.MyPhotoAlbumEasyUploadTool.4
sorry!
|
|
|
|
Rank: Advanced Member
Groups: Member
Joined: 8/3/2003(UTC) Posts: 998
|
Hello,
Yes, we change the ProgID and CLSID values of our private label versions. |
|
|
|
|
Forum Jump
You cannot post new topics in this forum.
You cannot reply to topics in this forum.
You cannot delete your posts in this forum.
You cannot edit your posts in this forum.
You cannot create polls in this forum.
You cannot vote in polls in this forum.