Partition Find and Mount Regitration

I finally figured out that, with this new and extensive use of links and My Apps, I can build a script that just registers Partition Find and Mount so I don't have to enter the information every time I download the script. Yeah, I know the script doesn't change much, but sometimes I have to wipe the slate clean and download everything.

Code: [Select]

[main]
Title=Partition Find and Mount Registration
Description=Enter registration for Partition Find and Mount
Selected=True
Level=5
Version=1
Date=18 Mar 2010
Contact=
Author=Jon Fleming
Download_Level=1
Credits=http://findandmount.com/
NoWarning=False

[Interface]
FromLocalReg_CheckBox="Copy serial from local registry (Auto)",1,3,20,15,220,20,False
FromBoxes_CheckBox="Provide Serial Manually",1,3,29,48,200,20,True
UserName_TextBox="User Name:",1,0,27,85,200,21,
LicenseKey_TextBox=Password:,1,0,26,123,200,18,
pBevel1=pBevel1,1,12,20,41,230,120
pBevel2=pBevel2,1,12,11,5,270,180
pWebLabel1="Partition Find and Mount home page",1,10,11,256,200,18,http://findandmount.com/

[process]
Arch,x86
If,%FromLocalReg_CheckBox%,Equal,True,Begin
If,ExistRegKey,HKCU,Software\Atola\FindAndMount\LicInfo,LicKey,Begin
RegRead,HKCU,Software\Atola\FindAndMount\LicInfo,LicKey,%LicenseKey%
RegRead,HKCU,Software\Atola\FindAndMount\LicInfo,RegTo,%UserName%
hive_load,HKCU
reg_add,0x1,%reg%\Software\Atola\FindAndMount\LicInfo,LicKey,%LicenseKey%
reg_add,0x1,%reg%\Software\Atola\FindAndMount\LicInfo,RegTo,%UserName%
hive_unload
End
End
If,%FromBoxes_CheckBox%,Equal,True,Begin
hive_load,HKCU
If,Not,%LicenseKey_TextBox%,Equal,"",reg_add,0x1,%reg%\Software\Atola\FindAndMount\LicInfo,LicKey,%LicenseKey_TextBox%
If,Not,%UserName_TextBox%,Equal,"",reg_add,0x1,%reg%\Software\Atola\FindAndMount\LicInfo,RegTo,%UserName_TextBox%
hive_unload
End

Thanks for sharing JonF,

I agree.

Keeping passwords on a seperate script is very valuable when used with links.
We probably need to arrange some scripts process without pw in time