conn2.asp

一套很早的多用户电子商务程序

<%
dim conn
set conn=server.createobject("adodb.connection")
conn.connectionstring="provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("../Data_dns100_cn_1234/shop_9655abc.asp")
conn.open

function FomaID(Rid)
RID=replace(RID,"or","")
RID=replace(RID,"and","")
RID=replace(RID,"'","")
RID=replace(RID,"="," ")
FomaID=RID
end function
%>