webForumDet fria alternativet
Logga in / Bli medlem

re.pattern

ASP

1 svar · 166 visningar · startad av oJones

Medlem sedan dec. 200154 inlägg
Trådstart#1

Har en kund som vars kod inte riktigt fungerar.
Har installerat VB Script Engine 5.5 (eller vilken det är) men det vill fortfarande inte. Har dock provat andra Reg Exp och de fungerar fint.

De rader markerade med ' är de som inte fungerar:

<%@ Language=VBScript %>
<!-- #include file="../db/dbkplgj.asp" -->
<% Dim bid,nbort,ingress,nyhet,nrub,vem
	bid=Request.Form("bid")
	nbort=Request.Form("nbort")
if nbort="" then
	nbort=dateAdd("m",6,date())
end if
	ingress=Request.Form("ingress")
	nyhet=Request.Form("nyhet")
	nrub=Request.Form("nrub")
	vem=Request.Form("vem")
'if ingress<>"" then
'	re.pattern="<[^>]*>"
'	ingress=re.replace(ingress," ")
'	ingress=Replace(ingress,"'","''")
'end if
'if nyhet<>"" then
'	re.pattern="<[^>]*>"
'	nyhet=re.replace(nyhet," ")
'	nyhet=Replace(nyhet,"'","''")
'end if
'if nrub<>"" then
'	re.pattern="<[^>]*>"
'	nrub=re.replace(nrub," ")
'	nrub=Replace(nrub,"'","''")
'end if
	sql="UPDATE tblbanan SET nbort='"&nbort&"',ingress='"&ingress&"',nyhet='"&nyhet&"',nrub='"&nrub&"',vem="&vem&" WHERE bid="&bid&";"
	set rs=conn.Execute(sql)
'response.write(sql)
%><!-- #include file="../db/dbloss.asp" --><%
response.redirect("start.asp")
%>

Någon som har en aning om hur jag ska lösa det eller om något i koden ser fel ut? Har själv ingen aning om hur det ska lösas.

Medlem sedan dec. 200154 inlägg
#2

Såg precis att

Set re = New RegExp

fattades. Borde hjälpa att skriva in det =)

259 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91
127 ms — deklarationer (db)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)
122 ms — ändringar (db)