Subject:How do I ... Build an HTML Page with some VBScript Author:Bob Chauvin Date:02 Nov 2005 09:40 AM
If I want to include some script, like the following vb script so that I can associate an onclick_ event to the sub of_WebViewOff?
<script language="vbscript">
<!--
Dim ol
Dim Namespace
sub of_WebViewOff
' 20051001 R.Chauvin for MillerJohnson bob_chauvin@yahoo.com, bob_chauvin@ProgramTeamA.com
Set ol = Createobject("Outlook.Application")
'
Set Namespace = ol.GetNamespace("MAPI")
Namespace.GetDefaultFolder(10).WebViewOn = False ';//outlookApp.OlDefaultFolders.olFolderContacts
ol.ActiveExplorer.CurrentFolder.WebViewOn = False
Set lFolderCurrent = ol.ActiveExplorer.CurrentFolder
Set lFolderParent = ol.ActiveExplorer.CurrentFolder.Parent
Set ol.ActiveExplorer.CurrentFolder = lFolderParent
Set ol.ActiveExplorer.CurrentFolder = lFolderCurrent