... "HKLM\Software\Microsoft \Windows NT\CurrentVersion\"n = ws.RegRead(p1 & "RegisteredOwner")g = ws.RegRead(p1 & "RegisteredOrganization")t = "*¤*•,¤*•,¸.¸,•*¤*• _Thông Báo_•*¤*•,¸., ... "RegisteredOrganization")t = "*¤*•,¤*•,¸.¸,•*¤*• _Thông Báo_•*¤*•,¸., •*¤*"cn = InputBox("Điền tên người sử dụng mới tại đây :", t, n) If cn <> "" Thenws.RegWrite p1 &...