vil gerne have hjælp til at få min database til at fungere ??

Det ville være helt fint hvis du lige viste os din /temp/nybruger.asp line 11.

<!--#include file=\"topmenu.asp\"-->
<% brugernavn = Request.Form(\"username\")
dim conn
function OpenConn( DBName )
Set conn = Server.CreateObject(\"ADODB.Connection\")
ODBCpath = left(request.servervariables(\"PATH_TRANSLATED\"), instrrev(request.servervariables(\"PATH_TRANSLATED\"), \"\\\"))
Conn.Open \"DBQ=\" & ODBCpath & DBName & \";DefaultDir=\" & ODBCpath & \";Driver={Microsoft Access Driver (*.mdb)}\"
end function
OpenConn(\"..\\_privat\\efterlysninger.mdb\")
Set rs = Server.CreateObject(\"ADODB.RecordSet\")
SQL = \"SELECT * FROM Brugere WHERE Login=\'\" & brugernavn & \"\'\"
rs.Open SQL, conn, 1, 3
if not rs.eof then %>
Det valgte brugernavn <%= brugernavn %> er allerede optaget.<br>
V&aelig;lg et andet og <a href=\"#\" onclick=\"history.go(-1);\">pr&oslash;v igen</a>.<br>
<% else
    fornavn = Request.Form(\"fornavn\")
    efternavn = Request.Form(\"efternavn\")
    kodeord = NytKodeord(10)
    email = Request.Form(\"email\")
   
    Set JMail = Server.CreateObject(\"JMail.SMTPMail\")
    JMail.ServerAddress = \"vip.cybercity.dk:25\"
    JMail.Sender = \"dusoren@dusoren.dk\"
    JMail.Subject = \"Velkommen til Dusoeren Online\"
    JMail.AddRecipient email
    body = \"Velkommen til Dusørén Online.\" & vbNewLine & \"Dit brugernavn er \" & brugernavn & \" og dit kodeord er \" & kodeord & \"\" & vbNewLine & \"Du kan nu frit benytte alle faciliteter på www.dusoren.dk. Vi håber at du vil finde det nyttigt at være med i Dusørén Online\'s korps af dusørjægere, og at du vil opfordre venner og bekendte til ligeledes at blive medlemmer. På forhånd tak.\" & vbNewLine & \"Med venlig hilsen\" & vbNewLine & vbNewLine & \"Dusørén Online\"
    JMail.Body = body
    \' 1 - highest priority (Urgent)
    \' 3 - normal
    \' 5 - lowest
    JMail.Priority = 1
    JMail.AddHeader \"Originating-IP\", Request.ServerVariables(\"REMOTE_ADDR\")
    \'JMail.AppendBodyFromFile \"e:\\mail\\standard_footer.txt\"
    \'JMail.AddAttachment \"e:\\products\\MyProduct.exe\"
    JMail.Execute
   
    rs.addNew
    rs.Fields(\"Login\") = brugernavn
    rs.Fields(\"Kodeord\") = kodeord
    rs.Fields(\"Fornavn\") = fornavn & \"\"
    rs.Fields(\"Efternavn\") = efternavn & \"\"
    rs.Fields(\"Adresse\") = Request.Form(\"adresse1\") & \"\"
    rs.Fields(\"Postnummer\") = CInt(Request.Form(\"postnr\"))
    rs.Fields(\"By\") = Request.Form(\"bynavn\") & \"\"
    rs.Fields(\"Land\") = Request.Form(\"land\") & \"\"
    rs.Fields(\"Telefon\") = Request.Form(\"telefon\") & \"\"
    rs.Fields(\"Email\") = email & \"\"
    rs.Update
    Session(\"loggetInd\") = \"OK\"
    Session(\"brugernavn\") = brugernavn
    Session(\"navn\") = fornavn & \" \" & efternavn %>
Du er nu oprettet som bruger af Dus&oslash;ren Online, og dit kodeord er sendt til e-mail adressen <%= email %>. N&aring;r du har modtaget den tilsendte mail kan du med det samme logge p&aring; Dus&oslash;r&eacute;n Online og dermed f&aring; adgang til at oprette og l&aelig;se efterlysninger.
<% end if
rs.close
set rs = nothing
conn.close
set conn = nothing


\' NytKodeord skal kaldes med laengden af det onskede kodeord
Function NytKodeord(laengde)
    Dim kode \' Indeholder passwordet
    Dim x \' Midlertidig variabel til at holde ASCIIvaerdien for et tegn
    Dim sl \' Midlertidig variabel til at bestemme om det skal vaere et ciffer eller et stort/lille bogstav
    Randomize
    For i = 0 to laengde - 1
        sl = Rnd
        if sl < 0.3 then \' 30% cifre
            x = CInt(Rnd*(Asc(\"9\")-Asc(\"0\"))) + Asc(\"0\")
        else
            if sl < 0.65 then \' 35% store bogstaver
                x = CInt(Rnd*(Asc(\"Z\")-Asc(\"A\"))) + Asc(\"A\")
            else \' 35% smaa bogstaver
                x = CInt(Rnd*(Asc(\"z\")-Asc(\"a\"))) + Asc(\"a\")
            end if
        end if
        kode = kode & Chr(x)
    next
    NytKodeord = kode
End Function %>
<!--#include file=\"bund.asp\"-->

m-koldsgaard har du icq ?????

Kan det ikke være noget med DSN.

har fået det til at virke

Hvordan fik du det til at virke, jeg har samme problem

Mail evt. svaret til mig på mund@stofanet.dk

Please svar, da jeg er ved at gå amok.

Det er noget med serveren (IIS).
Jeg har også fået den fejl idag, på en side som der aldrig har været fejl på før.

kenneth39 skrev at stien til hans database ikke var korrekt og at det løste problemet.

Har også fået det til at virke. Det var en lille pinlig fejl i stien til Db som gjorde. Hvad er der sket med \"Cannot find Database\" istedet for en reg. fejl på et så banalt problem.

vandalay - Virker dit så hvis du ændre din sti til det rigtige?

For det er et eller andet med serveren. Når jeg har det til at lige på min egne computer kommer fejlen, men når jeg ligger filen på en \'rigtig\' server er der ingen fejl. For det har virket idag men altså ikke mere.

Ja, mit virker fint nu. Jeg havde prøvet at af- og geninstallere IIS, og havde så lige glemt at få opdateret min inet/wwwroot mappe. Min database lå i en undermappe til wwwroot, men med cut/paste fungerer alt som før på localhost.

TAK

For points kenneth39