Visual Basic ±¸¼º ¿ä¼Ò COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­¿¡ ¾×¼¼½ºÇÏ´Â ¹æ¹ý

±â¼ú ÀÚ·á: 271284 - ÀÌ ¹®¼­°¡ Àû¿ëµÇ´Â Á¦Ç° º¸±â.
¸ðµÎ È®´ë | ¸ðµÎ Ãà¼Ò

ÀÌ ÆäÀÌÁö¿¡¼­

¿ä¾à

Microsoft Windows 2000¿¡¼­ COM ½ÇÇà ½Ã°£ + ¿¡ ¼³Ä¡µÈ °¢ µ¿Àû ¿¬°á ¶óÀ̺귯¸® (DLL) ±¸¼º ¿ä¼Ò¿¡ ´ëÇÑ °íÀ¯ÇÑ °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­À» ±¸¼ºÇÒ ¼ö ÀÖ½À´Ï´Ù. ÀÌ »ý¼ºÀÚ´Â ¹®ÀÚ¿­Àº ÀϹÝÀûÀ¸·Î ±¸¼º ¿ä¼Ò°¡ ¸ðµç °³Ã¼ ÀνºÅϽº¿¡ ¾×¼¼½ºÇÒ ¼ö ÀÖ¾î¾ß ÃʱâÈ­ ¹®ÀÚ¿­À» ÁöÁ¤ÇÏ´Â µ¥ »ç¿ëµË´Ï´Ù. ÀÌ ¹®¼­¿¡¼­´Â ±¸¼º ¿ä¼ÒÀÇ °³Ã¼ ÀνºÅϽº¸¦ »ç¿ëÇÒ ¼ö ÀÖ´Â Visual Basic ±¸¼º ¿ä¼Ò COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­À» ±¸¼ºÇÏ´Â ¹æ¹ýÀ» º¸¿© ÁÖ´Â ÄÚµå ¿¹Á¦µµ°¡ Æ÷ÇԵ˴ϴÙ.

Ãß°¡ Á¤º¸

»ý¼ºÀÚ ¹®ÀÚ¿­Àº ÀϹÝÀûÀ¸·Î ±¸¼º ¿ä¼ÒÀÇ °³Ã¼ ÀνºÅϽº¸¦ »ç¿ëÇÏ¿© µ¥ÀÌÅͺ£À̽º¿¡ ¿¬°áÇÒ µ¥ÀÌÅͺ£À̽º ¿¬°á ¹®ÀÚ¿­À» ÁöÁ¤ÇÒ ¼ö ÀÖ½À´Ï´Ù. ÀÌ ¸ñÀûÀ» À§ÇØ »ý¼ºÀÚ ¹®ÀÚ¿­À» »ç¿ëÇÏ¿© ÀÌÁ¡ÀÌ ±¸¼º ¿ä¼ÒÀÇ Äڵ忡 Çϵå ÄÚµåµÈ ÁßÀÎ ¿¬°á ¹®ÀÚ¿­À» ¹æÁöÇÒ ¼ö ÀÖ½À´Ï´Ù. µ¥ÀÌÅͺ£À̽º ¼­¹öÀÇ À̸§À» º¯°æÇÏ·Á¸é ´Ù¸¥ µ¥ÀÌÅͺ£À̽º¸¦ °¡¸®Å°µµ·Ï ¶Ç´Â ´Ù¸¥ ¼öÁ¤ ±¸ÇöÇÏ´Â ±¸¼º ¿ä¼ÒÀÇ COM + °³Ã¼ »ý¼ºÀÚ´Â ¼öÁ¤ÇØ¾ß ÇÒ ¾ÊÀ¸¹Ç·Î ´õ ÀÌ»ó ±¸¼º ¿ä¼ÒÀÇ Äڵ带 º¯°æÇÏ°í ½ÇÁ¦ DLLÀ» ´Ù½Ã ÄÄÆÄÀÏÇØ¾ß ÇÕ´Ï´Ù. µ¥ÀÌÅͺ£À̽º ¿¬°á Á¤º¸¸¦ ÀúÀåÇÏ´Â °Í ¿Ü¿¡µµ COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­¿¡ ´ëÇØ ±¸¼ºµÈ ±¸¼º ¿ä¼Ò ¸ðµç °³Ã¼ ÀνºÅϽº¿¡ ¾×¼¼½ºÇÒ ¼ö ÀÖµµ·Ï ÇÏ´Â ÃʱâÈ­ ¹®ÀÚ¿­À» ÁöÁ¤ÇÏ·Á¸é ¼öµµ ÀÖ½À´Ï´Ù.

COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­ ±¸¼ºÇÏ´Â ¹æ¹ý

Visual Basic ±¸¼º ¿ä¼Ò¸¦ ÇØ´ç °³Ã¼ ÀνºÅϽº¿¡ ´ëÇØ ±¸¼ºµÈ COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­À» ¾×¼¼½ºÇÒ ¼ö ÀÖµµ·Ï IObjectConstruct COM + ÀÎÅÍÆäÀ̽º¸¦ ±¸ÇöÇØ¾ß ÇÕ´Ï´Ù. IObjectConstruct ±¸¼º ¿ä¼ÒÀÇ °³Ã¼ ÀνºÅϽº¸¦ ¸¸µé ¶§ ¹ß»ýÇÏ´Â À̺¥Æ®ÀÇ »ý¼º (IObjectConstruct_Construct) ¶ó´Â ´ÜÀÏ ¸Þ¼­µå¸¦ ³ëÃâÇÕ´Ï´Ù. ±¸¼ºµÈ COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­À» ¾òÀ¸·Á¸é ÀÌ ¸Þ¼­µå¿¡ ¸Å°³ º¯¼ö·Î Àü´ÞµÈ »ý¼ºÀÚ °³Ã¼¸¦ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. ÀÌ ±â´ÉÀÇ ¹æ¹ýÀ» º¸¿© ÁÖ´Â »ùÇÃÀ» ±¸ÇöÇÏ·Á¸é ´ÙÀ½°ú °°ÀÌ ÇϽʽÿÀ.
  1. Visual Basic¿¡¼­ »õ ActiveX DLL ÇÁ·ÎÁ§Æ®¸¦ ¿±´Ï´Ù.
  2. "prjConstruct" ÇÁ·ÎÁ§Æ®¸¦ À̸§À» ¹Ù²ß´Ï´Ù.
  3. "clsConstruct" Ŭ·¡½º ¸ðµâÀ» À̸§À» ¹Ù²ß´Ï´Ù.
  4. COM + ¼­ºñ½º ¶óÀ̺귯¸® ¹× ActiveX µ¥ÀÌÅÍ °³Ã¼ 2.5 ¶óÀ̺귯¸®¿¡ ´ëÇÑ ÇÁ·ÎÁ§Æ® ÂüÁ¶¸¦ ¼³Á¤ÇϽʽÿÀ.
  5. ´ÙÀ½ Äڵ带 Ŭ·¡½º ¸ðµâ¿¡ ºÙ¿© ³ÖÀ»:
    'General Declarations Section
    Implements IObjectConstruct
    Dim connstr As String
    
    
    Private Sub IObjectConstruct_Construct(ByVal pCtorObj As Object)
    
    Dim mConstructString As IObjectConstructString
    Set mConstructString = pCtorObj
    connstr = mConstructString.ConstructString
    
    End Sub
    
    Public Function GetAuthors() As ADODB.Recordset
    
    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    
    Set cn = New ADODB.Connection
    cn.Open connstr
    
    Set rs = New ADODB.Recordset
    rs.CursorLocation = adUseClient
    rs.Open "Select * from Authors", cn, adOpenStatic, adLockBatchOptimistic
    Set rs.ActiveConnection = Nothing
    
    Set GetAuthors = rs
    GetObjectContext.SetComplete
    
    End Function
    						
    ÀÌ ÄÚµå ¿¹Á¦¿¡¼­´Â COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­À» ¾×¼¼½ºÇÏ·Á¸é IObjectConstruct_Construct ±¸ÇöÇÏ´Â ¹æ¹ýÀ» º¸¿© ÁÝ´Ï´Ù. °³Ã¼ ¸¸µé±â ¸Å°³ IObjectConstructString ÀÎÅÍÆäÀ̽º·Î ij½ºÆÃÇØ¾ß ÇÕ´Ï´Ù. IObjectConstructStringConstructString COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­¿¡ ¾×¼¼½ºÇÏ´Â µ¥ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù ¶ó´Â ´ÜÀÏ ¼Ó¼ºÀ» ³ëÃâÇÕ´Ï´Ù. »ý¼ºÀÚ ¹®ÀÚ¿­À» Àü¿ª º¯¼ö¿¡ ÇÒ´çµÈ ¹× GetAuthors ÇÔ¼ö¸¦ ´Ù½Ã È®ÀÎÇϽʽÿÀ.
  6. DLLÀ» ÄÄÆÄÀÏÇϽʽÿÀ. prjConstruct.clsConstruct ±¸¼º ¿ä¼Ò¸¦ È£½ºÆ®ÇÏ´Â COM + ¼­¹ö ÀÀ¿ë ÇÁ·Î±×·¥À» ¸¸µé·Á¸é ´ÙÀ½°ú °°ÀÌ ÇϽʽÿÀ.
    1. Á¦¾îÆÇ ¿¡¼­ °ü¸® µµ±¸ °¡¸®Å² ´ÙÀ½ ±¸¼º ¿ä¼Ò ¼­ºñ½º Microsoft °ü¸® ÄܼÖ(MMC) ½º³ÀÀÎÀ» ¿­·Á¸é ±¸¼º ¿ä¼Ò ¼­ºñ½º Ŭ¸¯ÇϽʽÿÀ.
    2. ±¸¼º ¿ä¼Ò ¼­ºñ½º, ÄÄÇ»ÅÍ, ³» ÄÄÇ»ÅÍ ¹× COM + ÀÀ¿ë ÇÁ·Î±×·¥ ³ëµå¸¦ Â÷·Ê·Î ´­·¯ È®ÀåÇÕ´Ï´Ù. COM + ÀÀ¿ë ÇÁ·Î±×·¥ À» Ŭ¸¯ÇϽʽÿÀ.
    3. COM + ÀÀ¿ë ÇÁ·Î±×·¥À» ¸¶¿ì½º ¿À¸¥ÂÊ ´ÜÃ߷ΠŬ¸¯ÇÏ°í »õ·Î ¸¸µé±â¸¦ °¡¸®Å² ´ÙÀ½ ÀÀ¿ë ÇÁ·Î±×·¥ À» ´©¸¨´Ï´Ù.
    4. VBComPlusTest, À̸§ÀÌ ºó ¼­¹ö ÂÊ ÀÀ¿ë ÇÁ·Î±×·¥À» ¸¸µé°í ´ëÈ­Çü »ç¿ëÀÚÀÇ ÀÚ°Ý Áõ¸íÀ» »ç¿ëÇÏ·Á¸é ÇØ´ç ID ¼Ó¼ºÀ» ¼³Á¤ÇϽʽÿÀ.
    5. ¸¶¹ý»ç¸¦ ¿Ï·áÇÑ ´ÙÀ½ ¸¶Ä§ À» Ŭ¸¯ÇϽʽÿÀ. prjConstruct.clsConstruct Visual Basic ±¸¼º ¿ä¼Ò¸¦ È£½ºÆÃÇÏ´Â µ¥ »ç¿ëµÇ´Â »ùÇà COM + ÀÀ¿ë ÇÁ·Î±×·¥À» ¸¸µì´Ï´Ù.
  7. "VBComPlusTest" COM + ÀÀ¿ë ÇÁ·Î±×·¥ prjConstruct.clsConstruct ±¸¼º ¿ä¼Ò¸¦ ¼³Ä¡ÇÏ·Á¸é ´ÙÀ½°ú °°ÀÌ ÇϽʽÿÀ.
    1. ±¸¼º ¿ä¼Ò ¼­ºñ½º MMC ½º³ÀÀο¡¼­ VBComPlusTest ³ëµå¸¦ ´­·¯ È®ÀåÇÕ´Ï´Ù. ±¸¼º ¿ä¼Ò ÇÏÀ§ Æú´õ¸¦ Ŭ¸¯ÇϽʽÿÀ.
    2. ±¸¼º ¿ä¼Ò ¸¶¿ì½º ¿À¸¥ÂÊ ´ÜÃ߷ΠŬ¸¯ÇÏ°í »õ·Î ¸¸µé±â¸¦ °¡¸®Å² ´ÙÀ½ ±¸¼º ¿ä¼Ò ¸¦ Ŭ¸¯ÇϽʽÿÀ.
    3. COM ±¸¼º ¿ä¼Ò ¼³Ä¡ ¸¶¹ý»ç¿¡¼­ ´ÙÀ½ À» »õ ±¸¼º ¿ä¼Ò¸¦ ¼³Ä¡ ¸¦ ¹× prjConstruct.dll, ¼±ÅÃÇϰí À» Ŭ¸¯ÇϽʽÿÀ.
    4. ¸¶¹ý»ç¸¦ ¿Ï·áÇÑ ´ÙÀ½ ¸¶Ä§ À» Ŭ¸¯ÇϽʽÿÀ.
  8. Visual Basic ±¸¼º ¿ä¼Ò prjConstruct.clsConstruct ¼Ó¼º âÀ» ¿±´Ï´Ù.
  9. ÀÎÁõ ÅÇ¿¡¼­ »ç¿ë °³Ã¼ »ý¼º È®ÀζõÀ» ¼±ÅÃÇϽʽÿÀ.
  10. »ý¼ºÀÚ ¹®ÀÚ¿­ »óÀÚ¿¡ ´ÙÀ½°ú °°Àº ADO ¿¬°á ¹®ÀÚ¿­À» ÁöÁ¤Çϰí È®ÀÎ À» Ŭ¸¯ÇϽʽÿÀ.

    Âü°í: ÀÌ »ùÇÿ¡¼­´Â Microsoft SQL Server PUBS ¿¹Á¦ µ¥ÀÌÅͺ£À̽º¸¦ »ç¿ëÇÕ´Ï´Ù.
    "Provider=SQLOLEDB;Data Source=<Your SQL Server>;Initial Catalog=pubs;" & _
                       "User Id=<User Id>;Password=<Password>"
    					

COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­ »ç¿ë ¹æ¹ý

  1. Visual Basic COM + ±¸¼º ¿ä¼Ò¸¦ Å×½ºÆ®ÇÏ·Á¸é Visual Basic¿¡¼­ »õ Ç¥ÁØ EXE ÇÁ·ÎÁ§Æ®¸¦ ¿±´Ï´Ù. ±âº»ÀûÀ¸·Î Form1ÀÌ ¸¸µé¾îÁý´Ï´Ù.
  2. ¸ñ·Ï »óÀÚ (List1ÀÔ´Ï´Ù) ¹× (Command1) ¸í·É ´ÜÃ߸¦ Form1¿¡ Ãß°¡ÇϽʽÿÀ.
  3. Command1 Click À̺¥Æ®¿¡ ´ÙÀ½ Äڵ带 ºÙ¿© ³Ö½À´Ï´Ù.
    Dim obj As Object
    Dim rs As Object
    
    Set obj = CreateObject("prjConstruct.clsConstruct")
    Set rs = obj.GetAuthors()
    Do While Not rs.EOF
      List1.AddItem rs.fields("au_fname")
      rs.movenext
    Loop
    
    Set obj = Nothing
    					
  4. Ç¥ÁØ EXE ÇÁ·ÎÁ§Æ®¸¦ ÀúÀåÇϰí À̸¦ ½ÇÇàÇϽʽÿÀ.
  5. Authors Å×ÀÌºí¿¡ ÀÖ´Â ¸ðµç ÀúÀÚÀÇ À̸§À» °¡Áø ¸ñ·Ï »óÀÚ¸¦ ä¿ì·Á¸é Command1 Ŭ¸¯ÇϽʽÿÀ.
COM + °³Ã¼ »ý¼ºÀÚ ¹®ÀÚ¿­ÀÇ À¯¿ë¼ºÀ» º¸¿© ÁÖ±â À§ÇØ »ý¼ºÀÚ ¹®ÀÚ¿­¿¡ ÀÖ´Â ´Ù¸¥ SQL ¶ÇÇÑ PUBS ¿¹Á¦ µ¥ÀÌÅͺ£À̽º¸¦ °¡Áø ¼­¹ö¸¦ °¡¸®Å°µµ·Ï DataSource ¼Ó¼ºÀ» º¯°æÇϽʽÿÀ. Ŭ¶óÀÌ¾ðÆ® Äڵ带 ½ÇÇàÇÒ ¶§ »õ µ¥ÀÌÅÍ ¿øº»ÀÇ ·¹ÄÚµå´Â °Ë»öÇÒ Ç¥½ÃÇϰí ÀÖ½À´Ï´Ù. À̸¦ È®ÀÎÇÏ·Á¸é µÎ ¹øÂ° SQL Server PUBS µ¥ÀÌÅͺ£À̽ºÀÇ Authors Å×ÀÌºí¿¡ »õ ·¹Äڵ带 Ãß°¡ÇϽʽÿÀ.

¼Ó¼º

±â¼ú ÀÚ·á: 271284 - ¸¶Áö¸· °ËÅä: 2004³â 6¿ù 29ÀÏ È­¿äÀÏ - ¼öÁ¤: 1.2
º» ¹®¼­ÀÇ Á¤º¸´Â ´ÙÀ½ÀÇ Á¦Ç°¿¡ Àû¿ëµË´Ï´Ù.
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
Ű¿öµå:?
kbmt kbhowto kbmdacnosweep KB271284 KbMtko
±â°è ¹ø¿ªµÈ ¹®¼­
Áß¿ä: º» ¹®¼­´Â Àü¹® ¹ø¿ª°¡°¡ ¹ø¿ªÇÑ °ÍÀÌ ¾Æ´Ï¶ó Microsoft ±â°è ¹ø¿ª ¼ÒÇÁÆ®¿þ¾î·Î ¹ø¿ªÇÑ °ÍÀÔ´Ï´Ù. Microsoft´Â ¹ø¿ª°¡°¡ ¹ø¿ªÇÑ ¹®¼­ ¹× ±â°è ¹ø¿ªµÈ ¹®¼­¸¦ ¸ðµÎ Á¦°øÇϹǷΠMicrosoft ±â¼ú ÀÚ·á¿¡ ÀÖ´Â ¸ðµç ¹®¼­¸¦ Çѱ۷ΠÁ¢ÇÒ ¼ö ÀÖ½À´Ï´Ù. ±×·¯³ª ±â°è ¹ø¿ª ¹®¼­°¡ Ç×»ó ¿Ïº®ÇÑ °ÍÀº ¾Æ´Õ´Ï´Ù. µû¶ó¼­ ±â°è ¹ø¿ª ¹®¼­¿¡´Â ¸¶Ä¡ ¿Ü±¹ÀÎÀÌ Çѱ¹¾î·Î ¸»ÇÒ ¶§ ½Ç¼ö¸¦ ÇÏ´Â °Íó·³ ¾îÈÖ, ±¸¹® ¶Ç´Â ¹®¹ý¿¡ ¿À·ù°¡ ÀÖÀ» ¼ö ÀÖ½À´Ï´Ù. Microsoft´Â ³»¿ë»óÀÇ ¿À¿ª ¶Ç´Â Microsoft °í°´ÀÌ ÀÌ·¯ÇÑ ¿À¿ªÀ» »ç¿ëÇÔÀ¸·Î½á ¹ß»ýÇÏ´Â ºÎ Á¤È®¼º, ¿À·ù ¶Ç´Â ¼ÕÇØ¿¡ ´ëÇØ Ã¥ÀÓÀ» ÁöÁö ¾Ê½À´Ï´Ù. Microsoft´Â ÀÌ·¯ÇÑ ¹®Á¦¸¦ ÇØ°áÇϱâ À§ÇØ ±â°è ¹ø¿ª ¼ÒÇÁÆ®¿þ¾î¸¦ ÀÚÁÖ ¾÷µ¥ÀÌÆ®Çϰí ÀÖ½À´Ï´Ù.

Çǵå¹é º¸³»±â