<telerik:RadAsyncUpload ID="RadAsyncUpload1" runat="server" AllowedFileExtensions=".jpeg,.jpg,.png,.doc,.docx,.pdf,.tif,.tiff"></telerik:RadAsyncUpload><br />
<span >Select files to upload (<%= String.Join(",", RadAsyncUpload1.AllowedFileExtensions)%>)</span>
Private Sub RadAsyncUpload1_FileUploaded(sender As Object, e As Telerik.Web.UI.FileUploadedEventArgs) Handles RadAsyncUpload1.FileUploaded
''create a folder to put the background check in
Dim strFolder As String = Server.MapPath("myFolder")
If Not File.Exists(strFolder) Then
Directory.CreateDirectory(strFolder)
End If
'move the file
Dim strNewFileName As String = Path.Combine(strFolder, Me.RadAsyncUpload1.UploadedFiles(0).FileName)
Me.RadAsyncUpload1.UploadedFiles(0).SaveAs(strNewFileName, True)