Menu
Dear Friend,
Can You help me with this strange thing ?
<%
dim Conn
set Conn=Server.CreateObject(“ADODB.Connection”)
Conn.Open “dsn=hire”
dim rs,sql
Set rs=Server.CreateObject(“ADODB.Recordset”)
sql=”select * from hire”
rs.Open sql, conn
while not rs.EOF
Response.Write “<OPTION value=” & rs(“kod”) & “>” & “</OPTION>”
rs.MoveNext
wend
%>
</tr></td></select>
<%
rs.Close
set rs=nothing
conn.Close
set conn=nothing
%>
i get the combo box with all the recordset but when open it it’s look likrits empty ?
what wrong with my sql query ?
or any thing else ?
Adi Doron