Sven: <Input Type="Image" > Hilfe

Beitrag lesen

Hi brauch dringend Hilfe,

habe folgendes Problem:

bei klick auf den Button A soll über ASP in ner Datenbank alle Datensätze mit A ausgegeben werden. So wie ichs im Momment hab funktionierts garnicht. Wer kann mir sagen was ich falsch mach bzw. wie ichs ändern kann?
Ach ja außer dem Button A soll auch noch B-Z dazukommen.

Danke im Vorraus

<%
Response.Expires=0

Eingabe = TRIM( Request( "T_Eingabe") )

' Verbindungsdetails
 db_dsn = "CPWeb"
 db_table = "Links"
 db_user = ""
 db_password = ""

' Datenbank öffnen
 set db = Server.CreateObject("ADODB.Connection")
 db.Open "dsn=" & db_dsn & ";uid=" & db_user & ";pwd=" & db_password
%>
<html>
<head>
<link rel="stylesheet" type="text/css" href="../Projekt_CPWeb/css/Style.css">

function alphasuche()

{
Buchstabe = document.alphasuche.a.status
}

</head>
<body>

<h2>Klicken Sie den Anfangsbuchstaben des gewünschten Themas an</h2>
<form name ="alphasuche" form method="post" action="Suche_Alpha.asp" >
 <Input Type= "image" src="file:///O:\ABT\LSC\Allgem\PIT\Projekt_CPWeb\images\alphabet_blau\alpha-b-a.gif" name="A" onclick="alphasuche()">

<script language="JavaScript">

function alphasuche()

{
Buchstabe = document.alphasuche.a.status
}

</script>

<%

' Daten erfragen
sql = "SELECT ID,Thema,Link FROM Links WHERE Thema LIKE '%" & Buchstabe & "%' ORDER BY Thema"

set rs = db.Execute(sql)
If not RS.EOF then
%>
<table>
<%
While not RS.EOF
%>
 <tr>
  <td><%=RS( "ID" )%></td>
  <TD><a href="<%=rs("Link")%>"><%=rs("Thema")%></a><TD>
 </tr>
<%
RS.MoveNext
WEND
%>
</table>
<%
ELSE
%>+
<table>
 <tr>
  <td>
  Es konnten keine Datensätze gefunden werden!
  </td>
 </tr>
</table>

<%
END IF
%>

</body>
</html>