Oppure

Loading
06/01/07 16:08
aSeptik
Ciao ragaSsSi! :P

Avrei un quesito da porvi! ;D

Supponendo di avere una TextBox piena zeppa di parole e codici HTML come posso estrarre la stringa ke mi serve posta tra questo preciso TAG:

<td width="324" valign="top"> STRINGA KE MI SERVE </td>

cioè come posso fare per usare questo preciso TAG come se fosse un "Delimiter"!?

sono sicuro ke qualcuno ha la risposta, pls show me the way! :D e grazie tante!!
Ultima modifica effettuata da aSeptik 06/01/07 16:09
aaa
06/01/07 22:29
P4p3r0g4

<td width="324" valign="top"> è di 28 lettere giusto?
</td> è di 5

con mid fai una "scansione" e togli quelli prima e quelli dopo a un mid(text1.text,x,28)=..
e a uno con 5

sotto un codice (se vuoi).














































Option Explicit
Dim x As Integer
Dim y As Integer
Dim stringa As String

Private Sub Command1_Click()
For x = 1 To (Len(Text1.Text))
If Mid(Text1.Text, x, 28) = "<td width=" & Chr(34) & "324" & Chr(34) & "valign=" & Chr(34) & "top" & Chr(34) & ">" Then
stringa = Mid(Text1.Text, x + 28, Len(Text1.Text))
End If
Next x
For y = 1 To (Len(stringa))
If Mid(stringa, y, 5) = "</td>" Then
stringa = Mid(stringa, 1, y - 1)
Exit For
End If
Next y
Text1.Text = stringa
End Sub
aaa