我'我是新手,也是Visual Basic和Sql Server的新手,我是智利...... 好吧,我有一个问题,我已经思考了几天而无法解决。 当他想要查看您的信息时,我需要在客户的网络表单中显示图像。
为此,我有下一个来源:
表客户端
email(varchar), nameClient(varchar), nameImage(varchar)
表格图片
nameImage(varchar), image(image)
我有下一个过程:
select c.email, c.nameClient, i.image
from Client as c join Image as i on c.nameImage=i.nameImage
在asp.net中,我有一个Web表单作为VerCliente.aspx,在VerCliente.aspx.vb我有这个:
Partial Class Default19
Inherits System.Web.UI.Page
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
MostrarNombreCliente.Text = Session("correo")
End Sub
Protected Sub BotonMostrarPerfil_Click(sender As Object, e As EventArgs) Handles BotonMostrarPerfil.Click
Dim numero As Integer
Dim dvSql As Data.DataView = DirectCast(SqlDataSource1.Select(DataSourceSelectArguments.Empty), Data.DataView)
'通过这种方式,我与BD'
建立了联系 If dvSql.Count > 0 Then
numero = 1
'在文本框中显示Iam占用会话变量'
Session("email") = dvSql(0).Item(0)
MostrarEmail.Text = Session("email")
Session("nombre") = dvSql(0).Item(1)
MostrarNombreCompleto.Text = Session("nombre")
在VerCliente.aspx中我有这个,我会在上面显示图像
asp:Image ID="MostrarImagen" runat="server" Height="191px" Width="270px" /
但我不知道如何在这里占用会话变量
MostrarImagen.ImageUrl....(I dont know How )
我尝试了这个,但它不起作用
Session("imagen") = dvSql(0).Item(2)
MostrarImagen.ImageUrl.ImageUrl = Session("imagen")
End If
End Sub
结束班
感谢....再见!
答案 0 :(得分:0)
好吧,在我多次尝试之后,最后我可以解决我的问题,但是我认为我做新解决方案的方式与我提出问题的方式完全不同,但重要的是是我的解决方案正常...
这是我的解决方案,我希望能够对你有用..
感谢您的评论!!!
会话(" imagen")= dvSql(0).Item(8)
If (Context.Session("imagen")) IsNot Nothing Then
Dim image As Byte() = DirectCast(Context.Session("imagen"), Byte())
Dim base64String As String = Convert.ToBase64String(image, 0, image.Length)
Image1.ImageUrl = Convert.ToString("data:image/png;base64,") & base64String
Image1.Visible = True
End If