欧美一区二区三区,国内熟女精品熟女A片视频小说,日本av网,小鲜肉男男GAY做受XXX网站

PB中想要上傳一個WORD文檔或excel文檔入數據庫

CSS
錢淋西2年前46瀏覽0評論

PB中想要上傳一個WORD文檔或excel文檔入https://www.b5b6.com/shujuku/？

很久沒用過PB了，網上找了一篇，大致看了一下，應該沒什么問題

--轉自51CTO論壇

在PowerBuilder里面操作BLOB數據地靈活技術

PowerBuilder提供的BLOB（Binary Large Object）數據類型可以用來處理大型數據，包括圖像、大文本、Word文檔、二進制文件和多媒體等各種數據，它的長度可以是0～2GB字節，我們利用BLOB類型的變量可以將數據傳遞給https://www.b5b6.com/shujuku/以大字段方式存儲。但是用通常的數據窗口技術無法將BLOB類型數據加入到https://www.b5b6.com/shujuku/中，也不能將https://www.b5b6.com/shujuku/中相應字段的數據提取出來，即使在程序中直接使用UPDATE和SELECT等SQL語句也是無法對BLOB類型數據進行操作的。下面筆者將介紹在PowerBuilder 7.0中操作BLOB類型數據的技巧。

程序設計原理

在PB中實現BLOB類型數據的入庫和查詢，主要要用到兩條特殊的SQL命令——UPDATEBLOB和SELECTBLOB，首先定位要進行操作的記錄，然后使用UPDATEBLOB命令就可以將BLOB類型變量中存放的數據傳遞給https://www.b5b6.com/shujuku/，而使用SELECTBLOB則是將指定記錄中的大字段數據傳遞給BLOB變量。

使用BLOB類型變量獲取外界文件的數據內容，還必須借助于PB提供的可視化OLE控制對象，通過它可以將指定的文件內容顯示成相應的對象（如BMP圖片），雙擊它就可以激活相應的OLE服務器應用程序，來編輯修改對象的內容，同時也可以讀取對象的數據內容（利用OLE控件的ObjectData屬性），給BLOB類型變量賦值。

下面結合一個簡單的程序實例，講述如何處理BLOB數據類型。在這個例子中，BMP圖片將作為一個大字段存儲在https://www.b5b6.com/shujuku/中。我們選擇Microsoft Access 2000作為后臺https://www.b5b6.com/shujuku/，它的字段類型中包含“OLE對象”類型（如果選擇MS SQL Server作為https://www.b5b6.com/shujuku/服務器，可以使用TEXT或IMAGE類型字段存放大字段數據），這樣就為管理多媒體數據、大文件和圖片提供了支持。

操作BLOB字段的實現過程

我們在Access中創建一個新的https://www.b5b6.com/shujuku/文件，文件名是bmp.mdb，在其中定義BMP圖片數據表bmptable如下：

各字段的其它設置（如字段寬度等），均采用缺省形式即可。

https://www.52fb.cn前還需要做的一步準備工作是在操作系統的ODBC配置中建立指向bmp.mdbhttps://www.b5b6.com/shujuku/的連接，名稱定為bmptable。

下面的程序片段實現了https://www.b5b6.com/shujuku/的連接，圖片的插入、更新、刪除和查詢?？紤]文章的篇幅，本文只列出與主題相關的程序源碼。

1. 連接Accesshttps://www.b5b6.com/shujuku/

SQLCA.DBMS = "ODBC"

// SQLCA為全局transaction事務變量

SQLCA.AutoCommit = False

SQLCA.DBParm = "Connectstring='DSN=bmptable;UID=WD='"

CONNECT USING SQLCA;

If SQLCA. SQLCode ＜＞ 0 Then

MessageBox ("https://www.b5b6.com/shujuku/錯誤", "連接失敗！")

Halt close;

End If

2. 將BMP圖片存入https://www.b5b6.com/shujuku/

integer bmpno,icount

//變量bmpno存放給定的圖片編號

string filepath,filename

blob blb_tmp

//…此處對圖片編號bmpno賦值，例如bmpno=101；可以通過程序實現為彈出對話框窗口提供一個圖片編號

//查詢指定的圖片編號是否已經存在

icount=0

SELECT COUNT() INTO :icount

FROM bmptable

WHERE bmptable.bmpno=:bmpno

USING SQLCA; //:bmpno為給定的圖片編號

if icount＞0 then

MessageBox("查詢結果",string(bmpno)+" 號圖片已經存在，請輸入一個新的圖片編號")

return

end if

//在OLE控制對象ole_1中插入BMP圖片文件

GetFileOpenName("請選擇一個需要插入的BMP圖片文件",filepath,filename,"BMP","BMP圖片文件(.BMP),.BMP")

If Len(filepath)=0 Then

Return

End If

If ole_1.InsertFile(filepath)＜＞0 Then //OLE錯誤

Return

End If

//新圖片入庫

string sql

sql= "INSERT INTO bmptable (bmpno,bmpdata,bmpname) &&

VALUES ("&&

+string(bmpno)+",'','"&&

+filename+"')"

EXECUTE IMMEDIATE :sql;

If SQLCA.SQLDBCode=0 Then

COMMIT USING SQLCA;

//提交事務

Else

MessageBox("https://www.b5b6.com/shujuku/錯誤","插入失敗")

ROLLBACK USING SQLCA;

//事務回滾

Return

End If

Blb_tmp=ole_1.ObjectData

UPDATEBLOB bmptable SET bmpdata=:blb_tmp

WHERE bmptable.bmpno=:bmpno

USING SQLCA; //更新存放圖片的字段

If SQLCA.SQLDBCode=0 Then

COMMIT USING SQLCA;

//提交事務

MessageBox("插入成功","圖片入庫成功")

Else

MessageBox("https://www.b5b6.com/shujuku/錯誤","更新圖片失敗")

ROLLBACK USING SQLCA;

//事務回滾

Return

End If

3. 從https://www.b5b6.com/shujuku/中刪除BMP圖片

UPDATE bmptable SET bmpdata=''

WHERE bmptable.bmpno=:bmpno

USING SQLCA;

//bmpno為要刪除的圖片編號

If SQLCA.SQLDBCode=0 Then

COMMIT USING SQLCA;

//提交事務

Else

MessageBox("https://www.b5b6.com/shujuku/錯誤","更新失敗")

ROLLBACK USING SQLCA;

//事務回滾

Return

End If

DELETE FROM bmptable

WHERE bmptable.bmpno=:bmpno

USING SQLCA;

If SQLCA.SQLDBCode=0 Then

COMMIT USING SQLCA;

//提交事務

MessageBox("刪除成功","圖片刪除成功")

Else

MessageBox("https://www.b5b6.com/shujuku/錯誤","刪除失敗")

ROLLBACK USING SQLCA;

//事務回滾

Return

End If

4. 按圖片編號查詢圖片信息

//需要提供一個圖片編號存放在變量bmpno中

SetNull(blb_tmp)

SELECTBLOB bmptable.bmpdata INTO :blb_tmp

FROM bmptable

WHERE bmptable.bmpno=:bmpno

USING SQLCA;

If Not IsNull(blb_tmp) Then

ole_1.ObjectData=blb_tmp

//雙擊OLE控制喚醒OLE服務器即可編輯圖片

End If

使用PBhttps://www.52fb.cn時，每次對https://www.b5b6.com/shujuku/進行操作后要注意檢查返回結果，以保證程序的可靠性。以上程序只是對操作BLOB數據類型的關鍵技術進行探討，通過畫板設計相應的用戶界面，即可形成一個完整的基于Client/Server結構的https://www.b5b6.com/shujuku/應用程序。