Randomize()
Dim nFileNameSuffix As Integer
Dim sFileNameSuffix As String
nFileNameSuffix = 100000 * Rnd()
sFileNameSuffix = System.Convert.ToString(nFileNameSuffix)
Try
Dim data As Byte() = myds.Tables(0).Rows(0).Item("photo")
Dim myfilestream As New System.IO.FileStream(MapPath("chart/Photo_") + sFileNameSuffix + ".bmp", IO.FileMode.Create)
myfilestream.Write(data, 0, data.Length)
myfilestream.Close()
'将Image控件的URL指向该图表文件
img1.ImageUrl = "chart/Photo_" + sFileNameSuffix + ".bmp"
Catch
End Try
Dim nFileNameSuffix As Integer
Dim sFileNameSuffix As String
nFileNameSuffix = 100000 * Rnd()
sFileNameSuffix = System.Convert.ToString(nFileNameSuffix)
Try
Dim data As Byte() = myds.Tables(0).Rows(0).Item("photo")
Dim myfilestream As New System.IO.FileStream(MapPath("chart/Photo_") + sFileNameSuffix + ".bmp", IO.FileMode.Create)
myfilestream.Write(data, 0, data.Length)
myfilestream.Close()
'将Image控件的URL指向该图表文件
img1.ImageUrl = "chart/Photo_" + sFileNameSuffix + ".bmp"
Catch
End Try