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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Descobrir a extenção do arquivo
Polack
EMBU DAS ARTES
SP - BRASIL
ENUNCIADA !
Postada em 16/11/2010 21:51 hs         
E ae gente beleza?Olha eu aqui de novo.rsrs
è o seguinte queria saber se tem como descobri a extensão de um arquivo, que tem o path carregado num caixa de texto, ou no file nome do mediaplayer?
Exemplo tenho uma caixa de texto que carrega o path da aplicação assim:
C:meuprogramaminhasmusicasmusica01.mp3, logo esse path é carregado no mediaplayer
mediaplayer.filename = text1.text
queria interceptar a extenção ou na caixa de texto, ou no filename do media player?

achei esse código aqui e to tentando adaptar
http://www.vbweb.com.br/forum_resp.asp?Codigo=158299
   
Juan Carlos R.A
Pontos: 2843
MACEIO
AL - BRASIL
ENUNCIADA !
Postada em 17/11/2010 10:09 hs            
Polack tem um jeito de pegar a extensão usando o rigth(numerocarateres)

texto= rigth(texto,3)

tendo em conta se no windows esta setado para mostrar extensões dos arquivos.
   
Polack
EMBU DAS ARTES
SP - BRASIL
ENUNCIADA !
Postada em 17/11/2010 10:30 hs         
Valeu Juan Carlos, vou ver oq dá pra fazer e ja posto o resultado.
   
Polack
EMBU DAS ARTES
SP - BRASIL
ENUNCIADA !
Postada em 17/11/2010 11:21 hs         
Juan Carlos vc é um gênio! ficou perfeito.


Dim arquivo As String
Dim i As Long
arquivo = Text1.Text
For i = 1 To Len(arquivo)
If Left(Right(arquivo, i), 1) = "" Then
arquivo = Right(arquivo, 3)
Exit For
End If
Next i
MsgBox arquivo
Mais uma vez obrigado..logo logo venho com mais duvidas..aguardem..rsrsrs
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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