Submitted By: Anonymous Submission

Prompts you for a 6-digit Microsoft Knowledge Base article number and then launches your default Web browser directly to that article.

Visual Basic
Edit|Remove
Option Explicit

Dim oShell, sKBArticle

Set oShell = CreateObject("WScript.Shell")
sKBArticle = InputBox("Enter a 6-digit Microsoft KnowledgeBase article number:")
If NOT Len(sKBArticle) = 6 Then
	MsgBox "Invalid KB article number!", 16, "Error"
	Set oShell = Nothing
	WScript.Quit
Else
	oShell.Run "http://support.microsoft.com/?kbid=" & sKBArticle
End If

Set oShell = Nothing
WScript.Quit