PRB: Access Å×À̺íÀÇ ¿­À» °Ë»öÇÏ´Â ADOX »ç¿ëÇÏ¸é ¿­ »çÀü¼ø Á¤·Ä?

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

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

Çö»ó

īŻ·Î±× ADOX Ä÷º¼Ç ¹× Microsoft OLE DB °ø±ÞÀÚ¿¡ ´ëÇÑ Jet »ç¿ëÇÏ¿© Access Å×À̺íÀÇ ¿­À» °Ë»öÇÏ´Â °æ¿ì ¿­Àº »çÀü¼øÀ¸·Î Á¤·ÄµË´Ï´Ù.

¿øÀÎ

OLE DB °ø±ÞÀÚ 4.0 Jet¿¡ ´ëÇÑ ¿­À» ¿­ ¼­¼ö À§Ä¡ ¼ø¼­ ´ë½Å »çÀü¼øÀ¸·Î °Ë»öÇÕ´Ï´Ù.

ÇØ°á ¹æ¹ý

ÀÌ ¹®Á¦¸¦ ÇØ°áÇÏ·Á¸é ODBC µå¶óÀ̹ö Microsoft Access ÇÔ²² OLE DB °ø±ÞÀÚ¿¡ ´ëÇÑ ODBC »ç¿ëÇϽʽÿÀ. ´Ù¸¥ OLE DB °ø±ÞÀÚ, OLE DB °ø±ÞÀÚ¸¦ SQL Server °°Àº ÀÌ ¹®Á¦°¡ À§ÇèÇÒ ¼ö ¾ø½À´Ï´Ù.

´ëÇÑ Jet OLE DB °ø±ÞÀÚ¸¦ »ç¿ëÇØ¾ß ÇÏ´Â °æ¿ì ADODB ¿¬°á °³Ã¼ÀÇ OpenSchema ¸Þ¼­µå¸¦ »ç¿ëÇϰí ORDINAL_POSITION Çʵ忡 µû¶ó °á°ú ·¹ÄÚµå ÁýÇÕ Á¤·Ä.

Ãß°¡ Á¤º¸

¹®Á¦¸¦ ÀçÇöÇϱâ À§ÇÑ ´Ü°è

  1. Visual Basic¿¡¼­ Ç¥ÁØ EXE ÇÁ·ÎÁ§Æ®¸¦ »õ·Î ¸¸µì´Ï´Ù. ±âº»ÀûÀ¸·Î Form1ÀÌ ¸¸µé¾îÁý´Ï´Ù.
  2. ÇÁ·ÎÁ§Æ® ¸Þ´º¿¡¼­ ÂüÁ¶ ¸¦ Ŭ¸¯ÇÑ ´ÙÀ½ Microsoft ActiveX µ¥ÀÌÅÍ °³Ã¼ 2.1 ¹× Microsoft ADO Ext. 2.1 DDL ¹× º¸¾ÈÀ» Ŭ¸¯ÇϽʽÿÀ.
  3. ¼¼ °³ÀÇ ¸í·É ´ÜÃß ÄÁÆ®·ÑÀ» Form1¿¡ Ãß°¡ÇϽʽÿÀ.
  4. ²ø¾î´Ù Form1ÀÇ ¼±¾ð ±¸¿ª¿¡ ´ÙÀ½ Äڵ带 ºÙ¿©:
    Option Explicit
    
    Dim cnn As ADODB.Connection
    Dim cat As ADOX.Catalog
    Dim tbl As ADOX.Table
    Dim col As ADOX.Column
    
    
    Private Sub Command1_Click()
       Set cnn = New ADODB.Connection
       With cnn
          .Provider = "Microsoft.Jet.OLEDB.4.0;"
          .Open "Data Source=D:\Nwind.mdb;"
       End With
       Set cat = New ADOX.Catalog
       cat.ActiveConnection = cnn
       Set tbl = cat.Tables("Products")
       Debug.Print "Results using the OLEDB Provider and ADOX"
       For Each col In tbl.Columns
          Debug.Print col.Name
       Next
    End Sub
    
    Private Sub Command2_Click()
       Set cnn = New ADODB.Connection
       With cnn
          .Provider = "MSDASQL.1;"
          .Open "Driver={Microsoft Access Driver (*.mdb)};" & _
           "DBQ=D:\Nwind.mdb;"
       End With
       Set cat = New ADOX.Catalog
       cat.ActiveConnection = cnn
       Set tbl = cat.Tables("Products")
       Debug.Print "Results using the ODBC Driver and ADOX"
       For Each col In tbl.Columns
          Debug.Print col.Name
       Next
    End Sub
    
    
    Private Sub Command3_Click()
       Dim rsSchema As ADODB.Recordset
       Dim fld As ADODB.Field
       Dim rCriteria As Variant
    
       Set cnn = New ADODB.Connection
       With cnn
          .CursorLocation = adUseClient
          .Provider = "Microsoft.Jet.OLEDB.4.0;"
          .Open "Data Source=D:\Nwind.mdb;"
       
       End With
    
       Set rsSchema = cnn.OpenSchema(adSchemaColumns, _
            Array(Empty, Empty, "Products"))
       rsSchema.Sort = "ORDINAL_POSITION"
       Debug.Print "Results using the OpenSchema method"
       While Not rsSchema.EOF
          Debug.Print rsSchema!COLUMN_NAME
          rsSchema.MoveNext
       Wend
    End Sub
    					
  5. ¿Ã¹Ù¸¥ Microsoft Access µ¥ÀÌÅͺ£À̽º ÆÄÀÏÀ» °¡¸®Å°µµ·Ï cnn.Open ¹®À» ¼öÁ¤ÇϽʽÿÀ.
  6. ÇÁ·ÎÁ§Æ®¸¦ ½ÇÇàÇÑ ´ÙÀ½ Command1 À» Ŭ¸¯ÇϽʽÿÀ. OLE DB °ø±ÞÀÚ¸¦ »ç¿ëÇÒ ¶§ Çʵå À̸§À» »çÀü¼øÀ¸·Î Á¤·ÄµË´Ï´Ù À¯ÀÇÇϽʽÿÀ.
  7. Command2 ¸¦ Ŭ¸¯ÇϽʽÿÀ. ODBC µå¶óÀ̹ö¸¦ »ç¿ëÇÒ ¶§ Çʵå À̸§À» ¼­¼ö À§Ä¡¿¡ ³ªÅ¸³ªµµ·Ï À¯ÀÇÇϽʽÿÀ.
  8. Command3 À» Ŭ¸¯ÇϽʽÿÀ. OpenSchema ¸Þ¼­µå¸¦ »ç¿ëÇÏ¿© OLE DB °ø±ÞÀÚ¸¦ »ç¿ëÇÒ ¶§ Çʵå À̸§À» ¼­¼ö À§Ä¡¿¡ ³ªÅ¸³ªµµ·Ï À¯ÀÇÇϽʽÿÀ.

ÂüÁ¶

ÀÚ¼¼ÇÑ ³»¿ëÀº ´ÙÀ½ MSDN ¹®¼­¸¦ ÂüÁ¶ÇϽʽÿÀ.
OpenSchema ¹æ¹ý
http://msdn.microsoft.com/en-us/library/ms676705.aspx

ADOX Å×ÀÌºí °³Ã¼
http://msdn.microsoft.com/en-us/library/ms677529.aspx

¼Ó¼º

±â¼ú ÀÚ·á: 299484 - ¸¶Áö¸· °ËÅä: 2003³â 12¿ù 3ÀÏ ¼ö¿äÀÏ - ¼öÁ¤: 3.2
º» ¹®¼­ÀÇ Á¤º¸´Â ´ÙÀ½ÀÇ Á¦Ç°¿¡ Àû¿ëµË´Ï´Ù.
  • Microsoft Data Access Components 2.0
  • Microsoft Data Access Components 2.1
  • Microsoft Data Access Components 2.1 ¼­ºñ½º ÆÑ 2
  • Microsoft Data Access Components 2.1 ¼­ºñ½º ÆÑ 1
  • Microsoft Data Access Components 2.1 ¼­ºñ½º ÆÑ 2
  • Microsoft Data Access Components 2.5
  • Microsoft Data Access Components 2.5 ¼­ºñ½º ÆÑ 1
  • Microsoft Data Access Components 2.6
Ű¿öµå:?
kbmt kbjet kbprb KB299484 KbMtko
±â°è ¹ø¿ªµÈ ¹®¼­
Áß¿ä: º» ¹®¼­´Â Àü¹® ¹ø¿ª°¡°¡ ¹ø¿ªÇÑ °ÍÀÌ ¾Æ´Ï¶ó Microsoft ±â°è ¹ø¿ª ¼ÒÇÁÆ®¿þ¾î·Î ¹ø¿ªÇÑ °ÍÀÔ´Ï´Ù. Microsoft´Â ¹ø¿ª°¡°¡ ¹ø¿ªÇÑ ¹®¼­ ¹× ±â°è ¹ø¿ªµÈ ¹®¼­¸¦ ¸ðµÎ Á¦°øÇϹǷΠMicrosoft ±â¼ú ÀÚ·á¿¡ ÀÖ´Â ¸ðµç ¹®¼­¸¦ Çѱ۷ΠÁ¢ÇÒ ¼ö ÀÖ½À´Ï´Ù. ±×·¯³ª ±â°è ¹ø¿ª ¹®¼­°¡ Ç×»ó ¿Ïº®ÇÑ °ÍÀº ¾Æ´Õ´Ï´Ù. µû¶ó¼­ ±â°è ¹ø¿ª ¹®¼­¿¡´Â ¸¶Ä¡ ¿Ü±¹ÀÎÀÌ Çѱ¹¾î·Î ¸»ÇÒ ¶§ ½Ç¼ö¸¦ ÇÏ´Â °Íó·³ ¾îÈÖ, ±¸¹® ¶Ç´Â ¹®¹ý¿¡ ¿À·ù°¡ ÀÖÀ» ¼ö ÀÖ½À´Ï´Ù. Microsoft´Â ³»¿ë»óÀÇ ¿À¿ª ¶Ç´Â Microsoft °í°´ÀÌ ÀÌ·¯ÇÑ ¿À¿ªÀ» »ç¿ëÇÔÀ¸·Î½á ¹ß»ýÇÏ´Â ºÎ Á¤È®¼º, ¿À·ù ¶Ç´Â ¼ÕÇØ¿¡ ´ëÇØ Ã¥ÀÓÀ» ÁöÁö ¾Ê½À´Ï´Ù. Microsoft´Â ÀÌ·¯ÇÑ ¹®Á¦¸¦ ÇØ°áÇϱâ À§ÇØ ±â°è ¹ø¿ª ¼ÒÇÁÆ®¿þ¾î¸¦ ÀÚÁÖ ¾÷µ¥ÀÌÆ®Çϰí ÀÖ½À´Ï´Ù.

Çǵå¹é º¸³»±â