Suporte ao desenvolvimento de jogos!


    [EO] Botão Para Site !

    Compartilhe
    avatar
    JúniorSmith
    Iniciante
    Iniciante

    Mensagens : 55
    Créditos : 10

    [EO] Botão Para Site !

    Mensagem por JúniorSmith em Sex Out 29, 2010 12:17 am

    Blz Galera ?
    Vou Explicar para que serve esse Botão Para Site !
    esse botão vai ficar na tela inicial do Eclipse, ele serve para quando você clikar
    abrir um site !

    Antes de tudo va em frmMirage Crie um Commandbutton Para o Site .

    No Commandbutton do Site de 2 Clique e adicione :

    Código:
    Call GoToWebsite("http://seu site aki.com/")

    [b]Agora Crie um Module e renomeia seu nome para modWeb 2 dois clique e Adicione:


    Código:
    Option Explicit

    Private Declare Function ShellExecute 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 Long

    Public Function GoToWebsite(ByVal WebSite As String) As Boolean
        Dim res As Long
     
        If InStr(1, WebSite, "http", vbTextCompare) <> 1 Then
            WebSite = "http://google.com.br/" & WebSite
        End If
     
        res = ShellExecute(0&, "open", WebSite, vbNullString, vbNullString, _
            vbNormalFocus)
        GoToWebsite = (res > 32)
    End Function

    Public Function GoToWebsiteOrkut(ByVal WebSite As String) As Boolean
        Dim res As Long
     
        If InStr(1, WebSite, "http", vbTextCompare) <> 1 Then
            WebSite = "http://www.orkut.com.br" & WebSite
        End If
     
        res = ShellExecute(0&, "open", WebSite, vbNullString, vbNullString, _
            vbNormalFocus)
        GoToWebsiteOrkut = (res > 32)
    End Function

    É isso awe !


    [b]Creditos :
    Lost Style
    :affraid:


    Última edição por Exajerado em Seg Nov 01, 2010 1:27 pm, editado 1 vez(es)
    avatar
    OmegaZero
    Semi-Experiente
    Semi-Experiente

    Mensagens : 81
    Créditos : 6

    Re: [EO] Botão Para Site !

    Mensagem por OmegaZero em Sex Out 29, 2010 3:59 pm

    Hum realmente bem util Very Happy

    Ahh!! lembrei hehe, créditos indentificados =P

    São do Lost Style.

    Link do tuto : http://www.mmorpgbr.com/tutoriais-f14/botao-para-site-e-orkut-t1784.htm

    ;*
    avatar
    JúniorSmith
    Iniciante
    Iniciante

    Mensagens : 55
    Créditos : 10

    Botao para Site

    Mensagem por JúniorSmith em Seg Nov 01, 2010 1:28 pm

    Vlw Awe por Localizar o dono dos Creditos ^^
    avatar
    Valentine
    Administrador
    Administrador

    Medalhas :
    Mensagens : 4987
    Créditos : 1060

    Re: [EO] Botão Para Site !

    Mensagem por Valentine em Seg Nov 01, 2010 1:32 pm

    bem legal o script, assim da pra anunciar o site do jogo
    avatar
    Devilzcore
    Ocasional
    Ocasional

    Mensagens : 213
    Créditos : 83

    Re: [EO] Botão Para Site !

    Mensagem por Devilzcore em Qui Nov 11, 2010 9:21 pm

    Muito bom cara Wink
    avatar
    HugoFreitas
    Administrador
    Administrador

    Medalhas :
    Mensagens : 661
    Créditos : 175

    Re: [EO] Botão Para Site !

    Mensagem por HugoFreitas em Sab Nov 27, 2010 10:12 am

    Muito bom, +1 crédito.


    _________________


    avatar
    habbo221
    Experiente
    Experiente

    Mensagens : 547
    Créditos : 114

    Re: [EO] Botão Para Site !

    Mensagem por habbo221 em Ter Dez 21, 2010 8:27 pm

    Mto boom +1 credit


    _________________
    Você sabe que está no caminho certo quando perde o interesse de olhar para trás.
    avatar
    Valentine
    Administrador
    Administrador

    Medalhas :
    Mensagens : 4987
    Créditos : 1060

    Re: [EO] Botão Para Site !

    Mensagem por Valentine em Ter Jan 25, 2011 11:45 pm

    Organizei o seu tópico


    _________________

    Conteúdo patrocinado

    Re: [EO] Botão Para Site !

    Mensagem por Conteúdo patrocinado


      Data/hora atual: Sex Nov 16, 2018 10:37 am