~~Surfistinha~~
Tipo de Conteúdo
Perfis
Fóruns
Atualizações
Quizzes
Store
Posts postados por ~~Surfistinha~~
-
-
samusamu :Olha o virus inofecivo no seu topico nao ta assim entao quer disser que ele quer acabar com os membro aki do forum
NAO BAIXEM samusamu o seu que e inofensivo o dele nao
Mania_Trainer_5.0.zip received on 2009.08.20 19:23:46 (UTC)
Current status: finished
Result: 28/41 (68.29%)
Compact Compact
Print results Print results
Antivirus Version Last Update Result
a-squared 4.5.0.24 2009.08.20 Virus.Win32.Induc!IK
AhnLab-V3 5.0.0.2 2009.08.20 -
AntiVir 7.9.1.3 2009.08.20 W32/Induc.A
Antiy-AVL 2.0.3.7 2009.08.20 -
Authentium 5.1.2.4 2009.08.19 W32/Induc.A
Avast 4.8.1335.0 2009.08.20 Win32:Induc
AVG 8.5.0.406 2009.08.20 -
BitDefender 7.2 2009.08.20 Win32.Induc.A
CAT-QuickHeal 10.00 2009.08.20 W32.Induc.A
ClamAV 0.94.1 2009.08.20 Virus.Induc
Comodo 2037 2009.08.20 -
DrWeb 5.0.0.12182 2009.08.20 Win32.Induc
eSafe 7.0.17.0 2009.08.20 -
eTrust-Vet 31.6.6691 2009.08.20 Win32/Induc.A
F-Prot 4.4.4.56 2009.08.20 W32/Induc.A
F-Secure 8.0.14470.0 2009.08.20 Virus.Win32.Induc.a
Fortinet 3.120.0.0 2009.08.20 W32/Induc.A
GData 19 2009.08.20 Win32.Induc.A
Ikarus T3.1.1.68.0 2009.08.20 Virus.Win32.Induc
Jiangmin 11.0.800 2009.08.20 -
K7AntiVirus 7.10.823 2009.08.20 -
Kaspersky 7.0.0.125 2009.08.20 Virus.Win32.Induc.a
McAfee 5715 2009.08.20 W32/Induc
McAfee+Artemis 5715 2009.08.20 W32/Induc
McAfee-GW-Edition 6.8.5 2009.08.20 Win32.Induc.A
Microsoft 1.4903 2009.08.20 Virus:Win32/Induc.A
NOD32 4353 2009.08.20 a variant of Win32/Induc.A
Norman 6.01.09 2009.08.20 W32/Induc.A
nProtect 2009.1.8.0 2009.08.20 -
Panda 10.0.0.14 2009.08.20 Suspicious file
PCTools 4.4.2.0 2009.08.20 -
Prevx 3.0 2009.08.20 Medium Risk Malware
Rising 21.43.34.00 2009.08.20 -
Sophos 4.44.0 2009.08.20 W32/Induc-A
Sunbelt 3.2.1858.2 2009.08.20 Virus.Win32.Induc.a (v)
Symantec 1.4.4.12 2009.08.20 W32.Induc.A
TheHacker 6.3.4.3.384 2009.08.20 -
TrendMicro 8.950.0.1094 2009.08.20 PE_INDUC.A
VBA32 3.12.10.9 2009.08.20 -
ViRobot 2009.8.20.1893 2009.08.20 -
VirusBuster 4.6.5.0 2009.08.19 Win32.Induc
-
Meu voto ja esta declarado
Que e Perfeito!!
Adorei esse seu topico
-
E tambem achem um belo topico organizado simplemente perfeito
Parabens meu amigo
-
Na comunidade desse forum tinha serial sim antes agora nao tem e o criador falou que esta patched
Sem ser na area vip tinha na comunidade
-
Mas mesmo assim vc tomara advertencia
Reportado
-
afffffsss dps de uma hora meu avast detecto trojan nao baixem
Moderadoção de closed ja reportei
-
Concordo com o DaniloOgrandchase
Nos membro fazemos parte do forum certo
Entao nos como membros e o nosso tever fazer alguma coisa neh
-
Grand Chase:lvl 56 Elesis
Cs:359/120
The duel:lvl 68
So jogo esses jogos e vc poste seus lvls e seus jogos
Sem Flood leia as regras ates de posta
Sem comentarios inutes
-
Na verdade eu gosto do 'Kriptya(moderador grand chase) pq ele tem umas fotos de surfista nao sei se ele e mesmo e ele e urubu tambem poriço
Buh.S ela e linda♥
Delare vc de quem mas gosta
Homem e Mulher
Sem Flood leia as regras ates de posta
Sem comentarios inutes
-
Vamos direto ao tutorial:
1º.Abra o VB6
2º.Clique com o botão direto na sua toolbar e escolha components
3º.Procure "Microsoft Winsock Contrl 6.0" ou "Microsoft Winsock Contrl 6.0 (SP5)" selecione a caixinha e clique em ok
4º.Irá aparecer um item novo na sua toolbar,que são dois computadorzihos
5º.Coloque esse novo item em seu form
6º.Nesse novo item,Renomeie ele para WS1 na propriedade Name
7º.Adicione 1 Label e 1 Comand Button
8º.Mude o Caption do Comand Button para Checar meu IP e o d label para " " (significa que deixe o caption em branco)
9º.Clique duas vezes no Comand Button e ponha este código:
CODIGO
Dim IP As String
IP = WS1.LocalIP
Label1.Caption = IP
10º.Pronto,começe seu projeto e veja seu IP!
Créditos: YouTube e MMProjects
Falows galera!
Podem me chamar de surfista!
-
Primeira Parte:
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
Segunda Parte:
MensagemAssunto: Video Aula do Visual Basic WebBrowser Dom Ago 09, 2009 10:37 pm Responder com citação Editar/excluir esta mensagem Excluir esta mensagem Ver o IP do Usuário Enviar um alerta desta mensagem a um administrador ou moderador Bloquear os alertas deste post
----
Muito Obrigado - Surfista
-
-
-
Esse aqui e show e louko*-*
Vamos explicar aqui como fazer um media player.
Passos:
1- Abra o Visual basic 2005(ou 2008)crie uma WindowsApplication
2- Quando a form abrir adicione um button e um openfiledialog
3- Depois de add o button va ate a toolbox(ctrl+alt+x) e aperte com o botao direito e selecione Choose Items
4- Apos isso abrira uma janela,selecione COM Components
5-Procure por Windows Media Player(eh um dos ultimos)
6- Selecione-o e aperte ok
7- Apos isso ele aparecera na toolbox
8-de um duplo clique e ele aparecera na form
9-Agora clique no openfiledialog1(apenas um clique),va ate o filter e escreva(pra abrir musicas apenas de formato Mp3)
Todos|*.*Mp3|*.mp3
ou entao se kiser abrir todos os tipos de arquivo
10- De um duplo clique no button e adicione
OpenFileDialog1.InitialDirectory = My.Computer.FileSystem.CurrentDirectory
OpenFileDialog1.ShowDialog()
AxWindowsMediaPlayer1.URL = OpenFileDialog1.FileName
Pronto!Agora so rodar o programa e abrir a musica/imagem/video
Creditos: Tutorial retirado do youtube.
Para assistir o video:[flash(425,350)]
É necessário se cadastrar para acessar o conteúdo.- Entre
- ou
- Cadastre-se
-
Requerimentos:
- Visual Basic 6
- 1 Module
- 2 CommandButton
Tutorial:
- Adcione uma module ao seu projeto e adicione o seguinte código:
' Declaração de API's necessáriosPrivate Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hwnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
' Definição de constantes
Private Const GWL_EXSTYLE = (-20)
Private Const LWA_COLORKEY = &H1
Private Const LWA_ALPHA = &H2
Private Const ULW_COLORKEY = &H1
Private Const ULW_ALPHA = &H2
Private Const ULW_OPAQUE = &H4
Private Const WS_EX_LAYERED = &H80000
' Define o form como transparente
Public Sub ProfessionalCodeMT(ByVal hwnd As Long, ByVal bAlpha As Integer)
Dim msg As Long
' Ignora possíveis erros
On Error Resume Next
' Caso o valor seja inferior a 255 e superior
' a 0 aplica uma nova transparência
If bAlpha > 0 Or bAlpha < 255 Then
msg = GetWindowLong(hwnd, GWL_EXSTYLE)
msg = msg Or WS_EX_LAYERED
SetWindowLong hwnd, GWL_EXSTYLE, msg
SetLayeredWindowAttributes hwnd, 0, bAlpha, LWA_ALPHA
End If
End Sub
' Define o form com opaco
Public Sub MakeOpaque(ByVal hwnd As Long)
Dim msg As Long
' Ignora possíveis erros
On Error Resume Next
msg = GetWindowLong(hwnd, GWL_EXSTYLE)
msg = msg And Not WS_EX_LAYERED
SetWindowLong hwnd, GWL_EXSTYLE, msg
SetLayeredWindowAttributes hwnd, 0, 0, LWA_ALPHA
End Sub
- Adicione 2 commandButton ao form, o primeiro com o capition de transparente e o segundo de normal.
- Adicione o seguinte codigo no button transparente:
ProfessionalCodeMT Me.hwnd, 180- Adicione o seguinte código no button normal:
ProfessionalCodeMT Me.hwnd, 250- Pronto é apenas isso, aperte F5 e clique no botão transparente e confira o efeito.
-
Deligar o computador:
Shell ("shutdown.exe -s -t 0")Reiniciar o computador:
Shell ("shutdown.exe -r -t 0")Fazer logoff:
Shell ("shutdown.exe -y -t 0")Turtorial bem simple
Lembrando que o -t ( tempo ) pode ser alterado =), ou seja, se você quiser programar para desligar depois de " x " tempo você pode..
pode ser util em vários programas que necessitem de reiniciar o pc após alguma coisa, tipo, depois de instalar algum programa.
Bys'':
~~Surfistinha~~
ByDuUxD
OriGami~
-
Váa na opção: Tool > Componets
Depois selecione o Windowns Media Player!
Deixe a form na propriedade FormBoaderStyle: SizableToolWindow
Ajeite-o na form, de um duplo clique nele e insira:
AxWindowsMediaPlayer1.URL = InputBox("Insira a URL da Rádio", "String da Rádio")
Crie um MenuStrip1:
Ele deve ficar assim:
Menu > String > Mudar String
De um duplo clique sobre "Mudar String", e insira esse código:
AxWindowsMediaPlayer1.URL = InputBox("Insira a URL da Rádio", "String da Rádio")
Fechar
De um duplo clique sobre "Fechar", e insira esse código:
end
Fórum
De um duplo clique sobre "Fórum", e insira esse código:
System.Diagnostics.Process.Start("*************************")
Créditos > Bruno Messana
Explicação:
AxWindowsMediaPlayer1.URL = InputBox("Insira a URL da Rádio", "String da Rádio") AxWindowsMediaPlayer1 (propriedade). URL (o que irá alterar) = InputBox (como vai ficar) ("Mensagem", "Titulo" (da inputbox))
End (Fecha a aplicação)
System.Diagnostics.Process.Start("www.webcheats.com.br") (abre um site de acordo com suas definições e abre com o bronwser padrão)
-
Add ao formulário:
• 1 Button (mude o text para Gerar)
• 1 TextBox[/b]
No button insira o seguinte código:
TextBox1.Text = (Int(Rnd() * 1000))
Explicação:
Ele irá gerar alguns caracteres de "1000", de um maneira sortida (Rnd = Randon), no tipo Integer em um TextBox[/b]
Obs: você pode completar, para que quando der um número que menor que "x" ele somar mais um quantidade.
Ou assim:
TextBox2.Text = (Int(Rnd() * 10000000))
If TextBox2.Text < 100000 Then
TextBox2.Text += Rnd(10)
End If
Obs:Para VS
créditos
Vb.net, Visual studio 2008.
-
Bem simples
Declare:
Private Declare Function ALProfessionalCode Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongAdicione no form ou em um button:
ALProfessionalCode 0, "open", "ww.webcheats,com.br", vbNullString, vbNullString, SW_SHOWPronto!!
Muito ficil e Bem util
-
Gente isso e proibido
Quando tiver topico assim nao comentem so reporta
Eu fiz a minha parte reportei
-
Caraca mano que trener bom merece fixo por mim
Agradecido
-
É necessário se cadastrar para acessar o conteúdo.
- Entre
- ou
- Cadastre-se
Olha oq aparece
Informação
Não é possível criar uma nova conta atualmente.
-
E um belo topico
Atualize todo dia heim
Obrigado amigo por compartinhar isso
HackPack 1.8
em Grand Chase - Downloads de Cheats
Postado
Fala galera, aqui está o primeiro HackPack lançado depois da ATT de 20/08/2009.
Eu postaria 1 hora e meia antes, mas tive que esperar certa pessoa (né 4jax?) pra postar pois num sei porque ele queria que a Radical ficasse ON (frescura na minha opinião), enfim...
OBS: Fortalecimento Fast/Colar Hack e o Missão Completa não são valores fixos (muita gente acha que é, mas não é), então não coloquei no HackPack.
Estou tentando achar um jeito de coloca-los no Pack, então aguardem.
OBS²: Qualquer problema com o HackPack, me avisem que eu tentarei arrumar biggrin.gif
OBS³: Ao apertar Enter nos locais indicados, você verá simbolos estranhos, para tirar isso é só ir em File e desativar Syntax Highlighting, pronto =D
Valores Stage Hack e Liberar Portais:
Coordenadas Map Hacker:
Screenshot do HackPack:
Screenshot do HackPack:
Downloads:
Download pelo 4Shared:
Download pelo SendSpace:
Download pelo MediaFire:
Download pelo EasyShare:
Scan:
Créditos:
VitorSupremo
[/font][/size]