---
title: "Hjälp med script"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/76173-hjälp-med-script"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "His Divine Shadow"
published: "2003-05-07T07:33:55.000Z"
updated: "2003-05-07T12:24:17.000Z"
replies: 14
views: 282
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/76173-hjälp-med-script"
---

# Hjälp med script

## #1 — His Divine Shadow, 2003-05-07T07:33Z

Jag har en kod som ska göra så att bara en viss del av text ur ett fält visas:

```
ovrigt=RS_prod("Övrigt")
Dim Pos
  Pos=Instr(5,ovrigt,"<!--#")
  ovr=mid(ovrigt,Pos+5,Len(ovrigt)-Pos+3)
  Pos=Instr(3,ovr,"-->")
  ovr=left(ovr,Pos)
```

 

Koden så visar bara texten inom \<!--# och --\> och gömmer också dessa tecken, men, det funkar inte riktigt, det lämmnar fortfarande alltid ett streck(ett "-") efter texten, vad gör jag fel?

Permalänk: https://www.webforum.nu/p/76173

## #2 — Palle, 2003-05-07T07:42Z

Nu får vi se om jag har fattat rätt.. ;)
..men borde det inte gå enklare med Reg.Exp?

ex.

```
[red]strOvrigt = RS_prod("Övrigt")
Set regExp = New regexp
regExp.Pattern = "\<!--#(.*)\-->" 
strOvrigt = regExp.Replace(strOvrigt, "$1")
	
Response.Write strOvrigt[/red]
```

Permalänk: https://www.webforum.nu/p/1039778

## #3 — m_soderlund, 2003-05-07T07:47Z

Så här ser exempelvis en sträng ut:

ovrigt = "\<!--#include file="fil.asp"--\>

Jag vet inte om du använder dig av include file eller SSI, men chansar. Du använder dig av Pos flera gånger också.

```
Dim p, ovr
p = Instr(ovr,"-->")
ovr = Mid(ovr,6,(p-1))
Response.Write ovr
```

Tror det ska fungera.

**/r** Men Palles kod är grymmare.

Permalänk: https://www.webforum.nu/p/1039781

## #4 — His Divine Shadow, 2003-05-07T07:53Z

> **Palle skrev:**
>
> Nu får vi se om jag har fattat rätt.. ;)
> ..men borde det inte gå enklare med Reg.Exp?
> 
> ex.
> 
>
>
> ```
> [red]strOvrigt = RS_prod("Övrigt")
> Set regExp = New regexp
> regExp.Pattern = "\<!--#(.*)\-->" 
> strOvrigt = regExp.Replace(strOvrigt, "$1")
> 	
> Response.Write strOvrigt[/red]
> ```

Tja jag gjorde inte koden orginellt men jag prövade din och visst tar den bort dom två sakerna, men det visar också resten av texten, bara texten innanför domdär två tecknen ska synas.

Permalänk: https://www.webforum.nu/p/1039789

## #5 — m_soderlund, 2003-05-07T07:56Z

```
regExp.Pattern = "(\<!--#(.*)\-->)|("include file)"
strOvrigt = regExp.Replace(strOvrigt,"$1$2")
```

\*hoppas koden fungerar\*
Eller yrar jag i nattmössan?

Om du använder min:
Använder du dig av include file så får du köra en Replace() också.

```
Replace(ovr,"include file","")
```

Permalänk: https://www.webforum.nu/p/1039795

## #6 — His Divine Shadow, 2003-05-07T08:02Z

Nä, jag stoppar nog in den direkt i sidan bara.

/r 
Förstår mig inte på din kod

**regExp.Pattern = "(\\\<!--#(.\*)\\--\> )\|("include file)"**
Vad menas med include file här? varför behövs nått sånt?

**strOvrigt = regExp.Replace(strOvrigt,"$1$2")**

Var blir strOvrigt länkat till RS_prod("Övrigt")?

Permalänk: https://www.webforum.nu/p/1039802

## #7 — Palle, 2003-05-07T11:11Z

Hmm.. ok, detta då: 

```
[red]strOvrigt = RS_prod("Övrigt")
Set regExp = New regexp
regExp.Pattern = "(.*) \<!--#(.*)\--> (.*)" 
strOvrigt = regExp.Replace(strOvrigt, "$2")
	
Response.Write strOvrigt[/red]
```

Permalänk: https://www.webforum.nu/p/1039948

## #8 — His Divine Shadow, 2003-05-07T11:23Z

Det fungerar, men omvänt :p

Permalänk: https://www.webforum.nu/p/1039964

## #9 — Palle, 2003-05-07T11:27Z

> **His Divine Shadow skrev:**
>
> Det fungerar, men omvänt

I´m lost.. hehe. ;)
Jag trodde du ville ha bort all text utom det som står innanför \<!--# och \--\>.

Hur vill du ha det? Förklara nu ordenligt så mina cola-tomma hjärna förstår. :OO :e

Permalänk: https://www.webforum.nu/p/1039969

## #10 — His Divine Shadow, 2003-05-07T11:40Z

Det vill jag, men just nu gör scripte så att  \<!--# och --\> försvinner plus texten innanför.

Text som är utanför syns

Permalänk: https://www.webforum.nu/p/1039985

## #11 — Palle, 2003-05-07T11:50Z

Hmm.. har du noterat ändringen i denna rad: 

```
[red]strOvrigt = regExp.Replace(strOvrigt, "[b]$2[/b]")[/red]
```

För mig fungerar det nämligen som det ska..

Permalänk: https://www.webforum.nu/p/1039990

## #12 — His Divine Shadow, 2003-05-07T11:54Z

Yup, precis samma, så här ser ett exempel fält ut för mig:
\=============
Finsk text här
\<!--#Svensk text här--\>
\=============

Då det syns i rutan så är detta resultatet:
\=============
Finsk text här
\=============

Här är koden som visar texten i sin helhet:

```
strOvrigt = RS_prod("Övrigt")
Set regExp = New regexp
regExp.Pattern = "(.*) \<!--#(.*)\--> (.*)" 
strOvrigt = regExp.Replace(strOvrigt, "$2")
%>
<html>
	<head>
		<title></title>
	</head>
	<body>
		<font size="1" face="verdana">
			<%=strOvrigt%>
		</font>
	</body>
</html>
```

Permalänk: https://www.webforum.nu/p/1039998

## #13 — Palle, 2003-05-07T12:05Z

Aha, ok. 
Plocka bort mellanslagen i ditt pattern, like this:

```
[red]regExp.Pattern = "(.*)\<!--#(.*)\-->(.*)"[/red]
```

Permalänk: https://www.webforum.nu/p/1040020

## #14 — His Divine Shadow, 2003-05-07T12:18Z

Nu ser det ut såhär:Finsk text här Svensk text här

Permalänk: https://www.webforum.nu/p/1040036

## #15 — Palle, 2003-05-07T12:24Z

Va #\*@!! ;)

Denna koden.. 

```
[red]strOvrigt = RecSet("test")
Set regExp = New regexp
regExp.Pattern = "(.*)\<!--#(.*)\-->(.*)" 
strOvrigt = regExp.Replace(strOvrigt, "$2")
	
Response.Write strOvrigt[/red]
```

..ger mig detta resultatet: 

> **Palles kod skrev:**
>
> Svensk text här

Kolumnen i test-databasen, *RecSet("test")*, är PM och skriver jag bara ut den ser det ut så här: 

> Finsk text här \<!--#Svensk text här--\>

Permalänk: https://www.webforum.nu/p/1040048

---

Tråden på webben: https://www.webforum.nu/amne/asp/76173-hjälp-med-script