Hi Raymond!
Geht es damit?
fldInst = request.form ("org")
'response.write (""& fldInst)
set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strConn
set objOrg = Server.CreateObject ("ADODB.Recordset")
SQL = "SELECT idinst, instname FROM institution where instname like '"&
fldInst &"'"
set objOrg = objConn.execute (SQL)
if objOrg.eof then%>
No Dates
<% else %>
<%
' Warum machst du hier einen Loop? Ich denke, du willst EINE ID haben?
objOrg.MoveFirst
do while not objOrg.eof
Dim ID
ID = objOrg.fields("idinst").value
response.write ID
objOrg.movenext
loop
end if
%></HEAD>
<BODY BGCOLOR="#FFFFFF">
<form method="post" name="mem" action="test1.asp">
<table>
<tr><td> Organisation: </td>
<td><INPUT TYPE="text" size="50" NAME="fldOrg" value="<%=ID%>">
</td>
</tr>
</table>
</form>
<%
response.write ID
objOrg.close
objConn.close
%>
Gru�,
Arkor, http://www.drhirn.com/20
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
