£Û¼±£¬ÔÚÏߵȣÝdelphi sql2000 ͼƬ
1¡¢Â·¾¶ imgPath:string;//±ÈÈçÒѾµÃµ½ÁËͼƬ·¾¶
2¡¢SQL2000 Êý¾Ý¿â ±íÃû ttbtestimg ×Ö¶ÎÃû img ×Ö¶ÎÀàÐÍimage
3¡¢Çë¸øÒ»¸öÍêÕû´úÂ룬½«´Ë·¾¶ÏµÄͼƬ£¬´æÈëÊý¾Ý¿â£¬ÏàÓ¦±íµÄÏàÓ¦×Ö¶ÎÖÐ
4¡¢Çë¸ø³öÒ»¶ÎÍêÕû´úÂ룬½«´Ë±íÖеÄͼƬÏÔʾÔÚͼƬ¿Ø¼þÉÏ
4¡¢Çë¸ø³ö×¢ÊÍ
5¡¢³ÌÐòһͨ£¬Á¢¼´¸ø·Ö
Õâ¸öÓкܶàÈËÎʹý,¸øÄãÒ»¸ö²Î¿¼°É
http://topic.csdn.net/t/20051215/18/4461795.html
.....³ÌÐò»¹ÊÇÒª×Ô¼ºÐ´µÄ......
procedure TForm1.Button1Click(Sender: TObject);
var
picstream:tadoblobstream;
bmppic:tbitmap;
jpgpic:tjpegimage;
bmpstream:TMemoryStream;
OpenPicDialog:TOpenPictureDialog;
begin
try
OpenPicDialog:=TOpenPictureDialog.Create(nil);
OpenPicDialog.Filter:='All *.jpg;|*.jpg;)';
with AdoQuery1 do
begin
close;
sql.text := 'Insert into ttbtestimg(id) values(1)';
ExecSql;
SQL.Text := 'select id,img from ttbtestimg with(nolock) where id=1';
Open;
Edit;
if OpenPicDialog.Execute then
begin
jpgpic:=tjpegimage.Create;
bmppic:
Ïà¹ØÎÊ´ð£º
select convert(varchar(50),cast(convert(numeric(18,2),1275674000000/100000000)as real))+'ÒÚ'
select cast(convert(numeric(18,2),1275674000000/100000000)as real)
ΪʲôÉÏÒ»¸öÓÃvarcharת»»ºó¾ÍÖ»±£ÁôÁËÒ ......
¸÷λ´óÏÀ¾ÈÃü°¡ £¡£¡
¸Õ×°ÁËSQL2000 sp3
ÏëÓÃJSPÁ¬½ÓÊý¾Ý¿âµ«ÊdzöÏÖÎÊÌâÁË
ÎÒÓõÄÊÇJDK6.0+tomcat5.0+SQL2000 SP3+JDBC sp3
ËüÏÔʾµÄÊÇ
javax.servlet.ServletException: [Microsoft][SQLServer 2000 Driver fo ......
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()
¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...
Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!
(ÔÚA ......
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......