[THIN] Re: Outlook Reminders fix.

  • From: "Joe Shonk" <JShonk@xxxxxxxxxxxxxx>
  • To: <thin@xxxxxxxxxxxxx>
  • Date: Thu, 2 Jan 2003 14:28:41 -0800

You are trying to write a String to a Binary Value.  If you need to do =
this, convert the string to an Array (of 0s and 1s) then write it as a =
Binary Value.

ie

-----Original Message-----
From: Chris Lynch [mailto:lynch00@xxxxxxx]
Sent: Thursday, January 02, 2003 3:08 PM
To: TheThin. net
Subject: [THIN] Outlook Reminders fix.



I searched through the arcives, and found the email from Nigel stating
that if the FIRST-RUN values do mot make when comparing the HKLM and
HKCU values, Outlook First-Run will start.  He wrote a Kixscript that
would overwrite what was in the HKCU value with the HKLM value.  Well, I
have tested this out by manually copying the value over.  Now, I am in
the process of creating a VB script that will automate this for users
during logon.  Below is the code:


Option Explicit

'Declare variables
Dim strRegValue
Dim strValueName
Dim objRegHKLMPath, objRegHKCUPath, objShell

set strRegValue =3D Nothing
set strValueName =3D Nothing
set objRegHKLMPath =3D Nothing
set objRegHKCUPath =3D Nothing

'Set vairable properties
objRegHKLMPath =3D
"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\10.0\Outlook\Setup\"
objRegHKCUPath =3D
"HKEY_CURRENT_USER\SOFTWARE\Microsoft\Office\10.0\Outlook\Setup\"
strValueName =3D "First-Run"

set objShell =3D Wscript.CreateObject ("Wscript.Shell")

'Get value of the key, and pass it of strRegValue
strRegValue =3D objShell.RegRead
("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\10.0\Outlook\Setup\First-
Run")
objShell.RegWrite objRegHKCUPath & strValueName, strRegValue,
"REG_BINARY"


Now, everytime I go to run this, I get "outlookreminderfix2.vbs(38, 1)
Microsoft VBScript runtime error: Type mismatch".  Line 38 is the very
last line of the code (even though it actually isn't, I have a header
that contains an explination of the script).  It appears that the
objShell.RegRead isn't reading the value.  Any ideas?

Thanks,

Chris


***********************************************=20
This Weeks Sponsor: 99point9.com
The 99Point9.com Online Tech Support=20
Helpdesk is the one-stop solution for all=20
your server-based computing needs.=20
http://www.99point9.com
************************************************
For Archives, to Unsubscribe, Subscribe or=20
set Digest or Vacation mode use the below link.

http://thethin.net/citrixlist.cfm
*********************************************** 
This Weeks Sponsor: 99point9.com
The 99Point9.com Online Tech Support 
Helpdesk is the one-stop solution for all 
your server-based computing needs. 
http://www.99point9.com
************************************************
For Archives, to Unsubscribe, Subscribe or 
set Digest or Vacation mode use the below link.

http://thethin.net/citrixlist.cfm

Other related posts: