Fra Sql til - the access way ;o)

<%
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../database/db.mdb")
%>

Nu kom jeg da videre men så siger den :

Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required: 'dbc'
/test/try/selvbygger/load_parameter.inc, line 6

<%
if len(session("Sprog")) = 0 then

    sqlPAR = "SELECT * from Parametre"
        set rsPAR = dbc.Execute(sqlPAR)

    if rsPAR("Shop_status")<>0 then
        session("Shop_status")="lukket"
    end if

    if rsPAR("Layout_hoejre")=0 then
        session("Layout_hoejre")="vis_nyheder"
    end if

    if rsPAR("Engelsk")=1 then
        session("HvilkeSprog")="Engelsk"
    elseif rsPAR("Dansk")=1 then
        session("HvilkeSprog")="Dansk"
    elseif rsPAR("Begge")=1 then
        session("HvilkeSprog")="Begge"
    end if

    session("title")=rsPAR("title")
   
    session("Sprog") =rsPAR("DefaultSprog")
    session("ParAdresse") =rsPAR("adresse")
   
end if
%>

Har lige smidt lidt flere point efter dette spgm

<%
Set dbc = Server.CreateObject("ADODB.Connection")
conn.dbc "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../database/db.mdb")
%>

<%
Set dbc = Server.CreateObject("ADODB.Connection")
conn.dbc "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../database/selvbyggeren.mdb")
%>

Nu ser den sådan ud, men så får jeg fejlen :

Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required: 'conn'
/test/try/database/db_test.inc, line 11

hov...linienr kan du ikke regne med...har ikke kopieret det gamle udkommenterede med!

arj altså - nu kokser jeg da totalt rundt i det :(

<%
Set dbc = Server.CreateObject("ADODB.Connection")
dbc.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../database/db.mdb")
%>

Jeg tror du har løst mit spørgsmål rigtigt...men nu er der så bare noget andet der driller.....kan du hjælpe? Ellers må jeg sgu bare vente til han har tid ham gutten

Error Type:
(0x80004005)
Unspecified error
/test/try/selvbygger/Default.asp, line 12

Her er default første 15-20 linier

<!--#INCLUDE FILE="db_demoshop.inc" -->
<!--#INCLUDE FILE="load_parameter.inc" -->
<!--#INCLUDE FILE="shop_status.inc" -->
<!--#INCLUDE FILE="log_normal.asp" -->
<%

'Find antal af forsidetilbud
Sqltael2 = "Select count(*) as Found from products"&_
            " WHERE (forsidetilbud = 1)"
Set Record2 =  dbc.Execute(Sqltael2)

'SELECT * FROM tabel ORDER BY RAND() LIMIT 1
sqlProd = "SELECT * from products"&_
            " WHERE (forsidetilbud = 1)"&_
            " and (aktiv = 1)"&_
            " ORDER BY RAND() LIMIT 8"
           
set rsprod = dbc.Execute(sqlProd)

temp_tekst=1
%>
<!--#INCLUDE FILE="find_tekst.inc" -->

der er små forskel på SQL-syntaksen mellem access og mysql - fx hedder det top 1 i access hvor der i mysql bruges limit 1... så det kan være du skal gennemgå samtlige dine SQL'er

Okay...damn....sikke et arbejde når man nu slet ik kender mysql-forespørgsler! Men tak for hjælpen!