استطعت قراءة ملفات على مجلد في السيرفر وأظهارها على الصفحة لكن أريد حذف الإمتداد

وهذا هو الكود ..

Dim di As New IO.DirectoryInfo(Server.MapPath("~/UploadFiles/Sch_jb"))
		Dim fiArr As System.IO.FileInfo() = di.GetFiles()
		Dim fi As System.IO.FileInfo

		For Each fi In fiArr
			hl.Text = fi.Name
			hl.NavigateUrl = "/UploadFiles/Sch_jb/" + fi.Name
			Page.Controls.Add(hl)
			Page.Controls.Add(New LiteralControl("<br/>"))


		Next fi

والمطلوب :

1- لا أريد ان اظهر امتداد املف فقط الإسم ..

2- بعد ظهور الملف على هيئة Hyperlink لم أستطيع عمل download له ورفض المتصفح ..لأن ذلك هو ما أريد