Was mir auf die schnelle aufaellt ist das -> SQLQuery = "SELECT Suche
FROM Adressen; "
bei der else anweisung 100 einen fehler bringt weil dann suche = '' und
SELECT FROM Adressen vringt einen fehler :-)


Gruss

Roman Pittroff
Consulting
Bangkok, Thailand

-----Original Message-----
From: Josef Balom [mailto:[EMAIL PROTECTED]] 
Sent: Wednesday, September 26, 2001 12:03 AM
To: ASP Datenbankprogrammierung
Subject: [aspdedatabase] Abfrage mit mehreren Parameter


Hallo Liste,

ich habe eine Datenbank mit Adressen.
M�chte diese nach bestimmte Namen duchsuchen.
Die Suchkriterien werden in einem Formular eingegeben und mit Post and
die ASP Datei weitergegeben. Ich bekomme aber nun die folgende
Fehlermeldung:
_______________________________________________________________
Kompilierungsfehler in Microsoft VBScript- Fehler '800a03ea'

Syntaxfehler

/iisHelp/common/500-100.asp, line 122

on error go to 0
---------^
Microsoft JET Database Engine- Fehler '80040e10'

F�r mindestens einen erforderlichen Parameter wurde kein Wert angegeben.

/telefonbuch/asp/tabelle.asp, line 20

__________________________________________________________________

Wie muss ich die abgefragten Parameter in die SELECT FROM Anweisung
schreben?


<%@ LANGUAGE = VBScript %>
<title>Datenbankabfrage</title>
</head>
<html>
<body bgcolor="#FFFFFF" topmargin="0" leftmargin="0"> <title>ASP -
Telefon-Suchergebnis</title> <%
        Dim DBConnect, TabellenName, Suche, Sortiertnach
        Set DBConnect = Server.CreateObject("ADODB.Connection")
        Set SpaltenName = Request.Form("Param")
        Set Suche = Request.Form("Suche")
        Sortiertnach = "Nachname"
        DBConnect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=c:\inetpub\wwwroot\telefonbuch\Telefonbuch.mdb"
        IF Suche <> "" then
        SQLQuery = "SELECT SpaltenName FROM Adressen WHERE TabellenName
= '"& Suche &"%' ORDER By SpaltenName;"
        else
        SQLQuery = "SELECT Suche FROM Adressen; "
                sortiertnach = SpaltenName
        end if
        Set DataSet = DBConnect.Execute(SQLQuery)
%>
</head>
<body bgcolor="#FFFFFF"><font size=2 face="Arial">
<% if Suche <>"" then %> Suchergebnisse nach <% = SpaltenName %>: <% =
Suche %><BR> <%end if%> Anzeige sortiert nach  <% = sortiertnach
%><br><br> <a href="../index.html">Neue Suche</a>

<FORM ACTION="detail.asp" METHOD="GET"><INPUT TYPE="HIDDEN" NAME="P"
VALUE="0"> <INPUT TYPE="SUBMIT" NAME="submit" VALUE="Neuen hinzuf�gen">
</FORM>

<% if DataSet.EOF THEN %>
        <br>Die Suche nach <% = Suche %> war leider erfolglos.
        <% else %>
<p align="left"><font size=2
face="Arial"><u>Telefonbuchdatenbank:</u></font
size=2></p>

<BR>
<table border="1" cellspacing="0" cellpadding=2 width="590">
  <tr>....


| [aspdedatabase] als [EMAIL PROTECTED] subscribed 
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv Sie 
| k�nnen sich unter folgender URL an- und abmelden: 
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp


| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp

Antwort per Email an