Hej För att markera första: Det skall vara ordet "checked" för att få en radiobutton markerad, i nedanstående är Kategori 1 markeradMarkera första "radioknappen"
    
    
Hur får jag den första "radioknappen" att bli markerad när sidan laddas?
Radioknapparna radas upp såhär:
<% Do While Not RecSet.EOF %>
<td width="20%"><font size="2" face="verdana, arial"><input type="radio" name="x" value="<%= RecSet("SortId") %>"</td>
<td width="80%"><font size="2" face="verdana, arial"><% =RecSet("Kategori") %></td> 
<%  RecSet.MoveNext
Loop  %>
/GöranSv: Markera första "radioknappen"
    
    
<code>
<%
Dim fldSortId
Dim fldKategori
If RecSet.EOF Then
    Response.Write "No records"
Else
    Set fldSortId = RecSet("SortId")
    Set fldKategori = RecSet("Kategori")
%> 
<td width="20%"><font size="2" face="verdana, arial"><input type="radio" name="x" value="<%= fldSortId %>" selected></td> 
<td width="80%"><font size="2" face="verdana, arial"><% =fldKategori %></td> 
<%
    RecSet.MoveNext 
    Do Until RecSet.EOF
%> 
<td width="20%"><font size="2" face="verdana, arial"><input type="radio" name="x" value="<%= fldSortId %>"></td> 
<td width="80%"><font size="2" face="verdana, arial"><% =fldKategori %></td> 
<%
        RecSet.MoveNext 
    Loop
%> 
</code>
För att markera vald:
<code>
<%
Dim SelectedItem
    SelectedItem = Request.Form("x")
    Set fldSortId = RecSet("SortId")
    Set fldKategori = RecSet("Kategori")
    Do Until RecSet.EOF
        If SelectedItem = fldSortId Then
%> 
<td width="20%"><font size="2" face="verdana, arial"><input type="radio" name="x" value="<%= fldSortId %>" selected></td> 
<td width="80%"><font size="2" face="verdana, arial"><% =fldKategori %></td> 
<%
            RecSet.MoveNext 
            Exit For
        Else
%> 
<td width="20%"><font size="2" face="verdana, arial"><input type="radio" name="x" value="<%= fldSortId %>"></td> 
<td width="80%"><font size="2" face="verdana, arial"><% =fldKategori %></td> 
<%
        End If
        RecSet.MoveNext 
    Loop
    Do Until RecSet.EOF
%> 
<td width="20%"><font size="2" face="verdana, arial"><input type="radio" name="x" value="<%= fldSortId %>"></td> 
<td width="80%"><font size="2" face="verdana, arial"><% =fldKategori %></td> 
<%
        RecSet.MoveNext 
    Loop
%> 
</code>Sv: Markera första "radioknappen"
    
    
<code>
<td width="20%">
<input type="radio" name="x" value="1" checked>
</td> 
<td width="80%">Kategori 1</td> 
</tr>
<tr>
<td width="20%">
<input type="radio" name="x" value="2" >
</td> 
<td width="80%">Kategori 2</td> 
</tr>
</code>