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
1 svar · 213 visningar · startad av Brimba
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 IfFelmeddelande:
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
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