2006-10-24 09:23
private bool SetServiceAutoRun()
{
try
{
RegistryKey key =Registry.LocalMachine.OpenSubKey("SOFTWARE").OpenSubKey("Microsoft").OpenSubKey("Windows").OpenSubKey("CurrentVersion").OpenSubKey("Run",true);
key.SetValue("RoadService",Application.StartupPath + @"\MobileMessageControlCenter.exe");
return true;
}
catch
{
return false;
}
}

2006-10-24 16:23
刚好我也需要这段程序.谢谢啦
2006-10-24 18:10
2006-10-26 09:31
2006-10-26 12:02
確實比較厲害
是在VB.NET中
我改了一點點
路徑那兒設不怎麼好
就寫死了
測試可行
Imports Microsoft.Win32
Private Function SetServiceAutoRun()
Try
Dim key As Microsoft.Win32.RegistryKey
key = Registry.LocalMachine.CreateSubKey("software\Microsoft\windows\CurrentVersion\Run")
key.SetValue("RoadService", "D:\Program Files\magicset\magicset.exe")
Return True
Catch ex As Exception
Return False
End Try
End Function

2006-10-26 15:40
2006-10-31 11:33
2006-10-31 11:34