2011-06-10 38 views
0

嗨變量值我有一個名爲VAR1變量創造性地我需要在我REGKEY插入變量的值,它說140 我如何做到這一點....插入的RegWrite線

Private Sub OKAY_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OKAY.Click 

    Dim wshshell 

    wshshell = CreateObject("WScript.Shell") 
    wshshell.RegWrite("HKLM\SOFTWARE\Microsoft\windows\CurrentVersion\policies\Explorer\NoDrives", 140, "REG_DWORD") 

End Sub 

回答

0

唐當您可以使用該框架時,請不要使用wshshell,請查看網絡上已有的許多示例如何操作。 For instance。或者看看on SO許多重複問題之一。

+0

不錯,但這種方法最適合我,除非因爲它毫無疑問是我的問題的根本原因... – john 2011-06-10 10:39:53

+0

wshshell是許多問題的根源 – Jodrell 2011-06-10 11:47:10