can some body check this code to get rid of this error....

here is my code.....

to populate data from databse to drop downlist.....

c_main in my db consists of names which i need to bind to drop down list....

asp code:

<%
Dim Conn
Dim SQLTemp,rstemp

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.connectionstring ="Provider==SQLOLEDB.1;Data Source=" & Server.MapPath("TEAMSYN.mdb")& ";"
Conn.Open

SQLTemp = "Select distinct c_main from kpitable"
set rstemp=Conn.execute(SQLTemp)

Do While Not rstemp.EOF

%>
<%= rstemp.Fields("c_main").Value %>:

<%
rstemp.MoveNext
Loop
Conn.Close
Set Conn = Nothing
%>

html:

<td>:<select id="Name" name="Name" value=<%= sname %> >
<option value ="" selected="selected">Please Select</option>

<option value="<%rstemp %>"><%rstemp %></option>

<br/></td>

my error:

microsoft vbscript runtime error 800a000d

type mismatch in this line (<option value="<%rstemp %>"><%rstemp %></option> )

please some body help me......

urgent....