GLoWnT
30 de Diciembre del 2003

Hola,
Tengo un problema, no se como es la sintaxis del código Replace(), osea q nose q tendría que hacer si quiero quitar:

"c:Documents and Settings" & User & "Datos de programaMicrosoftMSN Messenger"

Quitar todo eso a:

"c:Documents and SettingsGLoWnTDatos de programaMicrosoftMSN Messenger3162400566"

(cuando user = GLoWnT)

Para quedarme solo con el número (3162400566).

Yo he intentado:

path = "c:Documents and SettingsGLoWnTDatos de programaMicrosoftMSN Messenger3162400566"


ReplacedOne = Replace(path, "c:Documents and Settings" & User & "Datos de programaMicrosoftMSN Messenger", "")

Me vendría muy bien una ayudita.

Gracias!
Adíán GLoWnT
([email protected])

sdemingo
30 de Diciembre del 2003

Hola, he probado esto y funciona, no se si s lo que quieres...

Private Sub Form_Load()
Dim path As String
Dim numerito As String
Dim user As String

user = "GLoWnT"

path = "c:Documents and SettingsGLoWnTDatos de programaMicrosoftMSN Messenger3162400566"

If user = "GLoWnT" Then
numerito = Replace(path, "c:Documents and Settings" & user & "Datos de programaMicrosoftMSN Messenger", "")
End If

MsgBox numerito

End Sub

Saludos
sdemingo

GLoWnT
30 de Diciembre del 2003

Coño, si es lo q he hecho yo!
Voy a mirar otra vez. De todos modos muchas gracias sdmingo por tu rapidísima respuesta y por haberte tomado tantas molestias

Muchas gracias! y Feliz año nuevo!

GLoWnT
30 de Diciembre del 2003

SIIIIIIIIIIIIIIIIIIIIIIIIIII!!!!
Funciona (aunq no entiendo xq no me funcionó antes)
Muchas gracias, ayer me pasé todo el dia pensando como podia hacer esto.