如何用存储过程保存图片? 请教一个问题,如何用存储过程保存图片啊?我搜索了都没有找到合适的说明,有没有人用过啊?谢谢了...在线等啊.... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我用的SQL Server难道 不可以啊?晕了,不过还是谢谢你了... 关注,我以前也用Sql Server没有成功 uses Jpeg;begin if OpenPictureDialog1.execute then begin DBISAMTable1.edit; DBImage1.Picture.LoadFromFile(OpenPictureDialog1.FileName); DBImage1.CopyToClipboard; DBImage1.PasteFromClipboard; DBISAMTable1.post; end;end; exec master.xp_cmdshell 'textcopy /S servername /U loginname /P password /D databaseName /T tablename /C colname /W wheresql /F filename /I'其中参数wheresql是型如【where id = 1】的语句,要求必须能唯一定位数据表中的一条记录filename就是你要存储入数据库的文件名; 最后/I表示存入;/O表示读出 用textcopy将文件导入数据库,如何再取出来?如果把word文档导进去,取出来还能保持原来的格式吗?谢谢。 faq-it.org/cvs/--------------------------------------------------------------- WORD存放在image字段中 --------------------------------------------------------------- 我知道用delphi的方法将文件变成流写到字段读时先用ADOBLOB属性读入字段值再写入临时目录的生成临时文件即可。 --------------------------------------------------------------- 1、建立过程 CREATE PROCEDURE sp_textcopy ( @srvname varchar (30), @login varchar (30), @password varchar (30), @dbname varchar (30), @tbname varchar (30), @colname varchar (30), @filename varchar (30), @whereclause varchar (40), @direction char(1)) AS DECLARE @exec_str varchar (255) SELECT @exec_str = 'textcopy /S ' + @srvname + ' /U ' + @login + ' /P ' + @password + ' /D ' + @dbname + ' /T ' + @tbname + ' /C ' + @colname + ' /W "' + @whereclause + '" /F ' + @filename + ' /' + @direction EXEC master..xp_cmdshell @exec_str 2、使用测试 create table 表名 (编号 int,image列名 image) go insert 表名 values(1,0x) insert 表名 values(2,0x) go --存 sp_textcopy '你的服务器名','sa','你的密码','库名','表名','image列名','c:/aa.doc','where 编号=1','I' --注意条件是 编号=1 go --读 sp_textcopy '你的服务器名','sa','你的密码','库名','表名','image列名','c:/aa.doc','where 编号=1','O' --注意条件是 编号=1 go 如何格式化一个字符串? Delphi联盟 MSN群,187725欢迎加入, 如何判断当前操作系统是Win2k还是XP? 关于WebBrowser的问题!????????????? 会者不难。。。。。 ADO问题,在线等待 一个关于字符串排序的问题 请问如何根据实际需要生成一定数量的控件??? nextGrid控件当DoubleBuffered :=true 的时候数据显示会花屏 设计的报表页面大小在客户机上不能用 在用OleContainer1打开excel 时,如何自动打开excel ,用要每次程序运行后,通过双击鼠标来打开excel 求一个字符串 组的排序算法,能用delphi写最好
难道 不可以啊?
晕了,不过还是谢谢你了...
begin
if OpenPictureDialog1.execute then
begin
DBISAMTable1.edit;
DBImage1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
DBImage1.CopyToClipboard;
DBImage1.PasteFromClipboard;
DBISAMTable1.post;
end;
end;
filename就是你要存储入数据库的文件名; 最后/I表示存入;/O表示读出
faq-it.org/cvs/---------------------------------------------------------------
WORD存放在image字段中
---------------------------------------------------------------
我知道用delphi的方法将文件变成流写到字段读时先用ADOBLOB属性读入字段值再写入临时目录的生成临时文件即可。
---------------------------------------------------------------
1、建立过程
CREATE PROCEDURE sp_textcopy (
@srvname varchar (30),
@login varchar (30),
@password varchar (30),
@dbname varchar (30),
@tbname varchar (30),
@colname varchar (30),
@filename varchar (30),
@whereclause varchar (40),
@direction char(1))
AS
DECLARE @exec_str varchar (255)
SELECT @exec_str =
'textcopy /S ' + @srvname +
' /U ' + @login +
' /P ' + @password +
' /D ' + @dbname +
' /T ' + @tbname +
' /C ' + @colname +
' /W "' + @whereclause +
'" /F ' + @filename +
' /' + @direction
EXEC master..xp_cmdshell @exec_str
2、使用测试
create table 表名 (编号 int,image列名 image)
go
insert 表名 values(1,0x)
insert 表名 values(2,0x)
go
--存
sp_textcopy '你的服务器名','sa','你的密码','库名','表名','image列名','c:/aa.doc','where 编号=1','I' --注意条件是 编号=1
go
--读
sp_textcopy '你的服务器名','sa','你的密码','库名','表名','image列名','c:/aa.doc','where 编号=1','O' --注意条件是 编号=1
go