How do i convert this asp code into asp.net?

[yasinirshad]

Hi,
Help me convert this asp code into asp.net (vb.net) pls.
I have a form .. page1.asp ..

Sub CallsFormatRow
If  StrMessageStatus="0" Then
	mycolor="#F5F5CB" 
Else
	mycolor="#CCCCCC" 
End If
CallID=Server.URLEncode(strCallId)
UserID=Server.URLEncode(strRequesterID)
%>
	<tr>
	<td width="8%" align="center" valign="top" height="15" bgcolor="<%=mycolor%>"><font face="Verdana" size="1"><A 	Href="UserMessageReview.asp?CallID=<%=CallID%>&UserID=<%=UserID%>&pageno=<%=mypage%>"><%=strCallId%></A></td>
     	<td width="16%" align="center" valign="top" height="15" bgcolor="<%=mycolor%>"><font face="Verdana" size="1"><%=strDescription%></td>
     	
	</tr>    
	 </font>    
	<%
End sub

and in page2.asp

CallID=Request.QueryString("CallId")
UserID=Request.QueryString("UserID")
pageno=Request.QueryString("pageno")

icallsOpenDataBase  myconn
SQL = "SELECT * FROM MESSAGES WHERE CALL_ID=" & CallID & ""
Set rsMsg = myconn.Execute(SQL)

%>
	<table bgcolor="#2d3d6e" BORDER="0" cellspacing="5" cellpadding="10" width="826">
		<tr>
			<td width="193"><font face="Verdana" size="2" color="#ffffff">CALL STATUS</font></td>
			<td width="400"><font face="Verdana" size="1" color="#ffffff"><select name="strStatus">
						<%
icallsOpenDataBase  myconn
SQL = "SELECT STATUS.STATUS_ID,STATUS.STATUS_LABEL FROM STATUS,CALLS WHERE STATUS.STATUS_ID=CALLS.STATUS_ID AND CALLS.CALL_ID=" & CallID & ""
Set rs = myconn.Execute(SQL)
rs.MoveFirst()
WHILE rs.EOF <> true
	Response.write "<option value=" & rs("STATUS_ID") &" > " & rs("STATUS_LABEL") &""
	rs.MoveNext()
WEND
rs.Close()
icallsCloseDatabase myconn
%>