vfp/(asp/vfpdll/Sql)
ÒÔÏÂÊÇ·¢ÔÚ÷×ÓÂÛ̳µÄÌù×Ó£¬×ª·¢¹ýÀ´£¬Ï£Íû¸øÓõÃ×ŵĺüÓѲο¼¡£
ÎҵijÌÐòÒÔǰһֱÊÇÓû¨Éú¿Ç°ó¶¨IPʵÏÖµÄÔ¶³Ì£¬ÓÉÓÚ¿Í»§·þÎñÆ÷ºÍ¿Í»§¶Ë¶¼ÊÇͨ¹ý¿í´øÉÏÍø£¬Ò»°ãµÄ²Ù×÷£¨¿ª½ø»õµ¥¡¢ÏúÊÛµ¥µÈ£©ËÙ¶ÈÒ²»¹²»´í£¬µ«ÊÇÔÚÔ¶³Ì¿Í»§¶ËÐÞ¸ÄÉÌÆ·×ÊÁÏ£¨10000¶àÌõ¼Ç¼£©¡¢²éѯһ¶ÎʱÆÚµÄ½øÏú´æÁ÷Ë®£¨Ò»ÖÜ5000ÌõÒÔÉÏ£©µÈÉæ¼°µ½È¡¼Ç¼Á¿´óµÄ²Ù×÷ʱ·Ç³£Âý¡£
ǰ¶Îʱ¼ä²Î¿¼ZXS4785°æÖ÷¼°ÆäËüºüÓѵĴúÂëºó£¬¶Ô·þÎñÆ÷»·¾³¼°³ÌÐò½øÐÐvfp/(asp/vfpdll/Sql)ģʽ¸ÄÔì¡£ÓÉÓÚ¼ÓÈëmyfll.fll½øÐÐÊý¾ÝѹËõ£¬Ô¶³Ì²Ù×÷ËٶȽÏÒÔǰ´óΪ¸ÄÉÆ¡£³ÃÕâÁ½ÌìÓÐʱ¼ä£¬Ìؽ«ÊµÏÖ·½·¨¼°Ïà¹Ø´úÂë½éÉÜÈçÏ£¬Îª³õ½Ó´¥ÕßÌṩ²Î¿¼£¬ÀÏÊÖ×Ô¿ÉһЦ¶ø¹ý¿©£¬ºÇºÇ¡£ÔÚ´Ë£¬Ð»¹ýZXS4785Óëľ¹ÏÏÈ£¡
Ò».·þÎñÆ÷ÉèÖÃ
1.»¨Éú¿Ç£º°ó¶¨IPÖ®Óã¬Èç¹û·þÎñÓй̶¨IP³ýÍâ¡£
2.IIS£ºÎÒÓõÄÊÇ5.1£¬WinϵͳÊÇXP SP2¡£°²×°ºóIISºó£¬½¨ÒéÉèÖÃTCP¶Ë¿ÚΪ80Ö®ÍâµÄÆäËü¶Ë¿ÚÆ©Èç8080£¬ÒòΪÓÐЩµØÇøµÄµçÐÅ·â80¶Ë¿Ú(Õâ¾ÍÊDZ¾»úÄÜ·ÃÎÊÍøÒ³£¬¶øÔ¶³Ì²»ÄÜ·ÃÎʵÄÒ»´óÔÒò)¡£
3.É趨ĬÈÏÍøÕ¾µÄÖ÷Ŀ¼£¬ºóÃæÌáµ½µÄsqlexec.asp¼°twcom.dll¶¼Òª·ÅÔÚÖ÷Ŀ¼ÖУ¬ÒÔÌṩ¸ø¿Í»§¶Ëµ÷Óá£
4.½«myfll.fll¸´ÖƵ½WINDOWSϵͳÎļþ¼Ð£¬ÕâÒ»µã·Ç³£ÖØÒª£¬·ñÔòÖ´ÐÐasp½«ÌáʾÕÒ²»µ½API¿â´íÎó¡£mfll.fllÔÚÕâÀïµÄ×÷ÓÃÊǵ÷ÓÃcursortostrº¯Êý½«²éѯµÃµ½µÄÊÓͼѹËõ³É¶þ½øÖÆ×Ö·û´®£¬Õâ¸öÒ²ÊDZØÐëµÄ£¬´óÁ¿¼Ç¼²»¾Ñ¹Ëõ¶ø´«Êäµ½¿Í»§¶Ë£¬»áµÈÔÎËÀµÄ¡£
¶þ.³ÌÐò
1.SQLExec.asp£ºÒ»¸öaspÎļþ£¬ËüµÄ×÷ÓÃÊǽÓÊÕ¿Í»§¶ËµÄSQLÖ¸ÁÔÙ´«Êäµ½twcom.dllÖ´ÐУ¬µÃµ½½á¹ûºó¿ÉÓÉÆäresponse¶ÔÏó¶ÁÈ¡¡£ÒÔÏÂÊÇ´úÂ룬¿ÉÒÔÔÚVFP»·¾³ÓÃmodi Comm SQLExec.aspµÄÃüÁî»òÓüÇʱ¾±àд¡£
<%
'È¡¿Í»§¶ËIE±íµ¥ÉÏcSqlstring±äÁ¿µÄÖµ,¼´sqlÓï¾ä'
p1=Request.QueryString("cSqlstring")
'ÒÔÏÂÁ½¾äÊǽ«p1Öе쥡¢£«×ª»»Îª°ë½Ç'
strsql =Replace(p1,"£¥","%")
strsql =Replace(strsql,"£«","+")
'½«sqlÓï¾ä´«Êäµ½twcomÖÐÖ´ÐÐ,²¢µÃµ½Ñ¹ËõºóµÄ¶þ½øÖÆ×Ö·û'
Set oVFP=Server.Createobject("twcom.w_select")
response.BinaryWrite(oVFP.W_exec(strsql))
Set oVFP=nothing
%>
2.twcom.Dll:ÓÃVFP9±àд(7¡¢8Ó¦¸ÃÒ²¿ÉÒÔ)£¬½¨Ò»project,Ö÷Îļþtwcom.prg£¬´úÂëºÜ¼òµ¥£¬Á¬±à³Édll¼´¿É¡£twcom.prg´úÂëÈçÏÂ
*****************************************
Define Class W_SELECT As Session OlePublic &&¶¨ÒåÀà
Function W_exec(cSql As String) As Byte &&
Ïà¹ØÎĵµ£º
select name as ¿âÃû from master..sysdatabases where dbid>=7 »ñµÃÊý¾Ý¿âÃû³Æ
select * from sysobjects where xtype='u' or xtype='v' ²éѯÊý¾Ý¿âÀïËùÓбíµÄsqlÓï¾ä£¡
select name from sysobjects where type='u' ²éѯһ¸ö¿ ......
µ¼³ö:
1.Ö´ÐÐ
select Óï¾ä²éѯ³öÐèÒªµ¼³öµÄÊý¾Ý.
2.ÔÚÊý¾ÝÁбíÖÐÓÒ¼ü,Ñ¡Ôñsave
results.±£´æÎª.csvÎļþ,È»ºóÒÑexcel·½Ê½´ò¿ª¾ÍOKÁË.¿ÉÒÔÁí´æÎªxsl¡£ÐèҪעÒâµÄÊÇÈç¹ûÁÐÄÚÈÝÊÇ´¿Êý×Ö
µÄ»°£¬µ¼³öʱ»á×Ô¶¯°ÑÇ°ÃæµÄ0È¥µô£¬ÏëÒªµ¼³öÍêÕûµÄÁÐÄÚÈÝ£¬×îºÃÕâÁеÄÄÚÈÝÆ´Ò»¸ö×Ö·ûÈ磺select ‘#’||Column from ......
¶ÔInºÍexistsµÄÐÔÄܽøÐбȽϣ¬Ê×ÏÈÒªÖªµÀËüÃÇÁ½ÕßµÄÇø±ð¡£
in: È·¶¨¸ø¶¨µÄÖµÊÇ·ñÓë×Ó²éѯÖеÄÖµ»òÁбíÖеÄÖµÏàÆ¥Åä¡£
exists: Ö¸¶¨Ò»¸ö×Ó²éѯ£¬¼ì²âÐÐÊÇ·ñ´æÔÚ¡£
¿É·ÖÎöËüÃǵIJéѯÓï¾äÀ´µÃ³öÕæÊµµÄ²î±ð:
in
±ÈÈçSelect * from t1 where x in ( select y from t2 )
Ö´ÐеĹý³ÌÏ൱ÓÚ:
select *
from t1, ( ......
΢ÈíµÄÊý¾Ý¿âÈÏÖ¤´Ó°üÀ¨3¸ö·½ÃæµÄ£º
MCTS: Microsoft Certified Technology Specialist
MCITP: Microsoft Certified IT Professional
MCM: Microfot Certified Master.
΢Èí½¨Òé²Î¼Ó×îа汾µÄÊý¾Ý¿âÈÏÖ¤¿¼ÊÔ£¬µ±Ç°°æ±¾ÊÇÖ¸Microsoft SQL Server 2008¡£
SQL Server2008 MCTS°üÀ¨3¸öÈÏÖ¤£º
1> SQL Server 200 ......
Ëæ×ÅB/SģʽӦÓÿª·¢µÄ·¢Õ¹£¬Ê¹ÓÃÕâÖÖģʽ±àдӦÓóÌÐòµÄ³ÌÐòÔ±Ò²Ô½À´Ô½¶à¡£µ«ÊÇÓÉÓÚÕâ¸öÐÐÒµµÄÈëÃÅÃż÷²»¸ß£¬³ÌÐòÔ±µÄˮƽ¼°¾ÑéÒ²²Î²î²»Æë£¬Ï൱´óÒ»²¿·Ö³ÌÐòÔ±ÔÚ±àд´úÂëµÄʱºò£¬Ã»ÓжÔÓû§ÊäÈëÊý¾ÝµÄºÏ·¨ÐÔ½øÐÐÅжϣ¬Ê¹Ó¦ÓóÌÐò´æÔÚ°²È«Òþ»¼¡£Óû§¿ÉÒÔÌá½»Ò»¶ÎÊý¾Ý¿â²éѯ´úÂ룬¸ù¾Ý³ÌÐò·µ»ØµÄ½á¹û£¬»ñµÃijЩËûÏëµÃÖªµÄÊ ......