ÊÖ»úÕ¾
ÍøÍ¨·ÖÕ¾
µçÐÅÖ÷Õ¾
ÃÜ¡¡Âë:
Óû§Ãû£º
µ±Ç°Î»Öà : Ö÷Ò³>³ÌÐòÉè¼Æ>VB>Áбí

ÓÃVBºÍRDO·ÃÎÊSQL Server

À´Ô´£º»¥ÁªÍø ×÷Õߣºwest263.com ʱ¼ä£º2008-02-23
Î÷²¿ÊýÂë-È«¹úÐéÄâÖ÷»ú10Ç¿£¡40ÓàÏîÐéÄâÖ÷»ú¹ÜÀí¹¦ÄÜ,È«¹úÁìÏÈ!Ë«Ïß¶àÏßÐéÄâÖ÷»úÄϱ±·ÃÎʳ©Í¨ÎÞ×è!Ãâ·ÑÔùËÍÆóÒµÓʾÖ,.CNÓòÃû,×ÔÖú½¨Õ¾480ÔªÆð,Ãâ·ÑÊÔÓÃ7Ìì,ÂúÒâÔÙ¸¶¿î! P4Ö÷»ú×âÓÃ799Ôª/ÔÂ.Ô¸¶Ãâѹ½ð!
RDOµÄ·¢Õ¹
Ô¶³ÌÊý¾Ý¶ÔÏó (Remote Data Object ,¼ò³ÆRDO) ÊÇλÓÚ ODBC API Ö®ÉϵÄÒ»¸ö¶ÔÏóÄ£Ðͱ¡²ã£¬ËüÒÀÀµ ODBC API¡¢Ñ¡¶¨µÄ ODBC Çý¶¯³ÌÐòÒÔ¼°ºó¶ËÊý¾Ý¿âÒýÇæÊµÏִ󲿷ֵÄÖÇÄܺ͹¦ÄÜ£¬Òò´Ë¶ÌС£¨´óÔ¼ 250 K£©¡¢¿ìËÙ¡¢Ç¿½¡¡£ RDO¾ß±¸»ù±¾µÄ ODBC ´¦Àí·½·¨£¬ËùÒÔ¿ÉÒÔÖ±½ÓÖ´Ðдó¶àÊý ODBC API º¯Êý¡£RDO°üº¬ÔÚVB4.0/VB5.0ÆóÒµ°æÖУ¬ÓÉÒ»¸ö¶¯Ì¬Á¬½Ó¿âMS RDO32.DLLʵÏÖ¡£ µ±VB°æ±¾»¹Ö»ÊÇ2.0ʱ£¬´ÓVB·ÃÎÊMS SQL ServerµÄÊÖ¶ÎÖ»ÓÐAPIº¯Êý¼¯£¨VBSQL/DBLib»ò ODBC API£©¡£VB·¢Õ¹µ½3.0ʱ£¬ÆäDAO/Jet (Microsoft AccessµÄÊý¾Ý¿âÒýÇæ)¹¦ÄÜ·Ç·²£¬¾ß±¸ÃæÏò¶ÔÏóµÄ³ÌÐò½Ó¿Ú£¬µ«´¦ÀíËÙ¶ÈÉв»¾¡ÈçÈËÒâ¡£ÁíÒ»·½Ã棬¾¡¹ÜVBSQL/DBLib¡¢ODBC AP IÔÚËÙ¶È·½ÃæÐÔÄܺܺ㬵«ËüÐèÒª»¨·ÑºÜ´óµÄ¾«Á¦½øÐз±ËöµÄ±à³Ì¹¤×÷¡£ µ±MS SQL Server·¢Õ¹µ½6.0¡¢VB·¢Õ¹µ½4.0ʱ£¬¿ª·¢ÁËеĶÔÏóÄ£¿é£¬Óɴ˲úÉúÁËRDO£¬¿ÉÒÔ·ÃÎÊSQL Server¡¢Oracle£»RDO2.0ÔòÊÇÓÉVB5.0ÌṩµÄ¡£ÖµµÃÒ»ÌáµÄÊÇ£¬ËüʵÏÖÁË¡°Ê¼þÇý¶¯ÐÍÊý¾Ý¿â·ÃÎʵıà³Ì·½Ê½¡±¡£ ÒªÌÖÂÛRDO£¬¾Í±ØÈ»ÒªÌ¸µ½DAO¡£DAO/JetÊÇΪÁËʵÏÖ´ÓVB·ÃÎÊAccessÊý¾Ý¿â¶ø¿ª·¢µÄ³ÌÐò½Ó¿Ú£¨¶ÔÏ󣩡£RDOÊÇ´ÓDAOÅÉÉú³öÀ´µÄ£¬µ«Á½ÕߺܴóµÄ²»Í¬ÔÚÓÚÆäÊý¾Ý¿âģʽ¡£DAOÊÇÕë¶Ô[¼Ç¼(Records)]ºÍ[×Ö¶Î(Fields)]£¬¶øRDOÊÇ×÷Ϊ[ÐÐ(Rows)]ºÍ[ÁÐ(Columns)]À´´¦Àí¡£Ò²¾ÍÊÇ˵DAO ÊÇISAMģʽ£¬RDOÊǹØÏµÄ£Ê½¡£´ËÍâDAOÊÇ·ÃÎÊAccessµÄJetÒýÇæ(JetÊÇISAM)µÄ½Ó¿Ú£¬¶øRDOÔòÊÇ·ÃÎÊODBCµÄ½Ó¿Ú¡£ ¿É¼û£¬RDOÊÇ×ÛºÏÁËDAO/Jet¡¢VBSQL/DBLibÒÔ¼°ODBCµÄÓŵãµÄ¶ÔÏó(Object)¡£ÐèҪǿµ÷µÄÊÇ£¬RDOÊǰü¹ü×ÅODBC APIµÄÒ»²ã±¡±¡µÄÍâ¿Ç£¬±»Éè¼Æ³ÉÔÚºǫ́£¨·þÎñÆ÷¶Ë£©ÓÐÊý¾Ý¿â´æÔÚµÄǰÌáÏÂÔËÐУ¬Í¬Ê±Ò²ÊÇÕë¶ÔSQL ServerºÍOracle¶øÌرðÉè¼ÆµÄ¡£ RDOµÄÓÅÊÆÔÚÓÚËüÍêÈ«±»¼¯³ÉÔÚVBÖ®ÖС£´ËÍ⣬ֱ½Ó·ÃÎÊSQL Server´æ´¢¹ý³Ì¡¢Íêȫ֧³ÖT£­SQL¡¢T£­SQLµ÷ÊÔ¼¯³ÉÔÚ¿ª·¢»·¾³ÖС¢Visual Database ToolsµÄ¼¯³É»¯µÈ£¬Ò²ÊÇRDOµÄ³¤´¦¡£

RDOÖ®ºóÊÇADO
Microsoft¹«Ë¾ÒѾ­Ã÷È·Ðû²¼½ñºó²»»á¶ÔVBSQL/DBLib½øÐÐÉý¼¶£¬¶øODBC APIº¯ÊýÒ»¼¶µÄ±à³Ì·½Ê½Ò²²»ÎªÈËÃÇËùϲ°®¡£RDO×ÔÉí½ñºó½«±»ÒÔActiveX¼¼ÊõΪ»ù´¡µÄADO(ActiveX Data O bjects)ËùÌæ´ú¡£Visual BasicÏÂÒ»¸ö°æ±¾ÖÐÓÉÄÄÒ»¸ö×÷Ϊ±ê×¼ÅäÖû¹²»ºÜÃ÷È·£¬µ«ÕâÒ»·¢Õ¹Ç÷ÊÆÒѾ­ºÜÇå³þ¡£ ΪʲôÐèÒªADOÄØ£¿RDOÊÇÒÔODBCΪ»ù´¡£¬¶øADOÔòÊÇ»ùÓÚȫеÄOLE DB¼¼Êõ¡£ODBC±¾ÉíÊÇÒÔSQL Server¡¢OracleµÈ¹ØÏµÊý¾Ý¿â×÷Ϊ·ÃÎʶÔÏó£»OLE DBÔò²»½öÏÞÓÚ´Ë£¬¶ø½«ÊÇ¿ÉÒÔ¶Ôµç×ÓÓʼþ¡¢Îı¾Îļþ¡¢¸´ºÏÎļþ¡¢Êý¾Ý±íµÈ¸÷ÖÖ¸÷ÑùµÄÊý¾Ýͨ¹ýͳһµÄ½Ó¿Ú½øÐдæÈ¡µÄ¼¼Êõ¡£DAO¡¢RDOµ±È»²»»áÒ»ÏÂ×ÓÏûʧ£¬µ«Ëæ×Åм¼ÊõµÄÀûÓã¬ËüÃǵÄ×÷Óý«Öð²½µ­»¯¡£

RDOµÄ¶ÔÏóÄ£¿éͼ
ÒªÕýÈ·µØÊ¹ÓÃRDO£¬ÓбØÒª¶ÔÆä¶ÔÏóÄ£¿é½á¹¹¼ÓÒÔÀí½â¡£ÔÚRDOµÄ¶ÔÏóºÍ¼¯ºÏÖУ¬Óкܶà¶ÔÊý¾Ý¿âµÄ״̬ºÍÉ趨½øÐвÙ×÷µÄÊôÐÔ£¨Property£©£¬ÒÔ¼°¶ÔÊý¾Ý¿â½øÐвÙ×÷µÄ·½·¨£¨Method£©¡£ÀûÓÃÕâЩ£¬´ÓRDO2.0Æð¾Í¿ÉÒÔ¿ª·¢Ê¼þÇý¶¯µÄÊý¾Ý¿âÓ¦ÓóÌÐò¡£ RDO¶ÔÏóÓëVBÖÐÆäËû¶ÔÏóµÄ¸ÅÄîÏàͬ¡£ÓëVBÓõÄActiveX¿Ø¼þ£¨ÒÔÍù³ÆÎªCustom Control »òOCX¡¢VBX£©ÏàËÆµÄÊÇ£¬RDOÒ²´øÓÐÊôÐԺͷ½·¨£»µ«Í¬Spread¡¢InputManµÈÆÕ±éÓ¦ÓõÄActiv eX¿Ø¼þ²»Í¬µÄÊÇ£¬RDOûÓÐ×Ô¼ºµÄÓû§½çÃæ£¬Òò¶ø¿ÉÒÔºÍVB±ê×¼µÄTimer¿Ø¼þ¹éΪͬһÀà¡£µ±È»Ò²¿ÉÒÔ½«RDO¿´×÷µ÷ÓÃODBC APIº¯Êý£¬½ø¶ø¶Ôºǫ́Êý¾Ý¿â²Ù×÷¼ÓÒÔ¿ØÖƵĶÔÏó¡£ÔÚRDOµÄÊôÐԺͷ½·¨ÖУ¬°üº¬Á˶Ե¥¸öµÄODBC APIº¯ÊýÒÔ¼°Ò»Á¬´®APIº¯ÊýµÄµ÷Óá£

1. rdoEngine¶ÔÏó ×î³õµ÷ÓÃRDO¶ÔÏóÒÔ¼°RDC£¨Ô¶³ÌÊý¾Ý¿Ø¼þ£©Ê±£¬×Ô¶¯Éú³ÉrdoEngine¶ÔÏóµÄ¸½´øÊ¼þ£¨i ncident£©¡£rdoEngineÓÃÓÚ¶ÔRDOÈ«¾ÖÊôÐԵIJÎÊý¡¢Ñ¡Ïî½øÐÐÉèÖã¬ÊÇÔÚRDOµÄ½×²ã½á¹¹ÄÚ´¦ÓÚ×îÉϲãµÄ¶ÔÏ󣬰üº¬ÁËËùÓÐµÄÆäËû¶ÔÏó¡£ rdoEngine¶ÔÏóÓëDAO/Jet²»Í¬£¬ËäÈ»±»¶à¸öÓ¦ÓóÌÐò¹²Ïí£¬µ«ÌåÏÖrdoEngine¶ÔÏóµÄÉ趨ֵµÄÊôÐÔÈ´²¢²»¹²Ó㬶øÊÇÔÚ¸÷×ÔµÄÓ¦ÓóÌÐòµÄ³ÌÐò½çÃæÖÐ¶ÔÆä·Ö±ð¼ÓÒÔÉ趨¡£ÕâЩÉ趨ֵ¶ÔÆäËûʹÓÃRDOÒÔ¼°RDCµÄÓ¦ÓóÌÐòûÓÐÈκÎÓ°Ïì¡£rdoEngine²»ÊǼ¯ºÏµÄÒªËØ£¬¶øÊÇÖØÐ¶¨ÒåµÄ¶ÔÏó£¬rdoEngine¶ÔÏó²»Äܱ»×·¼Ó×÷³É¡£

2. rdoEnvironment¶ÔÏó RDO¶ÔÏóÔÚ×Ô¶¯´´½¨rdoEngine¶ÔÏóʱ£¬½«rdoEnviroment¶ÔÏóµÄ³õʼֵÉú³É²¢±£´æÎªrdo Enviroments(0)¡£Ò»°ãÇé¿öÏ£¬Ó¦ÓóÌÐòÖв»±Ø×·¼ÓrdoEnvironment¶ÔÏ󣬴ó¶àÖ»Ðè¶ÔÒÑÓеÄrdoEnviroments(0)½øÐвÙ×÷¾Í¿ÉÒÔÁË¡£Ö»ÓÐÔÚÖ§³ÖÒ»¸öÒÔÉÏÊÂÎñ(Transaction)£¬ÐèÒª½«Óû§ÃûºÍ¿ÚÁîÐÅÏ¢·Ö±ð´¦ÀíµÄÇé¿öÏ£¬ÀûÓÃrdoCreateEnvironment·½·¨½«Ìض¨µÄÓû§ÃûºÍ¿ÚÁîÖµ×÷³ÉеÄrdoEnvironment¶ÔÏó¡£ÔÚÕâ¸ö·½·¨ÖпÉÒÔÖ¸¶¨¹ÌÓÐÃû¡¢Óû§ÃûºÍ¿ÚÁÈç¹ûËùÖ¸¶¨µÄÖµÓërdoEnvironments¼¯ºÏµÄÒѾ­´æÔڵijÉÔ±Ãû³ÆÏàͬ£¬»á²úÉú´íÎó¡£Ð½¨µÄrdoEnvi ronment¶ÔÏó×Ô¶¯×·¼ÓÔÚrdoEnvironments¼¯ºÏµÄ×îºó¡£µ÷ÓÃrdoCreateEnvironment·½·¨Ê±£¬Æäname²ÎÊý¿ÉÒÔÊdz¤¶ÈΪ0µÄÎÄ×ÖÁУ¬ÕâʱеÄrdoEnvironment¶ÔÏ󽫲»»á±»×·¼ÓÔÚrdoEnvi ronments¼¯ºÏÖ®ÖС£ 3.rdoConnection¶ÔÏó rdoConnection¶ÔÏóÓÃÓÚͬSQL ServerµÄÁ¬½Ó¹ÜÀí£¬ÏÂÃæÊÇÓëSQL ServerÁ¬½ÓµÄÀý×Ó¡£ µÚÒ»²½ÓÃNew¹Ø¼ü×ÖÉùÃ÷Ò»¸ördoConnection¶ÔÏó£º Dim Cn as New rdoConnection ÓÉ´ËÉú³É¶ÀÁ¢µÄÁ¬½Ó¶ÔÏó£¬ÕâʱËü»¹²»ÊÇrdoConnection¼¯ºÏµÄ³ÉÔ±¡£ÔÚ¾ßÌåÁ¬½Óµ½SQL ServerµÈ֮ǰ£¬ÓбØÒªÉ趨rdoConnection¼¯ºÏµÄÊôÐÔ¡£¶Ô´Ë£¬Ê¹ÓÃWith¹Ø¼ü×Ö±à³ÌЧÂÊ»á¸üºÃ¡£
With CN
.Connect = ¡°Uid = ; Pwd = ; Database = Pubs; DSN = MyPubsDSN; ¡±
' É趨CursorÀàÐÍ
.CursorDriver = rdUseNone
'É趨µÇ¼³¬Ê±
.LoginTimeOut = 10 End With
ÓÃRDOÓëSQL ServerÁ¬½ÓºÍ¶Ï¿ª
RDO½Ó¿ÚûÓÐ×Ô¶¯¹ÜÀíͬSQL ServerµÄÁ¬½ÓºÍ¶Ï¿ªµÄ¹¦ÄÜ£¬ÐèÓɳÌÐòÔ±×Ô¼º¼ÓÒÔÅжϡ£ÕâÀïÐèҪעÒâµÄÊǶÔÁ¬½ÓºÍ¶Ï¿ªÊ±»úµÄ¹ÜÀí£¬ÒòΪͬʱÓйý¶àµÄÁ¬½Ó½«»áÔì³É·þÎñÆ÷¸ºÔعýÖØ¡£¶øÇÒ£¬¶ÔSQL Server¶øÑÔ£¬Ò»¸öÁ¬½ÓÖ»ÄÜͬʱ֧³ÖÒ»¸ö²Ù×÷£¬µ±Í¬Ê±½øÐмǼµÄ¶Á³öºÍ¸üÐÂʱ£¬ÐèÒª·Ö±ð¶ÔÆä¸÷×ÔµÄÁ¬½Ó¼ÓÒÔÈ·ÈÏ¡£ÔÚÒ»¶¨Ìõ¼þÏÂÐèÒª±£³ÖÁ¬½Ó£»·´Ö®£¬µ±²Ù×÷Íê³ÉÒÔºó£¬ÓÖÐèÒªÁ¢¼´½«Á¬½Ó¶Ï¿ª¡£Èç¹ûÄÜÕýÈ·µØÉè¼ÆºÃÁ¬½ÓºÍ¶Ï¿ªµÄʱ¿Ì£¬¾ÍÓпÉÄÜÈ·±£À©Õ¹¸ü¶àµÄÓû§Êý£¨¿Í»§/·þÎñÆ÷¿ª·¢»·¾³ÖУ¬ÓëÊý¾Ý¿âÏîµÄ¿ÉÀ©Õ¹ÐÔÒ»Ñù£¬¿Í»§ÊýÀ©ÕŵĿÉÄÜÐÔÒ²·Ç³£ÖØÒª£©¡£ ÓÉÓÚRDOÊÇ»ùÓÚODBC£¬Ëüͨ¹ýODBCµÄÊý¾ÝÔ´Ãû(DSN: Data Source Name)ÓëSQL ServerÏàÁ¬¡£DSNµÄÐÅÏ¢¿ÉÒÔ»ùÓÚÎļþ£¬Ò²¿ÉÒÔÔÚÁ¬½Óʱͨ¹ý´«µÝµÄ²ÎÊýÖ¸¶¨¡£²»¹ý£¬Ò»°ãÀ´Ëµ£¬²»ÍƼö»ùÓÚÎļþµÄDSN£¬ÒòΪһµ©DSNÎļþ±»ÆÆ»µ£¬»òÕß±»Îóɾ³ý£¬É趨ÆðÀ´¾Í·Ç³£Âé·³¡£Í¨¹ý DSN¶ÔSQL ServerµÄÁ¬½Ó·½Ê½Ò»°ãÓÐÒÔϼ¸ÖÖ£º ¤S

ÎÄÕÂÕûÀí£ºÎ÷²¿ÊýÂë--רҵÌṩÓòÃû×¢²á¡¢ÐéÄâÖ÷»ú·þÎñ
http://www.west263.com
ÒÔÉÏÐÅÏ¢ÓëÎÄÕÂÕýÎÄÊDz»¿É·Ö¸îµÄÒ»²¿·Ö,Èç¹ûÄúÒª×ªÔØ±¾ÎÄÕÂ,Çë±£ÁôÒÔÉÏÐÅÏ¢£¬Ð»Ð»!