According to my tests there is problem in registry library because
DeleteSubKey and DeleteSubKeyTree are doing nothing
(no delete but no error posted )
I received same result on my HTC Tytn II (WM5 - CF2) and
HP iPAQ 614 (WM6 - CF2).
Sub App_Start
reg.New1
reg.RootKey(reg.rtCurrentUser)
ErrorLabel(errcreate)
reg.CreateSubKey("Software","My Applicaton")
Msgbox("The key was created.")
ErrorLabel(errdelete)
reg.DeleteSubKey("Software","My Applicaton")
Msgbox("After DeleteSubKey")
reg.DeleteSubKeyTree("Software","My Applicaton")
Msgbox("After DeleteSubKeytree")
ErrorLabel(errdeletenonexsist)
reg.DeleteSubKey("Software","My xxx")
Msgbox("E N D of test")
Return
errcreate:
Msgbox("Created - err")
Return
errdelete:
Msgbox("Delete - err")
Return
errdeletenonexsist:
Msgbox("Delete - not exist")
Return
End Sub
Please let me know if I am doing something wrong !
I need a solution (workaround) for my ongoing project.
:signOops:
DeleteSubKey and DeleteSubKeyTree are doing nothing
(no delete but no error posted )
I received same result on my HTC Tytn II (WM5 - CF2) and
HP iPAQ 614 (WM6 - CF2).
Sub App_Start
reg.New1
reg.RootKey(reg.rtCurrentUser)
ErrorLabel(errcreate)
reg.CreateSubKey("Software","My Applicaton")
Msgbox("The key was created.")
ErrorLabel(errdelete)
reg.DeleteSubKey("Software","My Applicaton")
Msgbox("After DeleteSubKey")
reg.DeleteSubKeyTree("Software","My Applicaton")
Msgbox("After DeleteSubKeytree")
ErrorLabel(errdeletenonexsist)
reg.DeleteSubKey("Software","My xxx")
Msgbox("E N D of test")
Return
errcreate:
Msgbox("Created - err")
Return
errdelete:
Msgbox("Delete - err")
Return
errdeletenonexsist:
Msgbox("Delete - not exist")
Return
End Sub
Please let me know if I am doing something wrong !
I need a solution (workaround) for my ongoing project.
:signOops: