H
hakan aktan
Here is an examle by using opennetcf.dll . If you add dll to your project
and Referances it will work fine.
Also check www.opennetcf.org
Imports OpenNETCF.Win32
Imports System.Collections
'Global variable
Private registryKey As RegistryKey
Private Sub btnRegRead_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnRegRead.Click
Dim keyName As String = tbKeyName.Text
Dim valueName As String = tbValueName.Text
Dim regValue As String
Try
registryKey = OpenNETCF.Win32.Registry.LocalMachine.CreateSubKey(keyName)
If registryKey.ValueCount = 0 Then
MsgBox("Registry not found.")
Else
regValue = CType(registryKey.GetValue(valueName), String)
MsgBox("Registry Value is : " & regValue)
End If
registryKey.Close()
Catch ex As Exception
MsgBox("Err: " & ex.Message)
End Try
End Sub
and Referances it will work fine.
Also check www.opennetcf.org
Imports OpenNETCF.Win32
Imports System.Collections
'Global variable
Private registryKey As RegistryKey
Private Sub btnRegRead_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnRegRead.Click
Dim keyName As String = tbKeyName.Text
Dim valueName As String = tbValueName.Text
Dim regValue As String
Try
registryKey = OpenNETCF.Win32.Registry.LocalMachine.CreateSubKey(keyName)
If registryKey.ValueCount = 0 Then
MsgBox("Registry not found.")
Else
regValue = CType(registryKey.GetValue(valueName), String)
MsgBox("Registry Value is : " & regValue)
End If
registryKey.Close()
Catch ex As Exception
MsgBox("Err: " & ex.Message)
End Try
End Sub