把ASP代码转换为ASP.NET的
<%
dim conn
dim connstr
dim db
db="main.mdb" '数据库文件位置
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr


function del1(s)
del1=left(s,len(s)-1)
end function

Function StreamToStr(sStream)  
  dim dr  
  Set dr=Server.CreateObject("Adodb.Stream")  
  dr.Mode=3  
  dr.Type=2  
  dr.Open  
  dr.Charset="GB2312"
  dr.Position=0 
  dr.WriteText sStream
  dr.Position=0  
  dr.Charset="UTF-8"  
  StreamToStr=dr.ReadText 
  StreamToStr= left(StreamToStr,len(StreamToStr)-1)  
  dr.Close  
  Set dr=Nothing  
End Function
%>
请帮忙用ASP.NET写出来,本人没学过ASP对这个代码完全不懂,请大哥帮忙.

------解决方案--------------------
del1(s)为去字符串最后一个字符，对应.net为ss.Substring(1, ss.Length - 1);
StreamToStr是将流二进制流转换成编码为GB2312的字符串，这可与ASP.NET FileStream对象的一方法来解决