vfpÈçºÎ¶ÁÈ¡SQLServer×Ö¶ÎÖеÄͼƬ£¿
ÔõôÔÚvfpµÄ±íµ¥ÖÐÏÔÏÖ´ÓsqlserverÖÐ×¥¹ýÀ´µÄͼƬ£¿
ÎÒÓõÄÊÇvfp6.0
Ìý˵¿ÉÒÔµ÷ÓÃÆäËûÓïÑÔдµÄdllÀ´ÊµÏÖ£¬
ÎÒ¿ÉÒÔÓÃdelphiдdll³öÀ´£¬
µ«ÊÇÎÒ²»»áÓÃʹÓÃvfpÀ´µ÷ÓÃdll°¡
Õâ¶Î´úÂëÊÇ´ÓSQLSEREVR¡¡IMAGE×Ö¶ÎÖжÁ³öͼƬ£º
001: FUNCTION ReadImagefromSQL
¡¡¡¡002: *-- ´«µÝ²ÎÊý£ºÔ±¹¤¹¤ºÅ£¬ÊÇ·ñʹÓñ¾µØÁÙʱÕÕÆ¬Îļþ
¡¡¡¡003: LPARAMETERS tcPerCode,tlUseLocalPhoto
¡¡¡¡004:
¡¡¡¡005: LOCAL loConn,loRS,loStream
¡¡¡¡006: LOCAL lcDriverName,lcServerName,lcDatabaseName,lcUserName,lcPassword
¡¡¡¡007: LOCAL lcConnectString
¡¡¡¡008: LOCAL lcTempImageFile,luPhotoData,lcPhotoPath
¡¡¡¡009: lcPhotoPath = GETENV("TEMP") + "\HR_Photo\"
¡¡¡¡010: lcTempImageFile = lcPhotoPath + tcPerCode + ".bmp"
¡¡¡¡011:
¡¡¡¡012: *-- Èç¹ûʹÓñ¾µØÕÕÆ¬¾Í´Ó±¾µØÕÒ
¡¡¡¡013: IF tlUseLocalPhoto
¡¡¡¡014: IF FILE("&lcTempImageFile")
¡¡¡¡015: RETURN lcTempImageFile
¡¡¡¡016: ENDIF
¡¡¡¡017: ENDIF
¡¡¡¡018:
¡¡¡¡019: loConn= CREATEOBJECT("Adodb.Connection")
¡¡¡¡020: loRS?= CREATEOBJECT("Adodb.Recordset")
¡¡¡¡021: loStream = CREATEOBJECT("ADODB.Stream")
¡¡¡¡022:
¡¡¡¡023: *-- Á¬½Ó×Ö·û´®
¡¡¡¡024: lcDriverName?= "{SQL Server}"
¡¡¡¡025: lcServerName?= ReadIni("ServerSetting","ServerName",100)
¡¡¡¡026: lcD
Ïà¹ØÎÊ´ð£º
ÇëÎÊһϣ¬ÍâÍøÁ½Ì¨SQLSERVERʵÀýÊý¾Ý´«Ê䣬ÓÐûÓвÉÓÃÊý¾ÝѹËõºÍ¼ÓÃÜ¡£Ñ¹Ëõ±ÈÊǶàÉÙ£¬¼ÓÃÜÊÇʲô¼ÓÃÜËã·¨£¿Ïà¹ØÎĵµÄÄÀï¿ÉÒÔÕÒµ½£¿Ð»Ð»
ÎÒÒ²ÏëÖªµÀ£¡¹Ø×¢´ËÌù£¡
¹Ø×¢¡«¡«
Êý¾Ý¿â´óÅ£¶¼ÄÄÈ¥Á˰¡£¿
......
±ÈÈç ´«½øÀ´µÄ×Ö·û´®ÊÇ ¡®12/sep/2009 12£º52£º20¡¯ Ö±½ÓÓÃcast»á±¨´í¡£
¶øÇÒÖмäµÄÔ·ÝÒ²²»¹Ì¶¨ ¡£Ôõôת»»³ÉÈÕÆÚÐ͵ÄÄØ
ÓÃÒ»¸ö±í¼Ç¼1-12Ô·ݣ¡
Ö±½Óת»»ÊDz»ÐÐÁË ²ð·Ö ³öÔÂÀ´ÅжÏÁË
¡®12/sep/2009 12£º ......
1.
select top 20 id,title,PageUrl from Infor
where title like 'ÒÔµÂÅäÌì,Ã÷µÂÉ÷%' order by id desc
CPU ʱ¼ä = 0 ºÁÃ룬ռÓÃʱ¼ä = 39 ºÁÃë¡£
2.
select top 20 id,title,PageUrl ......
xp(sp3)ϵͳ°²×°ÁËsqlserver2000£¬sp3£¬sp4²¹¶¡¶¼´òÁË¡£¶øÇÒ±¾»úÒ²ÄÜÁ¬½Ó·ÃÎÊ¡£
ÎÊÌâÊÇ£º
±¾»útelnet ip 1433 ×ÜÊÇÌáʾÁ¬½Óʧ°Ü£¬
¶øÇÒnetstat -naʱ£¬¿´²»µ½1433¶Ë¿Ú±»Õ¼ÓÃ
(¿Ï¶¨µÄÊÇ£º¶Ë¿ÚÊÇ1433£¬¿ªÆ ......
package com.tongying.www.until;
public class Resource {
// MySQlÊý¾Ý¿âµÄ×ÊÔ´
/* public static final String DRIVER="com.mysql.jdbc.Driver";
public static final String URL=&qu ......