USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  shell mailto
Ivan Abreu
RIO DE JANEIRO
RJ - BRASIL
Postada em 04/09/2006 17:44 hs         
Alguem poderia me ajudar, codifiquei o seguinte comando para usar o conteudo da célula no msflexgrid para endereçar um email:
    Shell "start mailto:" & MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 2), vbHide
está dando o seguinte erro: path not found (somente na máquina do cliente que roda windows me)
obrigado
Ivan
 
     
Martini
Pontos: 2843 Pontos: 2843
PAROBÉ
RS - BRASIL
ENUNCIADA !
Postada em 04/09/2006 18:46 hs         

eu uso assim:

 

'Windows API's - executa um commando com o arquivo associado
Public Declare Function ShellExecute Lib "shell32" 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 Sub AbreComando(ByVal vgCmd As String)
  Dim i As Long
  i = ShellExecute(mdiADVANCED.hWnd, vbNullString, vgCmd$, vbNullString, vbNullString, 1)
  If i >= 0 And i <= 32 Then
    MsgBox LoadResString(73), vbCritical, vgAtencao$
  End If
End Sub

 

AbreComando "mailto:" + strListaEmails

 
   
Ivan Abreu
RIO DE JANEIRO
RJ - BRASIL
Postada em 04/09/2006 19:28 hs         
Obrigado Parobé, vou tentar.
 
Ivan
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página