Birkin VB
Messages postés26Date d'inscriptionvendredi 25 mai 2007StatutMembreDernière intervention25 octobre 2009
-
24 févr. 2009 à 22:19
moscato40
Messages postés27Date d'inscriptionmardi 13 mai 2008StatutMembreDernière intervention24 juin 2010
-
26 févr. 2009 à 14:11
Bonjour ou bonsoir, jaimeré savoir comment recupéré le nom de la chanson au dessu de la video sur youtube de mon webbrowser et le métre dans un textbox merci pour vau reponce
Birkin VB
Messages postés26Date d'inscriptionvendredi 25 mai 2007StatutMembreDernière intervention25 octobre 2009 25 févr. 2009 à 19:32
Private Function MyMid(ByRef Expression As String, sLeft As String, sRight As String, Optional Start As Long = 1) As String
Dim lPosL As Long, lPosR As Long lPosL InStr(Start, Expression, sLeft): lPosR InStr(lPosL + 1, Expression, sRight)
If lPosL > 0 And lPosR > 0 Then
MyMid = Mid$(Expression, lPosL + Len(sLeft), lPosR - lPosL - Len(sLeft))
Else
MyMid = vbNullString
End If
End Function
moscato40
Messages postés27Date d'inscriptionmardi 13 mai 2008StatutMembreDernière intervention24 juin 2010 26 févr. 2009 à 14:11
et oui :
tu as oublié les guillements. Le but de cette fonction est de rechercher entre 2 chaînes de caractères (il faut donc des guillements pour indiquer que c'est un chaîne, sinon ce serait une variable ).