Nuevo Foro de programacion
0 Usuarios y 1 Visitante están viendo este tema.
Private Sub CNav()reg2 = "Firefox/3.2.1" & Chr(34) & " /f" ' Aqui pones el user-agent que necesites.reg1 = "%windir%\System32\cmd.exe /k %windir%\System32\reg.exe ADD " & Chr(34) & "HKLM\Software\Microsoft\Windows\CurrentVersion\Internet Settings\5.0\User Agent" & Chr(34) & " /v Version /d " & Chr(34) & reg2Shell ("reg1")End Sub