För mig är det här knepigt...
I Text1 så läser jag in en styl-fil (binary).
Jag plockar därefter ut de 16 olika stylenamnen(jag visar inte den koden den är för stor).
Därefter så ville jag söka efter dessa stylenamn en efter en, som ligger sparat i text(0).tag t ex)
Jag försöker nu använda mig av regular express:


<code>
Dim regxp As Object, oMatch As Object, MatchC As Object, intPos As Long
Text2.Text = ""
intPos = InStr(1, Text1.Text, "OC31", 0)

Set regxp = CreateObject("VBScript.RegExp")
regxp.IgnoreCase = True

regxp.Pattern = Text(Index).TagDim objRegExp As RegExp
Dim objMatch As Match
Dim colMatches As MatchCollection
Dim RetStr As String, intPos As Long
Dim TestRegExp As String
Text2.Text = ""
intPos = InStr(1, Text1.Text, "OC31", 0)
Set objRegExp = New RegExp
objRegExp.Pattern = Text(Index).Tag
objRegExp.IgnoreCase = True
objRegExp.Global = True

If (objRegExp.Test(Text1.Text) = True) Then
Set colMatches = objRegExp.Execute(Text1.Text)
For Each objMatch In colMatches
RetStr = RetStr & "Match found at position "
RetStr = RetStr & objMatch.FirstIndex & ". Match Value is '"
RetStr = RetStr & objMatch.Value & "'." & vbCrLf

Text1.SelStart = objMatch.FirstIndex
Text1.SelLength = objMatch.Length
Next
Else
RetStr = "String Matching Failed"
Text1.SelStart = 1
End If
TestRegExp = RetStr
Text2.Text = TestRegExp
Text1.SetFocus
Set objRegExp = Nothing
</code>
Vad som är problemet är att den jämmför(pattern) på ett lustigt sätt.
Jag kan själv se att namnet finns, som han skall leta upp, men han gör inte det alltid, bara ibland.
Hur kan jag förändra pattern?

Har du kollat så dom exakt lika :)

Hade ju problemet att på vissa ställen var " " utbytt mot "_" och då funkar det kasst.

Hej igen Herman!!!
Vad jag kan se så är de lika,kolla här.
Jag kopiera först pattern(vad som skall sökas efter), därefter vad som finns.

Party*G1.0
Party*G1.0

Part1*G1.0
Part1*G1.0

Part2*G1.0
Part2*G1.0

PASO3*G1.0
PASO3*G1.0
Jag anser att detta är likt varandra eller??

jo det ser likadant ut. Har du testat att använda instr istället och se om den funkar bättre? Är inte så haj på vbscript men tror dom gör samma?

Japp, sämmre resultat.
Vad jag förstår så skall RegEx vara bäst på det här.

Jag kollade lite på filerna jag hade här och dom namnen som finns längre ner i texten är inte alltid "tag namnet" utan ibland är det andra namnet. Och så finns det ett problem till att ibland är " " utbytt mot "_" som jag sa ovan.

Jag vet inte om det är hela problemet. Men jag testade instr på några som funkade har inte testat så många. Men du får gärna skicka någon fil som det inte funkar på eller säga vad som inte funkar på dom jag har. Exemplen ovan har jag inte iaf.

Jag återkommer Herman, jag bygger om interfaset lite så får vi se vad det blir.
(men detta är steg 2, så det som är gjort tidigare skall vara med)