15. december 2004 - 12:10Der er
9 kommentarer og 1 løsning
sæt tekst ind mellem en sætning
Hej jeg skal bruge en funktion der kan sætte noget tekst ind mellem noget andet tekst. Jeg kender ikke indexof, skal sammenligne med noget start og slut tekst og så sætte det ind mellem dem
Public Function test(ByVal tekst As String) Dim str1 As String = "I samarbejde med nogle af Danmarks " Dim str2 As String = "bedste flettere, møbelsnedkere" Dim str3 As String = "HER ER JEG" Dim resultat As String
nej ikke helt, har kun telve teksten, hvor jeg har 2 andre tekststrenge, som jeg bruger, til at sige at det skal være mellem dem, at der skal sættes noget ind. Jeg har ikke indexof værdierne, det skal kun køre på tekstværdier, hvis det kan lade sig gøre
Jeg har articlestart og articelend som er en indputbox, hvor jeg kopiere noget kode ind fra en fil, det der så er meningen er at imellem start og end, skal jeg indsætte noget tekst. Mit problem er at koden bliver indsat nedenunder articelend, istedetfor mellem articelstart og end. hvad gør jeg forkert??
Har følgende kode:
Dim p As Integer Dim w As Integer
p = webp.IndexOf(articelStart) + articelStart.Length w = webp.IndexOf(articelEnd) + articelEnd.Length setArticle = webp.Substring(0, p + 3) & Chr(13) & Chr(10) & "<!-- #INCLUDE FILE=""Article.asp"" -->" & Chr(13) & Chr(10) & webp.Substring(w) ', webp.Length - ix - 3)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.