שלום, אני חדש פה ויש לי בעיה

אני חייב שרת ASP…
מישהו מכיר שרתים טובים שתומכים בASP?
אני רשום בוובסמבה וכנראה בגלל שהשרת דפוק הוא לא מציג לי את הדך ואומר שהדף אינו נמצא. מישהו יכול להמליץ על שרתים טובים?

הגעתי למסקנה…
תודה על העזרה לכולם,
הגעתי למסקנה שבעצם הייתי צריך לעשות בהגדרות של האקספלורר שירה שגיאות מפורטות. לאחר שהגדרתי את האפשרות הופיעה לי השגיאה הבאה:

Microsoft VBScript compilation error '800a0411'

Name redefined

/HPclubs/HGdigital/regP3-verif.asp, line 270

const mydb="db/Users.mdb"
——^

אני לא מבין מה היא אומרת. באותו דף אני שמתי שלוש שאילתות למסדי נתונים שונים, אולי זאתי הבעיה?. הנה הקוד של כל הASP המרכזי שכתוב בדף השגיאה:

<%
const mydb="db/reg.mdb"
function connect()
set conn = server.createobject("ADODB.connection")
conn.mode=admodereadandwrite
conn.open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE="& server.mappath(mydb))
set connect=conn
end function
set conn = connect()
set rs = server.createobject("adodb.recordset")
rs.activeconnection=conn
rs.open "SELECT* FROM regP1" , conn,3,3
rs.addnew
rs("FName")=session("FName")
rs("LName")=session("LName")
rs("EMail")=session("EMail")
rs("age")=session("age")
rs("BDay")=session("BDay")
rs("BMonth")=session("BMonth")
rs("BYear")=session("BYear")
rs("NName")=session("NName")
rs("Password")=session("Pass")
rs("Pet")=session("Pet")
rs("NPet")=session("NPet")
rs("House")=session("house")
rs("Wand")=session("Wand")
rs("picture")=request.form("pic")
rs.update
rs.close
set rs=nothing

const mydb="db/Users.mdb"
function connect()
set conn = server.createobject("ADODB.connection")
conn.mode=admodereadandwrite
conn.open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE="& server.mappath(mydb))
set connect=conn
end function
set conn = connect()
set rs = server.createobject("adodb.recordset")
rs.activeconnection=conn
rs.open "SELECT* FROM Cash" , conn,3,3
rs.addnew
rs("S")=200
rs("H")=0
rs("G")=0
rs("InCash")=500
rs("TotalCash")=200
rs("Loan")=0
rs("UserName")=session("NName")
rs.update
rs.close
set rs=nothing

const mydb="db/Users.mdb"
function connect()
set conn = server.createobject("ADODB.connection")
conn.mode=admodereadandwrite
conn.open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE="& server.mappath(mydb))
set connect=conn
end function
set conn = connect()
set rs = server.createobject("adodb.recordset")
rs.activeconnection=conn
rs.open "SELECT* FROM Item" , conn,3,3
rs.addnew
rs("Item")=session("Pet")
rs("UserName")=session("NName")
rs("Item")=session("Wand")
rs("UserName")=session("NName")
rs.update
rs.close
set rs=nothing

%>

תודה לכל עוזר, ומקווה שתעזרו לי כמו קודם.