Fejlmeddelse - hvad betyder det?

Hmmmm....jeg kan måske hjælpe en smule med det sidste problem - har nemlig kørt med samme problem et par gange - det virker dog oftest som om PWS virker alligevel...

Jeg tror ikke det er dér problemet i det øverste ligger...men der skal du nok poste lidt code ?

Ummildbart mener jeg ikke det burde have noget med din fejl at gøre, men det kommer an på din kode, laver du transaktioner baseret ¨på MTS ? ..
JEg kan ikke hjælpe dig med hvorfor MTS ikke blev installeret, men hvis du viser koden til dit script kan det være vi kan finde fejlen. Mit ummildbare gæt vil være at du har glemt \"end if\", men har lidt svært ved at se det ud af sammenhænge.

Fejlen kan ses på : www.greenstreet.dk > Billeder > Galleri.
Koden for default.asp-filen ser således ud (den er lang!):
<!--#INCLUDE FILE=\"clsDatabase.asp\"-->

<head>
<title></title>
</head>

<body bgcolor=\"#CCFFFF\">

<CENTER><H3>Fotogalleri</H3></CENTER>

<%
Dim objDB
Dim strSQL
Dim strCategoryOptions
Dim lngCategoryID
Dim varImageAry
Dim lngIndex
Dim lngMaxIndex
Dim lngImageID
Dim strTitle
Dim strDescription

lngCategoryID = Request.Form(\"CategoryID\")

Set objDB = New clsDatabase

\' Grab Categories
strSQL = _
    \"SELECT \" & _
        \"[CategoryID], \" & _
        \"[CategoryName] \" & _
    \"FROM \" & _
        \"[Categories] \" & _
    \"ORDER BY \" & _
        \"[CategoryName] ASC\"
Call objDB.SetOptions(strSQL, strCategoryOptions, True)

strCategoryOptions = Replace(strCategoryOptions, \"value=\"\"\" & lngCategoryID & \"\"\"\", \"value=\"\"\" & lngCategoryID & \"\"\" selected\")

strSQL = _
    \"SELECT \" & _
        \"[ImageID], \" & _
        \"[Title], \" & _
        \"[Description] \" & _
    \"FROM \" & _
        \"[Images] \" & _
    \"WHERE \"
   
If lngCategoryID = \"\" Then
    strSQL = strSQL & \"[CategoryID] IS NULL \"
Else
    strSQL = strSQL & \"[CategoryID] = \" & lngCategoryID & \" \"
End If

strSQL = strSQL & \"ORDER BY [Title] ASC\"

Call objDB.SetData(strSQL, varImageAry)
       
Set objDB = Nothing
%>

<FORM method=\"post\" action=\"default.asp\">

    <p align=\"center\">Vælg en kategori:
    <SELECT name=\"CategoryID\">
        <OPTION value=\"\">Miscellaneous</OPTION>
        <%=strCategoryOptions%>
    </SELECT>

    <INPUT type=\"Submit\" value=\"Se billeder\">
   
</FORM>
<HR>
<%
If IsArray(varImageAry) Then
    lngMaxIndex = UBound(varImageAry, 2)
    Response.Write(\"<TABLE>\")
    For lngIndex = 0 To lngMaxIndex
        lngImageID = varImageAry(0, lngIndex)
        strTitle = varImageAry(1, lngIndex)
        strDescription = varImageAry(2, lngIndex)
       
        If Not Len(strTitle) = 0 Then strTitle = Server.HTMLEncode(strTitle)
        If Not Len(strDescription) = 0 Then strDescription = Server.HTMLEncode(strDescription)
        Response.Write(\"<TR>\")
        Response.Write(\"<TD valign=\"\"top\"\">\")
        Response.Write(\"<IMG src=\"\"image.asp?ImageID=\" & lngImageID & \"\"\" width=\"\"100\"\" border=\"\"1\"\">\")
        Response.Write(\"</TD>\")
        Response.Write(\"<TD valign=\"\"top\"\">\")
        Response.Write(\"<A href=\"\"image.asp?ImageID=\" & lngImageID & \"\"\"><B>\" & strTitle & \"</B></A><BR>\")
        Response.Write(strDescription)
        Response.Write(\"</TD>\")
        Response.Write(\"</TR>\")
       
    Next
   
    Response.Write(\"</TABLE>\")
Else
    Response.Write(\"No images are present in this category.\")
End If
%>

Iøvrigt - den kode jeg arbejder med, kan hentes på: http://www.planet-source-code.com/xq/ASP/txtCodeId.6727/lngWId.4/qx/vb/scripts/ShowCode.htm - såfremt nogle af jer vil kigge nærmere på koden!
Jeg vil se dyner nu, men logger på igen i morgen!
God nat til jer alle

Tilsidst lige en tilføjelse: Efter download af koden, arbejder jeg videre med ASP-siderne i FrontPage 2000 og uploader med en lille program a la CuteFTP - hvis det er et svar på cyb\'s spørgsmål (vedr. om jeg laver transaktioner med MTS)

Nu prøver jeg at indsætte en gæstebog - og får igen en fejlmeddelse. Se www.greenstreet.dk > andet > gæstebog. De fleste ASP-koder kører - så vidt jeg kan se - på en eller anden form for database, typisk Access. Er der noget jeg skal installere/uploade i den forbindelse, og kan det være årsagen til alle mine fejlmeddelser?

Nej jeg tror ikke det har noget med MTS at gøre, MTS er en server du kan benytte til at håndtere transactions, men det er et ret stort arbejde, du skal bla. beskrive have den skal gøre i alle fejltilfælde osv.
Med hensyn til din kode så tror jeg du skal bytte om på linjerne
Call objDB.SetOptions(strSQL, strCategoryOptions, True)

og

strCategoryOptions = Replace(strCategoryOptions, \"value=\"\"\" & lngCategoryID & \"\"\"\", \"value=\"\"\" & lngCategoryID & \"\"\" selected\")

Du benytter strCategoryOptions i et funktions kald uden at have defineret den først.

Jeg har prøvet at bytte om på linierne som beskrevet - og samme fejlmeddelse kommer

Hmm .. måske har du ikke installeret de seneste odbc drivere. Du skal minimum have Microsoft ActiveX Data Objects 2.5 Library.

Benytter du han databasen der følger med eller har du selv lavet en database ?

Databasen følger med. Microsoft ActiveX Data Objects 2.5 Library har jeg IKKE installeret - det sker ikke automatisk med installation af Windows? Hvor finder jeg Microsoft ActiveX Data Objects 2.5 Library? Hvad skal jeg evt. installere yderligere for at arbejde (ordentligt) med ASP?

Jeg tror ikke der er andet du skal installere.
Du kan downloade odbc driverene fra microsofts site.
www.microsoft.com

OK - og for så lige at opsummere tingene for en jomfru (udi ASP) som mig:
Først installerer jeg PWS og obdc-drivere.
Derefter downloader og udpakker jeg ASP-programmet (fotogalleri) for tilsidst at uploade programmet (diverse ASP-filer) til mit websted.
Undervejs retter jeg i ASP-filerne vha. FrontPage2000 (kun udseende, baggrundsfarver o.lign.) - det kan jeg vel godt, uden der sker noget med filerne?
- Er det korrekt at gøre sådan?