Scaling on Webpage

email me

You can make use of css3 transfrom’s scale property which scales the element.

HTML
<div id='shrinkMe'>
<div id='shrink' class='content'></div>
</div>

CSS
.shrink {
-webkit-transform:scale(0.5);
-moz-transform:scale(0.5);
-ms-transform:scale(0.5);
transform
:scale(0.5);
}

Script
$('#shrinkMe').click(function(){ // or other event $(this).addClass('shrink'); });

Reset MAC Password

email me

If you’re locked out of your MAC, follow these steps to reset the password.

First

Step 1 – Restart your Mac, and get ready to boot into OS X Recovery Mode.

Step 2 – While restarting, hold down CMD + R until the Apple logo appears.

Step 3 – Go to Utilities > Terminal to open a Terminal. In the Terminal window, type resetpassword and press Enter.

 

Now, using the Reset Password Console

Step 1 – Select your OS X drive.

Step 2 – From the drop-down under “Select the user account:”, choose the user account that you want to reset password.

Step 3 – Type in new password.

Step 4 – Once you’re done, click on Save.

Restart and login.

Screenshot

* I tested this on the root account, and it worked fine. If keychain comes up when you try to login, just select “Login”—do not try to enter a password into keychain.

Unpin Shortcut from Start Menu

email me

This is the proper way to remove “pinned” icons from the Start Menu.

on error resume next

Const CSIDL_APPDATA = &H1A

Dim objShell
Dim objFolder
Dim objFolderItem
Dim objVerb
Dim objCurrentUserAppData
Dim strCurrentUserAppData
Set objShell = CreateObject("Shell.Application")
Set objCurrentUserAppData = objShell.NameSpace(CSIDL_APPDATA)
strCurrentUserAppData = objCurrentUserAppData.Self.Path

Set objFolder = objShell.Namespace(strCurrentUserAppData & "\Microsoft\Internet Explorer\Quick Launch\User Pinned\StartMenu")
Set objFolderItem = objFolder.ParseName("<strong>Shortcut Name.lnk</strong>")
For Each objVerb in objFolderItem.Verbs
If Replace(objVerb.name, "&", "") = "Unpin from Start Menu" Then objVerb.DoIt
Next

Pinning Shortcuts in Order

email me

on error resume next

Const CSIDL_COMMON_PROGRAMS = &H17 
Const CSIDL_PROGRAMS = &H2 
Set objShell = CreateObject("Shell.Application") 

Set objAllUsersProgramsFolder = objShell.NameSpace(CSIDL_COMMON_PROGRAMS) 
strAllUsersProgramsPath = objAllUsersProgramsFolder.Self.Path 
Set objFolder = objShell.Namespace("C:\Pinned_Shortcuts") 

Set objFolderItem = objFolder.ParseName("Notepad.lnk") 
Set colVerbs = objFolderItem.Verbs 
For Each objVerb in colVerbs 
    If Replace(objVerb.name, "&", "") = "Pin to Start Menu" Then objVerb.DoIt 
Next

Set objFolderItem = objFolder.ParseName("Calculator.lnk") 
Set colVerbs = objFolderItem.Verbs 
For Each objVerb in colVerbs 
    If Replace(objVerb.name, "&", "") = "Pin to Start Menu" Then objVerb.DoIt 
Next

Set objFolderItem = objFolder.ParseName("MSInfo32.lnk") 
Set colVerbs = objFolderItem.Verbs 
For Each objVerb in colVerbs 
    If Replace(objVerb.name, "&", "") = "Pin to Start Menu" Then objVerb.DoIt 
Next

Set objFolderItem = objFolder.ParseName("Write.lnk") 
Set colVerbs = objFolderItem.Verbs 
For Each objVerb in colVerbs 
    If Replace(objVerb.name, "&", "") = "Pin to Start Menu" Then objVerb.DoIt 
Next

IPv6 Disable ISATAP and 6to4

email me

netsh int ipv6 isatap set state disabled
netsh int ipv6 6to4 set state disabled
netsh interface teredo set state disable


To re-enable isatap teredo 6to4

netsh interface teredo set state type default

 

Other important commands

netsh interface isatap set router The_EDGE1_IP_Address (example, 10.0.0.2)
netsh interface isatap set state enabled
netsh interface teredo set state enterpriseclient