Hi guys i have established a connection between my database and front end and now have the data i require displayed in a list box when i run my application, which is the code i have included below. i now need to amend the program so that this information is only displayed in the list box when i click a button, but am unsure how to attempt this.
Any help would be greatly appreciated.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
dim conn
dim rs
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & Server.Mappath("./db1.mdb ") & _
"; Jet OLEDB:Database Password="
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT Word FROM Words WHERE Word LIKE 'A%' ", conn
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Untitled Document</title>
</head>
<body>
<p>
<select name="list1" size="5">
<%
rs.MoveFirst
Do While NOT rs.EOF
%>
<option value='<%= rs.Fields("Word").Value%>'><%= rs.Fields("Word").Value%></option>
<%
rs.MoveNext
Loop
%>
</select>
</p>
<p>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="80" height="22">
<param name="movie" value="ButtonA.swf">
<param name="quality" value="high">
<embed src="ButtonA.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="80" height="22" ></embed>
</object>
</p>
<p> </p>
<p> </p>
<p> </p>
</body>
</html>
<%
rs.Close
conn.Close
set rs=nothing
set conn=nothing
%>
dBforums
>
Button On Click event
02-09-05, 08:00
Linear Mode
