I've got the followig:
sName = Session("uid") & " " & Session("outType") & Date.Today.Date.ToString
sName = Replace(sName, "/", "-")
sName = Replace(sName, ":", "-")
savePath = appPath + saveDir & sName & ".xml"
Dim mFile As New FileInfo(savePath)
If mFile.Exists Then
mFile.Delete()
End If
Dim fso As New FileStream(savePath, FileMode.CreateNew)
myDs.Tables.Add(Sessi ...
Go to the complete details ...