00000015.htm

来自「水木清华关于C++Builder程序的代码」· HTM 代码 · 共 112 行

HTM
112 行
字号 
<HTML><HEAD>  <TITLE>BBS水木清华站∶精华区</TITLE></HEAD><BODY><CENTER><H1>BBS水木清华站∶精华区</H1></CENTER>发信人:&nbsp;Zeemon&nbsp;(踏遍青山),&nbsp;信区:&nbsp;Visual&nbsp;<BR>标&nbsp;&nbsp;题:&nbsp;[CB]实现BLOB字段的读写&nbsp;<BR>发信站:&nbsp;BBS&nbsp;水木清华站&nbsp;(Wed&nbsp;Jun&nbsp;17&nbsp;12:58:08&nbsp;1998)&nbsp;<BR>&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;CB中实现BLOB字段的读写&nbsp;<BR>对于SQL中的TEXT、IMAGE、MEMO字段的存取，可以采用下列程序：&nbsp;<BR>BLOB字段的读取：&nbsp;<BR>&nbsp;TBlobSTream*&nbsp;TemplateStream;&nbsp;<BR>&nbsp;char*&nbsp;TempPlatePtr;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<BR>&nbsp;<BR>&nbsp;TemplateStream=new&nbsp;&nbsp;&nbsp;TBlobStream((TBlobField*)WebQuery-&gt;FieldByName&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;(&quot;SearchTem&quot;),bmReadWrite);&nbsp;<BR>&nbsp;TemplatePtr=&nbsp;new&nbsp;char[TemplateStream-&gt;Size];&nbsp;<BR>&nbsp;TemplateStream-&gt;Read(TemplatePtr,&nbsp;TemplateStream-&gt;Size);&nbsp;<BR>&nbsp;<BR>BLOB字段的写入：&nbsp;<BR>&nbsp;TBlobSTream*&nbsp;TemplateStream;&nbsp;<BR>&nbsp;char*&nbsp;TempPlatePtr;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<BR>&nbsp;<BR>&nbsp;TemplateStream=new&nbsp;&nbsp;&nbsp;TBlobStream((TBlobField*)WebQuery-&gt;FieldByName&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;(&quot;SearchTem&quot;),bmReadWrite);&nbsp;<BR>&nbsp;TemplatePtr=&nbsp;new&nbsp;char[TemplateStream-&gt;Size];&nbsp;<BR>&nbsp;TemplateStream-&gt;Write(TemplatePtr,&nbsp;TemplateStream-&gt;Size);&nbsp;<BR>&nbsp;<BR>________________________________________________________________&nbsp;<BR>补充:&nbsp;<BR>获得字段的大小用函数datalength&nbsp;<BR>&nbsp;<BR>SQL&nbsp;Server端要作一点设置:&nbsp;<BR>By&nbsp;default,&nbsp;WRITETEXT&nbsp;is&nbsp;a&nbsp;nonlogged&nbsp;operation.&nbsp;This&nbsp;means&nbsp;that&nbsp;&nbsp;<BR>text&nbsp;or&nbsp;image&nbsp;data&nbsp;is&nbsp;not&nbsp;logged&nbsp;when&nbsp;it&nbsp;is&nbsp;written&nbsp;into&nbsp;the&nbsp;database.&nbsp;&nbsp;<BR>To&nbsp;use&nbsp;WRITETEXT&nbsp;in&nbsp;its&nbsp;default,&nbsp;nonlogged&nbsp;state,&nbsp;&nbsp;<BR>//注意!!&nbsp;<BR>the&nbsp;system&nbsp;administrator&nbsp;must&nbsp;use&nbsp;the&nbsp;sp_dboption&nbsp;system&nbsp;stored&nbsp;&nbsp;<BR>procedure&nbsp;to&nbsp;set&nbsp;select&nbsp;into/bulkcopy,&nbsp;&nbsp;<BR>//&nbsp;<BR>which&nbsp;allows&nbsp;nonlogged&nbsp;data&nbsp;to&nbsp;be&nbsp;inserted.&nbsp;<BR>&nbsp;<BR>做了试验,直接写SQL语句好象不行.&nbsp;<BR>____________________________________________________________________&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;一些注意事项和一个例子&nbsp;<BR>在写入时:&nbsp;<BR>(1)如果使用的是TTable,则要将其ReadOnly属性先置为false,然后调用Edit函数;&nbsp;<BR>(2)如果使用的是TQuery,则要将其RequestLive属性先置为true,然后调用Edit函数;&nbsp;<BR>使得TTable(TQuery)是可写的.&nbsp;<BR>&nbsp;<BR>下面是一个使用TQuery往content表(主键file_id)中插入一条记录的例子,&nbsp;<BR>script为一个BLOB字段:&nbsp;<BR>&nbsp;&nbsp;&nbsp;TBlobStream&nbsp;*pScriptStream;&nbsp;<BR>&nbsp;&nbsp;//插入一条记录&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;strSQL1=&quot;insert&nbsp;&nbsp;into&nbsp;&nbsp;content(file_id,script,key_image)&nbsp;values('&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;strSQL1=strSQL1+m_szFileID+&quot;',null,null)&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;SQL-&gt;Clear();&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;SQL-&gt;Add(strSQL1);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;ExecSQL();&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;Close();&nbsp;<BR>&nbsp;&nbsp;//整理要写入的Blob数据&nbsp;&nbsp;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;LockMemories(NewsScript);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NewsScript.GetEdition(NewsScript.m_ScriptHead.byteEditionNum);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NewsScript.m_pScript=(BYTE&nbsp;*)GlobalLock(NewsScript.m_hScript);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;if(NewsScript.m_pScript!=NULL)&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{&nbsp;<BR>&nbsp;&nbsp;&nbsp;//再将刚插入的记录读出来,使该Query与该条记录关联&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;strSQL1=&quot;select&nbsp;&nbsp;file_id,script&nbsp;&nbsp;from&nbsp;&nbsp;content&nbsp;&nbsp;where&nbsp;&nbsp;file_id='&quot;+&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m_szFileID+&quot;'&quot;;&nbsp;<BR>&nbsp;&nbsp;&nbsp;//允许该Query写&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;RequestLive=true;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;SQL-&gt;Clear();&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;SQL-&gt;Add(strSQL1);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;Open();&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;First();&nbsp;<BR>&nbsp;&nbsp;&nbsp;//将该Query置为可写&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;Edit();&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;pScriptStream=new&nbsp;&nbsp;&nbsp;TBlobStream((TBlobField*)dmStoryEditor-&gt;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;qryExec-&gt;FieldByName(&quot;script&quot;),bmReadWrite);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;pScriptStream-&gt;Write(NewsScript.m_pScript,&nbsp;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NewsScript.m_lScriptRealSize);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;Post();&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dmStoryEditor-&gt;qryExec-&gt;RequestLive=false;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;delete&nbsp;pScriptStream;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;}&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;GlobalUnlock(NewsScript.m_hScript);&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;UnLockMemories(NewsScript);&nbsp;<BR>&nbsp;<BR>&nbsp;<BR>--&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;最后青蛙问道:&quot;为什么?我告诉过你我是一位美丽的公主,&nbsp;会与你&nbsp;<BR>共度一个星期并让你为所欲为.&nbsp;你为什么还不愿吻我?&quot;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;男孩说道:&quot;我是一个程序员.&nbsp;我没时间交GF,&nbsp;但拥有一只会说话的&nbsp;<BR>青蛙简直太酷了.&quot;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<BR>&nbsp;<BR>※&nbsp;来源:·BBS&nbsp;水木清华站&nbsp;bbs.net.tsinghua.edu.cn·[FROM:&nbsp;159.226.41.99]&nbsp;<BR><CENTER><H1>BBS水木清华站∶精华区</H1></CENTER></BODY></HTML>

00000015.htm - 源码说明

本页面展示了「水木清华关于C++Builder程序的代码」中的 00000015.htm 源码文件，采用 HTM 编程语言编写，共 112 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Builder相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?