Access vil ikke virke

linje 53 som den siger der er fejl i ser sådan ud:

set conn= Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + dbf

det er stien til din database det er galt med,

Kan du ikke indsætte den så jeg ved at den er rigtig

jo men jeg skal altså se hele scriptet

change dbf to "C:\ThePath\TheDatabaseName.mdb"

YOU will need to change ThePath to the correct path and TheDatabaseName to the correct name

<% @LANGUAGE=VBscript %>
<% Option Explicit %>
<%' Her sikre vi at forumet kan køres på servere hvor VBscript ikke er default %>
<% '/// Denne skal være includeret i starten (linje 1) <!-- #INCLUDE FILE="header.asp" -->%>
<%
Response.buffer=True

'Dim af variabler sikre de staves korrekt og optimerer hastigheden

Dim Arkiv_frist,Years,Months,Days,Hours,Minutes,Seconds,OutDate,OutTime,fdays,rsID2
Dim Timenow,Timeout,conn,dbName,dbf,Sitemap,Dirlocation,Site,Smtpserver,Sender,rsEmailad
Dim Sendername,Priority,ContentTransferEncoding,Charset,Subscribe,Confirm,subject,Treadmail
Dim MessageID,Post,TreadID,Count,Topcount,mode,Username,Name,Emailad,strName,MessageTime
Dim indents,rsClients, rsClients2,CHTreadmail,CHNewest,Newest,FirstMessage,strEmailad,Users,UserError
Dim strCount,StrTopCount,strTreadmail,strFirstmessage,strNewest,Knowtify,Antalfo,conf,forumname
Dim Antalark,action,send,send1,send2,send3,rs,rsUsers,rs1,rs2,rs3,snow,snow1,snow2,snow3
Dim b,n,rsTrash,menu1,menu2,Tilmeld,Frameld,intPage,intpageCount,intnum,rsSubtread,forums
Dim AdminEmail,commentsP,SQL,SQL1,SQL2,SQL3,SQL4,SQL5,SQL6,SQL7,subtype,Posted,NString,MString
Dim Replied,Followed,Ptype,RedURL,id,id2,rsConfirm,strPWDA,admin,rsMessage,TidM,treadopcl
Dim Vals,Cols,Vals1,Vals2,Cols1,Cols2,Allpost,JMail,Comments,Text,NameM,SubjectM,Usernames
Dim Formname,Description,commentsR,commentsS,commentsE,commentsM,subbed,SQLadmin,NewString,intRecCount

' Her sørger den for at siderne ikke bliver cachet!
Response.Expires = 0
Response.Expiresabsolute = DateAdd("d", -2, Now())
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "private"
 
      Function ConvertDate(dtmDate)


    Months = right("00" & DatePart("m", dtmDate) ,2)
    Days = right("00" & DatePart("d", dtmDate) ,2)
    Hours = right("00" & DatePart("h", dtmDate) ,2)
    Minutes = right("00" & DatePart("n", dtmDate) ,2)
    Seconds = right("00" & DatePart("s", dtmDate) ,2)
    Years = right(DatePart("yyyy", dtmDate), 2)

    OutDate = Years& "-" & Months & "-" & Days
    OutTime = Hours &"-"& Minutes &"-"& Seconds

    ConvertDate = OutDate & "-" & OutTime
    End Function

        arkiv_frist = 30
    fdays = ConvertDate(now-arkiv_frist)
Timenow = ConvertDate(NOW)
Timeout = ConvertDate(NOW-2)
dbName = "/db/dbforum.mdb"    '(name of your database)
dbf=Server.MapPath (dbName)
set conn= Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + dbf




' Slet alle posteringer der er foretaget for mere end 2 dage siden, som ikke er bekræftet af afsender!
'Timenow = tiden for posteringen < end (tiden nu - 2 dage)

SQL2 = "DELETE FROM mailinglist WHERE Timenow <'" & Timeout & "' AND Confirm=0"
Conn.execute (SQL2)




'Konfiguration:
'Sitemap - modtageren af besked kan finde message.asp i flg. sti ( minus domæne(eks. www.minside.dk))
Sitemap="/debat/"
'+ domænet! =Dirlocation
site =Request.ServerVariables("SERVER_NAME")
Dirlocation="http://" & site & Sitemap
strPWDA=""

smtpserver=""
Sender=""
SenderName=""
Charset="iso-8859-1"
ContentTransferEncoding="8bit"
    ' 1 - highest priority (Urgent)
    ' 3 - normal
    ' 5 - lowest
Priority = 1


if Session("admin")="yes" then %>
<form name="URL">
<input type="hidden" name="RedURL" value="<% =Request.ServerVariables("URL") %>">
</form>
<%
RedURL = Request.Form("RedURL")
Response.write RedURL
End if



' URL strenge
subscribe= Request.QueryString("subscribe")
confirm= Request.QueryString("confirm")
username= Request.QueryString("username")
messageID= Request.QueryString("messageID")
TreadID= Request.QueryString("TreadID")
post= Request.QueryString("post")
count=Request.QueryString("count")
mode=Request.QueryString("mode")
topcount=Request.QueryString("topcount")
'Andre variabler
Tilmeld = Request("Tilmeld")
Frameld = Request("Frameld")
action = Request.form("action")

' Her hentes værdierne fra ASPCookien ind i variabler
strName = Request.Cookies("Cookie")("Name")
strEmailad = Request.Cookies("Cookie")("Emailad")
strCount = Request.Cookies("Cookie")("Count")
strTopcount = Request.Cookies("Cookie")("Topcount")
strTreadmail = Request.Cookies("Cookie")("Treadmail")
strFirstmessage = Request.Cookies("Cookie")("Firstmessage")
strNewest= Request.Cookies("Cookie")("Newest")

Emailad = Request.form("Emailad")
Name = Request.form("Name")


If strTreadmail<>"" then
ChTreadmail="CHECKED"
End if

If Request.form("Treadmail")="yes" then
Knowtify=1
else
Knowtify=0
End if

If strNewest<>"" then
ChNewest="CHECKED"
End if

If strFirstmessage<>"" then
ChFirstmessage="CHECKED"
End if




if Request.Form("action")="save" then
    Response.Cookies("Cookie")("Emailad") = Request.Form("Emailad")
    Response.Cookies("Cookie")("Name") = Request.Form("Name")
    Response.Cookies("Cookie")("Treadmail") = Request.Form("Treadmail")
    Response.Cookies("Cookie")("Count") = Request.Form("Count")
    Response.Cookies("Cookie")("Topcount") = Request.Form("Topcount")
    Response.Cookies("Cookie")("Newest") = Request.Form("Newest")
    Response.Cookies("Cookie")("Firstmessage") = Request.Form("Firstmessage")
    Response.Cookies("Cookie").Domain = site
    Response.Cookies("Cookie").expires = Date+365
End if
%>

here is the bit of interest!
IF you have a web site you need to place the database in a sub folder named db

dbName = "/db/dbforum.mdb"    '(name of your database)
dbf=Server.MapPath (dbName)
set conn= Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" + dbf

Yes but can you set it in the script. Because I can´t do it

Din Access ligger da ikke her :  D:programmerofficeshortcut baroffice

Det er da en helt gak path !

Er det ikke en genvej du referer til ?

YOU have to know where the datbases is NOT me!
When youdownloaded the debat forum you should also have downloaded the database (dbforum.mdb) and this has to be palced somewhere. then  you change the path!
If you cant do that yourself then your in deep sh.. :o)
mvh
terry

Er det stien til databasen i mener den er her
C:\Inetpub\wwwroot

jeg er lidt forviret

anderstidemand15> HAVE YOU A DATABASE (.MDB) file?

You say you have DOWNLOADED a "debat forum" so you will also have downloaded a database. If you have NOT downloaded a databases then your forum will NOT work.
If you have downloaded a database then you can PUT it where you want, then it is up to you to change the code to connect to the database!