Connect.asp nin içeriği şu şekilde. Burada bir hata söz konusu olabilirmi?

<%
Set Conn=CreateObject("ADODB.Connection")
Conn.Open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../data/ablokdb.mdb") & ";Persist Security Info=False"

Function Cv(ByVal sData)
sData = Replace(sData,"'","`")
Cv = sData
End Function
Function CleanID(ByVal ID)
For I = 0 To 47
ID = Replace(ID,Chr(I),"")
Next
For I = 58 To 255
ID = Replace(ID,Chr(I),"")
Next
CleanID = ID
End Function
%>