VB.NET中怎么將圖片和MP3等存進SQL server2000的數(shù)據(jù)庫中？

為圖片、照片、MP3、rmvb指定專屬文件名稱和文件夾，SQL數(shù)據(jù)庫中定義字符串字段存儲他們的路徑。

我們提供的服務有：成都做網(wǎng)站、成都網(wǎng)站建設、微信公眾號開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認證、天河ssl等。為千余家企事業(yè)單位解決了網(wǎng)站和推廣的問題。提供周到的售前咨詢和貼心的售后服務，是有科學管理、有技術的天河網(wǎng)站制作公司

制作對應控件，綁定到對應的文件類型上去。

范例 網(wǎng)頁中插入圖片 圖片來源數(shù)據(jù)庫

1、在網(wǎng)站主目錄下建立一個文件夾 Photo 將 張三.jpg圖片存進去

2、數(shù)據(jù)庫表1.字段1中存放 張三

3、在pic.aspx中使用一個Image控件 ID=Image1

4、pic.aspx.cs文件中代碼如下

string x=""

*****************//查詢數(shù)據(jù)庫 并將"張三"賦值給x這部分代碼省略

Image1.ImageUrl = "/photo/" + x.ToString() + ".jpg";

希望能解決你的問題。

vb.net2003如何將二進制流轉換成圖片顯示在網(wǎng)頁上?

好像沒有什么好辦法，你只有不用數(shù)值型的文本框，還是改用字符型的，這樣不論點擊哪里光標都會出現(xiàn)在最前面，然后在代碼中用val()函數(shù)將其轉換為數(shù)值型

VB UTF-8 問題

Private Declare Function WideCharToMultiByte Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long, ByRef lpMultiByteStr As Any, ByVal cchMultiByte As Long, ByVal lpDefaultChar As String, ByVal lpUsedDefaultChar As Long) As Long

Private Declare Function MultiByteToWideChar Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpMultiByteStr As Long, ByVal cchMultiByte As Long, ByVal lpWideCharStr As Long, ByVal cchWideChar As Long) As Long

Private Const CP_UTF8 = 65001

Function Utf8ToUnicode(ByRef Utf() As Byte) As String

Dim lRet As Long

Dim lLength As Long

Dim lBufferSize As Long

lLength = UBound(Utf) - LBound(Utf) + 1

If lLength = 0 Then Exit Function

lBufferSize = lLength * 2

Utf8ToUnicode = String$(lBufferSize, Chr(0))

lRet = MultiByteToWideChar(CP_UTF8, 0, VarPtr(Utf(0)), lLength, StrPtr(Utf8ToUnicode), lBufferSize)

If lRet 0 Then

Utf8ToUnicode = Left(Utf8ToUnicode, lRet)

End If

End Function

Private Sub Form_Load()

Dim a As String

Dim b() As Byte

Dim i As Integer

a = "E9 A2 91 E9 81 93 31 00"

ReDim b(UBound(Split(a, " ")) - 1) As Byte

For i = 0 To UBound(Split(a, " ")) - 1

b(i) = "H" Split(a, " ")(i)

Next i

Text1.Text = Utf8ToUnicode(b())

End Sub

vb.net(2008)把圖片(或其它類型文件)轉換成字符串存入.txt文件中，并從.txt中讀出生成圖片

這個做法應該是圖方便的加密解密做法。按你的C#代碼來改的話是這樣的。

'Imports System.IO

Public Function MapPath(ByVal virtualPath As String) As String

' Return System.Web.Hosting.MapPath(virtualPath)

' 猜想是這個 MapPath 函數(shù)

' 如果不是那就自己還原原來C#代碼里的那個MapPath

End Function

Public Sub GetImage()

Dim s As System.IO.Stream = System.IO.File.Open(MapPath("33.jpg"), System.IO.FileMode.Open)

Dim leng As Integer = 0

If s.Length Int32.MaxValue Then

leng = s.Length

End If

Dim by(leng) As Byte

s.Read(by, 0, leng) ' 把圖片讀到字節(jié)數(shù)組中

s.Close()

Dim str As String = Convert.ToBase64String(by) ' 把字節(jié)數(shù)組轉換成字符串

Dim sw As System.IO.StreamWriter = System.IO.File.CreateText(MapPath("11.txt")) ' 存入11.txt文件

sw.Write(str)

sw.Close()

sw.Dispose()

End Sub

' 把字符串還原成圖片

Public Sub CreateImg()

Dim sr As New System.IO.StreamReader(MapPath("11.txt"))

Dim s As String = sr.ReadToEnd()

sr.Close()

Dim buf As Byte() = Convert.FromBase64String(s) ' 把字符串讀到字節(jié)數(shù)組中

Dim ms As New System.IO.MemoryStream(buf)

Dim img As System.Drawing.Image = System.Drawing.Image.FromStream(ms)

img.Save(MapPath("12.jpg"), System.Drawing.Imaging.ImageFormat.Jpeg)

ms.Close()

ms.Dispose()

End Sub

vb.net文件讀取txt

1、實現(xiàn)上傳按鈕方法代碼。

2、判斷圖片對象是否為空代碼。

3、取得數(shù)據(jù)庫字段 dt.Rows(0)("Pic")方法代碼。

4、字節(jié)數(shù)組轉換為Image類型方法代碼。

5、處理SQL中操作Image類型方法代碼。

6、實現(xiàn)的上傳結果。

本文題目：vb.net圖片轉字符的簡單介紹
文章網(wǎng)址：http://jinyejixie.com/article48/dodoihp.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供ChatGPT、小程序開發(fā)、商城網(wǎng)站、服務器托管、網(wǎng)站排名、面包屑導航

廣告

聲明：本網(wǎng)站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經(jīng)允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)