當前位置:首頁 » 操作系統 » access資料庫圖片

access資料庫圖片

發布時間: 2022-04-12 14:19:49

1. 如何在ACCESS資料庫放入圖片

首先建一個資料庫,假設為(img.mdb).在其中建一表(pic),表中有兩個欄位(id,img),id數據類型為"自動編號",img的類型為"OLE對象".
下面用三個文件用來實現圖片功能,conn.asp是定義資料庫連接函數的,up.asp用來上傳圖片,show.asp用來從資料庫讀取圖片.

-------------conn.asp--------------
<%
dim conn,rs

function getdata(sql)
dbpath="img.mdb"
set conn=server.CreateObject("ADODB.connection")
connstr="provider=Microsoft.jet.oledb.4.0;data source="&server.MapPath(dbpath)
conn.open connstr
set rs=server.CreateObject("ADODB.recordset")
rs.open sql,conn,3,2
end function

sub rsclose()
rs.close()
set rs=nothing
conn.close()
set conn=nothing
end sub
%>

---------------up.asp---------------
<html>
<body>
<form action="up.asp" method="post" enctype="multipart/form-data" >
<input type="file" size="12" name="imgurl" id="imgurl">
<input type="submit" value="upload">
</form>
</body>
</html>
<%
if (request.totalbytes)>0 then '如果有數據提交,則進行下面的處理
%>
<!--#include file="conn.asp"-->
<%
formsize=request.totalbytes
formdata=request.binaryread(formsize)
bncrlf=chrB(13)&chrB(10)
divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)
datastart=instrb(formdata,bncrlf&bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
mydata=midb(formdata,datastart,dataend)
sql="select * from pic"
getdata(sql)
rs.addnew
rs("img").AppendChunk myData
rs.update
rsclose()
response.clear
response.write "success!"
end if
%>

-------------show.asp--------------
<!--#include file="conn.asp"-->
<%
id=trim(request("id"))
sql="select * from pic where id="&id
getdata(sql)
Response.ContentType="image/*"
Response.BinaryWrite rs("img").getChunk(8000000)
rsclose()
%>

圖片上傳後就可以通過show.asp?id=*來讀取了,你也可以直接將圖片用<img>標簽插入其他頁面中,如<img src="show.asp?id=1" />

2. VB+Access做資料庫如何保存圖片

access是微軟發布的一款關系型資料庫。access資料庫保存圖片的方法很多,可以通過vb,c++,php,asp等開發語言實現;也可以直接向access資料庫插入圖片進行保存。下面演示直接插入步驟:

1、打開access資料庫,新建一張數據表(存儲圖片的欄位類型選擇:OLE 對象);

6、這樣,一張圖片就保存到access資料庫里去了。

3. 怎樣在ACCESS資料庫里存入圖片

使用Stream對象,可以實現對資料庫的圖像存取。
資料庫中存放圖像的欄位是二進制類型(Access為OLE類型)。
比如,如果用「CommonDialog」控制項來選擇你硬碟上的圖像文件;
用「Picture」控制項來顯示圖像,那麼下面的代碼供參考:
(已連接資料庫,打開了相應的記錄集rs)
Dim StmPic As ADODB.Stream
Dim StrPicTemp As String
......
'保存你所選擇的圖像
Set StmPic = New ADODB.Stream
StmPic.Type = adTypeBinary '指定流是二進制類型
StmPic.Open '將數據獲取到Stream對象中
StmPic.LoadFromFile (CommonDialog1.FileName) '將選擇的圖像載入到打開的StmPic中
rs.AddNew
rs.Fields(1).Value = StmPic.Read '從StmPic對象中讀取數據
rs.Update
StmPic.Close
......
'讀取顯示資料庫中的圖像
Set StmPic = New ADODB.Stream
StrPicTemp = "c:\temp.tmp" '臨時文件,用來保存讀出的圖片
With StmPic
.Type = adTypeBinary
.Open
.Write rs.Fields(1) '寫入資料庫中的數據至Stream中
.SaveToFile StrPicTemp, adSaveCreateOverWrite '將Stream中數據寫入臨時文件中
.Close
End With
Picture1.Picture = LoadPicture(StrPicTemp) '用Picture控制項顯示圖像
......

4. 在access資料庫中添加圖片怎樣添加如果採用路徑的方式,應該怎樣寫路徑,還有是什麼數據類型

其實呢。在ACCESS里添加圖片有兩種方法,一種是採用二進制 好像是叫二進制流的存儲吧。。不知道什麼名字了。另一種是在欄位里存放HTML標簽。<img src="abc.jpg"/>網頁顯示出來是通過標簽下的src去找地址的。。

5. 怎樣資料庫access保存jpg圖片

1、首先,打開Access,選擇文件菜單中的「新建「,選擇一種資料庫類型,這里選擇的是本地資料庫,即」空白桌面資料庫「,如下圖所示。

6. 在access資料庫中如何添加圖片

1、可以建立一個欄位 將其數據類型改為OLE對象 然後直接粘貼圖片
2、或用將圖片轉換為二進制 存入資料庫中
3、用普通欄位放一個路徑 指向圖片 直接讓顯示
第三種方法最好了 圖片直接存入資料庫,資料庫會很大的。。。

7. 如何在ACCESS資料庫里存放照片和音頻視頻

創建資料庫連接。

使用OleDbConnection。

保存圖片到Access資料庫。

將圖片轉成二進制流存到資料庫中,使用OleDbCommand命令。

保存成功後,資料庫中圖像欄位顯示為「長二進制數據」。

讀取資料庫中的圖片。

將讀出的圖片數據轉成位元組數組,而後轉成圖片顯示。

8. ACCESS資料庫中如何插入圖片

資料庫裡面一般保存的是圖片的路徑.而實際的圖片是上傳到伺服器上去面去的.

9. 請問access資料庫通過圖片位置查找圖片,應該怎麼操作呢

可以,存放圖片是很費控制項的,一般是存放路徑的。

Sub getPhoto()' 顯示一個 OFFICE 打開文件對話框,為當前的員工記錄選擇一個文件名

' 如果用戶選擇了一個文件

' 則將它顯示到圖片控制項中去

On Error GoTo Err_e

Dim fileName As String

Dim result As Integer

With Application.FileDialog(msoFileDialogFilePicker)

.Title = "請選擇員工照片"

.Filters.Add "所有文件.", "*.*" '對像顯示 「文件選擇器」對話框,並在消息框中顯示每個選定的文件

.Filters.Add "JPG文件.", "*.jpg"

.Filters.Add "BMP文件.", "*.bmp"

.FilterIndex = 1 '返回或設置一個 long 類型,表示對話框的默認文件篩選

.AllowMultiSelect = False

.InitialFileName = CurrentProject.path '設置或返回一個 string 類型 ,表示對話框中初始顯示的路徑和/或文件名

result = .Show '顯示文件對話框並返回一個 long 類型,表明用戶按下的操作按鈕(-1)還是取消按鈕(0)。

If (result <> 0) Then

fileName = Trim(.SelectedItems.Item(1))

'Item返回一個string類型,對應用戶從問價對話框選擇的文件路徑,該對話框由FileDialong對象的Show方法顯示。

Me.照片.Visible = True

Me.照片.SetFocus

Me.照片.Text = fileName

Me.員工信息ID.SetFocus

Me.照片.Visible = False

Me.LblError.Visible = False

End If

End With

Exit_e:

Exit Sub

Err_e:

MsgBox Err.Description

Resume Exit_e

End Sub

10. access資料庫中存儲圖片

假設資料庫db1中有表tb1,表有ID,path兩個欄位,path用來存放圖片路徑

可用ID檢索。

在工程中添加引用MicrosoftActiveXDataObject2.5才可以用ADODB

DimrsAsNewADODB.Recordset

DimcnAsNewADODB.Connection

DimcmdAsNewADODB.Command

'

PrivateSubForm_Load()

cn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=E:xylkylinDocotherdb1.mdb;PersistSecurityInfo=False"

cn.CursorLocation=adUseClient

cn.Mode=adModeReadWrite

cn.Open

cmd.ActiveConnection=cn

cmd.CommandType=adCmdText

DimiAsInteger

Fori=0To3

Me.Option1(i).Caption="Picture"&i+1

Nexti

EndSub

PrivateSubOption1_Click(IndexAsInteger)

cmd.CommandText="selectpathfromtb1whereid="&Index+1

Setrs=cmd.Execute

Image1.Picture=LoadPicture(rs.Fields("path"))

Text1.Text=rs.Fields("path")

EndSub

不明白了問我

熱點內容
存儲上市龍頭 發布:2024-11-15 14:52:14 瀏覽:37
我的世界伺服器怎麼重置教學 發布:2024-11-15 14:52:13 瀏覽:122
C語言tf 發布:2024-11-15 14:36:22 瀏覽:810
違反密碼法是什麼意思 發布:2024-11-15 14:36:20 瀏覽:920
androidmp3錄音 發布:2024-11-15 14:32:50 瀏覽:493
英朗自動擋哪個配置最好 發布:2024-11-15 14:27:44 瀏覽:253
編譯原理斷言有哪幾種 發布:2024-11-15 14:25:29 瀏覽:200
資料庫數據重復 發布:2024-11-15 14:23:17 瀏覽:781
安卓端開發用什麼IDE 發布:2024-11-15 14:13:51 瀏覽:554
阿里雲查看訪問ip 發布:2024-11-15 14:08:58 瀏覽:544