webForumDet fria alternativet

Fel på FSDATA / Xlate, eller min kod?

ASP

1 svar · 213 visningar · startad av Brimba

Medlem sedan dec. 19995 874 inlägg
Frågan#1

Hej!

Jag använder följande kod:

<font size="1" face="Verdana, Arial, Helvetica, sans-serif">
if not RS.eof then
	sokstrang = RS("ivArtikel") 
	Set regEx = New RegExp
	regEx.IgnoreCase = True 
	regEx.Global = True
	regEx.Pattern = "(" & gid & ")"
	mYstring = regex.Replace(sokstrang,"<B>$1</B>") 
	Set RegEx = nothing
	response.write text & "<font color='#333366'><B>" & RS("ivRubrik") & "</B></font><br>" & text & mYstring & "</font><br><br>"
	rs.movenext
End If</font>

Det har fungerat perfekt i ungefär en vecka, när det plötsligt slutar fungera.

Jag skriver då följande till FSDATA/Xlate:

Hej!

Jag kan inte längre använda mitt reguljära uttryck.

Min kod:

if not RS.eof then
sokstrang = RS("ivArtikel")
Set regEx = New RegExp
regEx.IgnoreCase = True
regEx.Global = True
regEx.Pattern = "(" & gid & ")"
mYstring = regex.Replace(sokstrang,"<B>$1</B>")
Set RegEx = nothing
response.write text & "<font color='#333366'><B>" & RS("ivRubrik") & "</B></font><br>" & text & mYstring & "</font><br><br>"
rs.movenext
End If

Felmeddelande:
fel '8002801d'
Biblioteket är inte registrerat.

/sok.asp, line 49

Line 49, är: Set regEx = New RegExp

Detta script har fungerat tidigare, och därför undrar jag varför det inte fungerar längre.

Som svar får jag följande:

Hej!

Följande svar fick jag från vår tekniker:

Varför det har slutat fungera kan jag ej
svara på, det vi har gjort är att vi uppgraderade
script motorn, detta är dock den enda kund som har
hört av sig att något inte skulle fungerat efter
uppgraderingen.

Mer information: http://msdn.microsoft.com/scripting/default.htm

De anser alltså att ärendet är slut där?

Jag anser att om de nu har uppgraderat och det sedan inte fungerar, om så bara för en kund, eftersom någon annan kanske inte har använt sådan kod som jag har använt, så bör de forska i hur de kan lösa det.

Någon som har något bra svar jag kan ge dem?
Eller är det någon som ser något fel i min kod?

Ha det bra!

------------------
Mvh
Patrik aka Brimba
Brimbas lille ställe

Medlem sedan dec. 19995 874 inlägg
#2

Bör kanske även tilläggas att jag har testat att enbart köra:

Set regEx = New RegExp

...och jag får samma felmeddelande

------------------
Mvh
Patrik aka Brimba
Brimbas lille ställe

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