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ÖÐÈçºÎ²é¿´ÀúÊ·ÉÏÖ´ÐеĴ洢¹ý³ÌµÄÐÅÏ¢ÄØ£¬È磺´«Èë²ÎÊý£¬Ö´ÐÐʱ¼äµÈµÈ¡£Èç¹û²»Äܲ鿴ÀúÊ·¼Ç¼£¬ÊÇ·ñ¿ÉÒÔ×Ô¼ºÐ´´¥·¢Æ÷Ö®ÀàµÄ£¬È˹¤¿ØÖÆÄØ£¬ÔÚOracleÀïÃæÓж¯Ì¬ÊÓͼ¿ÉÒÔËæʱ²é¿´ÀúÊ·Ö´ÐеÄsqlÓï¾ä£¬SqlSer ......
xp(sp3)ϵͳ°²×°ÁËsqlserver2000£¬sp3£¬sp4²¹¶¡¶¼´òÁË¡£¶øÇÒ±¾»úÒ²ÄÜÁ¬½Ó·ÃÎÊ¡£
ÎÊÌâÊÇ£º
±¾»útelnet ip 1433 ×ÜÊÇÌáʾÁ¬½Óʧ°Ü£¬
¶øÇÒnetstat -naʱ£¬¿´²»µ½1433¶Ë¿Ú±»Õ¼ÓÃ
(¿Ï¶¨µÄÊÇ£º¶Ë¿ÚÊÇ1433£¬¿ªÆ ......
±ísinger£º
singerID£¬singerName
1£¬ÁõµÂ»ª
2£¬ÕÅѧÓÑ
3£¬¹ù¸»³Ç
4£¬ÀèÃ÷
±ísong£º
songID£¬songName£¬singerID
1£¬ÍüÇéË®£¬1
2£¬ÖйúÈË£¬1
3£¬ÎDZð£¬2
4£¬¶ÔÄã°®²»Í꣬3
......
×î½üÊý¾Ý¿â±»¸Ä£¬Ï뽫֮»Ö¸´µ½ÉÏÖÜÇ°µÄÊý¾Ý£¬¿ÉÒÔŪÂð£¿
×Ô¼ºÃ»ÓÐÈ¥±¸·Ý¡£
try:
Log Explorer
http://download.csdn.net/source/620271
ѹËõ°üÀïÓÐÒ»¸ö×¢²á»ú£¬ÓÃÀ´²úÉú×¢²áÂë¡£
´ò¿ªlo ......
package com.tongying.www.until;
public class Resource {
// MySQlÊý¾Ý¿âµÄ×ÊÔ´
/* public static final String DRIVER="com.mysql.jdbc.Driver";
public static final String URL=&qu ......