Databsefejl hvad?

Hvad med at du viste os noget kode i stedet?

Active Server Pages error 'ASP 0126'

Include file not found

/projekter/g1/Default.asp, line 198

The include file '_fpclass/fpdbform.inc' was not found.


Det betyder den ikke kan finde din include fil  fpdbform.inc

der ligger ikke en mappe der '_fpclass/fpdbform.inc' har dette . Den fil hvor skal den ligge databsen og formularen er kreeret i frontpage.


<%
' FP_ASP ASP genereret automatisk af en FrontPage-komponent. Undlad at redigere.

On Error Resume Next
Session("FP_OldCodePage") = Session.CodePage
Session("FP_OldLCID") = Session.LCID
Session.CodePage = 1252
Session.LCID = 1030
Err.Clear

strErrorUrl = ""

If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
If Request.Form("VTI-GROUP") = "0" Then
    Err.Clear

    Set fp_conn =  Server.CreateObject("ADODB.Connection")
    FP_DumpError strErrorUrl, "Der kan ikke oprettes forbindelse."

    Set fp_rs = Server.CreateObject("ADODB.Recordset")
    FP_DumpError strErrorUrl, "Postsæt kan ikke åbnes."

    fp_conn.Open Application("default_ConnectionString")
    FP_DumpError strErrorUrl, "Databasen kan ikke åbnes."

    fp_rs.Open "Resultater", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable
    FP_DumpError strErrorUrl, "Postsæt kan ikke åbnes."

    fp_rs.AddNew
    FP_DumpError strErrorUrl, "Der kan ikke føjes nye poster til databasen."
    Dim arFormFields0(2)
    Dim arFormDBFields0(2)
    Dim arFormValues0(2)

    arFormFields0(0) = "T2"
    arFormDBFields0(0) = "T2"
    arFormValues0(0) = Request("T2")
    arFormFields0(1) = "T1"
    arFormDBFields0(1) = "T1"
    arFormValues0(1) = Request("T1")

    FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0

    If Request.ServerVariables("REMOTE_HOST") <> "" Then
        FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Navn_på_fjerncomputer"
    End If
    If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then
        FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Webbrowsertype"
    End If
    FP_SaveFieldToDB fp_rs, Now, "Tidsstempel"
    If Request.ServerVariables("REMOTE_USER") <> "" Then
        FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "Brugernavn"
    End If

    fp_rs.Update
    FP_DumpError strErrorUrl, "Databasen kan ikke opdateres."

    fp_rs.Close
    fp_conn.Close

    FP_FormConfirmation "text/html; charset=windows-1252",_
                        "Formularbekræftelse",_
                        "Du har sendt følgende oplysninger:",_
                        "default.asp",_
                        "Vend tilbage til formularen."

End If
End If

Session.CodePage = Session("FP_OldCodePage")
Session.LCID = Session("FP_OldLCID")

%>
<%
' FP_ASP ASP genereret automatisk af en FrontPage-komponent. Undlad at redigere.

On Error Resume Next
Session("FP_OldCodePage") = Session.CodePage
Session("FP_OldLCID") = Session.LCID
Session.CodePage = 1252
Session.LCID = 1030
Err.Clear

strErrorUrl = ""

If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
If Request.Form("VTI-GROUP") = "1" Then
    Err.Clear

    Set fp_conn =  Server.CreateObject("ADODB.Connection")
    FP_DumpError strErrorUrl, "Der kan ikke oprettes forbindelse."

    Set fp_rs = Server.CreateObject("ADODB.Recordset")
    FP_DumpError strErrorUrl, "Postsæt kan ikke åbnes."

    fp_conn.Open Application("default_ConnectionString")
    FP_DumpError strErrorUrl, "Databasen kan ikke åbnes."

    fp_rs.Open "Resultater", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable
    FP_DumpError strErrorUrl, "Postsæt kan ikke åbnes."

    fp_rs.AddNew
    FP_DumpError strErrorUrl, "Der kan ikke føjes nye poster til databasen."
    Dim arFormFields1(1)
    Dim arFormDBFields1(1)
    Dim arFormValues1(1)

    arFormFields1(0) = "T1"
    arFormDBFields1(0) = "T1"
    arFormValues1(0) = Request("T1")

    FP_SaveFormFields fp_rs, arFormFields1, arFormDBFields1


    fp_rs.Update
    FP_DumpError strErrorUrl, "Databasen kan ikke opdateres."

    fp_rs.Close
    fp_conn.Close

    FP_FormConfirmation "text/html; charset=windows-1252",_
                        "Formularbekræftelse",_
                        "Du har sendt følgende oplysninger:",_
                        "default.asp",_
                        "Vend tilbage til formularen."

End If
End If

Session.CodePage = Session("FP_OldCodePage")
Session.LCID = Session("FP_OldLCID")

%>

Jeg får ikke du skriver:  Se her www.krellers.dk/projekter/g1/
Tryk på linket og du får den fejl jeg har vist. Så kom me det rigtige link.

Er du sikker på at der står noget fornuftigt i din Application("default_ConnectionString") variabel. Hvis ikke så går det selvfølgeligt galt når du forsøger at bruge den:

fp_conn.Open Application("default_ConnectionString")

Jeg får altså en "The page cannot be found" når jeg prøver det der link...

Også her...

Ja det får jeg også nu men før fik jeg den anden fejl.

www.krellers.dk/g2/

undskyld....

Nu kan man komme ind på siden, så er det meningen at man skal indtaste navn og email det kan man også og kommer til bekræftelses side....men det bliver ikke registreret i databasen...

www.krellers.dk/g2/_private/database.asp

Mit gæt er stadig at Application("default_ConnectionString") er udefineret. Dette ville f.eks. ske hvis du ikke havde nogen global.asa fil.

da du bruger fp ligger den nævnte fil

'_fpclass/fpdbform.inc'

formodentlig lokalt på din maskine.

fejlen opstår typisk fordi man udvikler lokalt og derefter bruger ftp til upload af web.

du har så glemt den mappe formodentlig fordi du ikke vidste den var der.

kan det være løsningen?

//vbcoder

Lige nu kan jeg kun se en fejl..
som de side selv skriver:

Database Results Error
The database connection named 'default' is undefined.

This problem can occur if:
* the connection has been removed from the web
* the file 'global.asa' is missing or contains errors
* the root folder does not have Scripting permissions enabled
* the web is not marked as an Application Root