View Single Post
  #1 (permalink)  
Old 11-21-2007, 03:16 PM
kshetarpal kshetarpal is offline
Junior Member
 
Join Date: Nov 2007
Posts: 17
Default OwnerInfo for Smartphone

I tried to used the Owner info file for smartphone and ran into problems. How does one add Objects since the Visual IDE does not allow it. I added the library but do not know how to add the object.

The First line Reg.New1 can not be added. How does one do this?
Thanks for your help.
Amit

The code is below:


Sub App_Start
Reg.New1 'Registry object is named 'reg'
Main.Show
End Sub


Sub File_Click

If CPPC = false Then Return 'this is not for the desktop

Reg.RootKey(Reg.rtCurrentUser)
buff() =Reg.GetValue("ControlPanel\Owner\","Owner")
For i = 0 To ArrayLen(buff()) -1 Step 2
If buff(i)=0 Then Exit 'Chr(0) separates the name from other owner entries
m = m & Chr(buff(i))
Next

'Msgbox ("Owner name is "& m)
End Sub
Reply With Quote