re.pattern

ASP

1 svar · 174 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 =)

269 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
125 ms — deklarationer (db)
0 ms — hämta statistik (cache)
138 ms — hämta tråd, inlägg och bilagor (db)
119 ms — ändringar (db)