Ir para conteúdo
Fórum Script Brasil
  • 0

Speedy (ajuda)


Guest Flápi dx

Pergunta

Guest Flápi dx

gostaria de saber se esse script realmente funciona ou é apenas + uma merda acumulando no regedit

=========comando============

L_Welcome_MsgBox_Message_Text = "Deseja melhorar a performance de conexão na Internet ?"

L_Welcome_MsgBox_Title_Text = "Internet"

Call Welcome()

' ********************************************************************************

' *

' * Métodos relacionados ao Registro.

' *

Dim WSHShell

Set WSHShell = WScript.CreateObject("WScript.Shell")

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\MSTCP\DefaultMSS", 536,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\MSTCP\DefaultRcvWindow", 3216,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\MSTCP\DefaultTTL", 128,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\MSTCP\PMTUBlackHoleDetect", 0,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\MSTCP\PMTUDiscovery", 0,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\MSTCP\SackOpts", 0,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\MSTCP\Tcp1323Opts", 0,"REG_DWORD"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\VxD\NWlink\NDI\params\cachesize\default", 16,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\Class\Net\0000\IPMTU", 576,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\Class\NetTrans\0000\IPMTU", 576,"REG_SZ"

WSHShell.RegWrite "HKLM\System\CurrentControlSet\Services\Class\NetTrans\0000\MaxMTU", 576,"REG_SZ"

WSHShell.PopUp "Concluído...Reinicie o computador para salvar as configurações"

' ********************************************************************************

' *

' * Bem-vindo

' *

Sub Welcome()

Dim intDoIt

intDoIt = MsgBox(L_Welcome_MsgBox_Message_Text, _

vbOKCancel + vbInformation, _

L_Welcome_MsgBox_Title_Text )

If intDoIt = vbCancel Then

WScript.Quit

End If

End Sub

=======comando===================

peguei o arquivo no site http://www.win9x.ubbi.com.br/iniciar.html#Atalho

por favor me expliquem se realemnte funciona esse script

Link para o comentário
Compartilhar em outros sites

9 respostass a esta questão

Posts Recomendados

  • 0

Cara não testei pra saber se ele funciona mais esse scritp cria um objeto .OCX chamado WSHSHELL

isso é uma programação em asp esse objeto trabalha dentro das pastas do windows, nesse caso ele esta trabalhando no registro do windows dentro do seu pc se isso funciona eu não sei porque ele altera uma sere de informações dentro do registro.

peleza espero ter te ajudado

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...