Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
  		RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
Autor
Nachricht
sollniss_
Coder
Coder

Anmeldedatum: 08.09.2007
Beiträge: 212
Replace mit Lückenfüller
Verfasst am: 09.03.2008, 00:24
Hab folgendes Problem:

Ich lese Etwas aus, das HTML Code enthält (teilweise), und diesen will ich mit der Replace Funktion ersetzen.
Allerdings häng ich grade bei den Links, da ich nicht weiß wie ich Lückenfüller bnutzen kann ("*" geht nicht).

Der Link sieht folgendermaßen aus:
Zitat:
<a href="http://blablubb.de" rel="external">http://blablubb.de</a>


Das fett Gedruckte soll am Ende übrig bleiben.

//edit
argh verschieben pls
http://sollniss.1x.to/

 
c0re_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 29.11.2007
Beiträge: 425

Verfasst am: 09.03.2008, 00:49
Code:
Dim sComplete As String, sToSearch As String, iRelPos As Long, _
sRestOfFile As String, sOutput() As String

sComplete = "<a href=" & Chr(34) & "http://blablubb.de" & Chr(34) _
& "rel=" & Chr(34) & "external" & Chr(34) & ">http://blablubb.de</a>" & _
sToSearch = "rel=" & Chr(34) & "external" & Chr(34) & ">"
iRelPos = InStr(1, sComplete, sToSearch)
sRestOfFile = Mid(sComplete, iRelPos + Len(sToSearch))
sOutput = Split(sRestOfFile, "</a>")

Und dann auslesen:

Code:
Dim sEnd As String
sEnd = sOutput(0)

Kannst ja noch in eine Schleife einbauen, sodass er ab der letzten Position weitersucht.
 
sollniss_
Coder
Coder

Anmeldedatum: 08.09.2007
Beiträge: 212

Verfasst am: 09.03.2008, 01:17
Jo. Das macht genau das selbe wie ich es schon habe; am Ende steht
"http://blablubb.dehttp://blablubb.de" da.
http://sollniss.1x.to/

 
c0re_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 29.11.2007
Beiträge: 425

Verfasst am: 09.03.2008, 07:53

Bei mir steht am Ende h~p://blablubb.de. Hast du schon eine Schleife drin?

Btw, Moved.
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Problem mit always on top funktion 1107 30.10.2009, 12:26
Keine neuen Beiträge IntStr()funktion 1309 11.10.2007, 09:49
Keine neuen Beiträge TopMost Funktion unter DirectX 1022 27.07.2007, 11:48
Keine neuen Beiträge Wie Funktion nutzen ? 1214 29.06.2007, 21:59
Keine neuen Beiträge update funktion einbauen 1455 29.01.2007, 00:11
 



[ Time: 0.0595s ][ Queries: 89 (0.0196s) ][ GZIP on - Debug on ]