Advertisement
Guest User

1

a guest
Jan 27th, 2011
311
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Sub ajouterIcone()
  2. My.Computer.Registry.ClassesRoot.OpenSubKey("test1").CreateSubKey("DefaultIcon").SetValue("", ",0")
  3. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement