±â¼ú ÀÚ·á: 304302 - ¸¶Áö¸· °ËÅä: 2005³â 10¿ù 6ÀÏ ¸ñ¿äÀÏ - ¼öÁ¤: 6.1

Access 2002 ¶Ç´Â Access 2003¿¡¼­ °Ë»ö ÆûÀÇ °ªÀ» »ç¿ëÇÏ¿© µ¿Àû Äõ¸®¸¦ ¸¸µå´Â ¹æ¹ý

°í±Þ: Àü¹®ÀûÀÎ ÄÚµå ÀÛ¼º, »óÈ£ ¿î¿ë¼º ¹× ´ÙÁß »ç¿ëÀÚ ±â¼úÀÌ ÇÊ¿äÇÕ´Ï´Ù.

ÀÌ ¹®¼­ÀÇ ³»¿ëÀº Microsoft Access µ¥ÀÌÅͺ£À̽º(.mdb)¿Í Microsoft Access ÇÁ·ÎÁ§Æ®(.adp)¿¡ Àû¿ëµË´Ï´Ù.

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

¸ðµÎ È®´ë | ¸ðµÎ Ãà¼Ò

¿ä¾à

ÀÌ ¹®¼­¿¡¼­´Â Microsoft Access 2002 ¹× Microsoft Office Access 2003¿¡¼­ °Ë»ö ÆûÀÇ °ªÀ¸·Î Äõ¸® ¹®ÀÚ¿­¿¡ ´ëÇÑ Á¶°ÇÀ» µ¿ÀûÀ¸·Î ¸¸µå´Â ¹æ¹ýÀ» º¸¿© ÁÝ´Ï´Ù.

Ãß°¡ Á¤º¸

°Ë»ö ÆûÀ¸·Î »ç¿ëÇÒ ÆûÀ» ¸¸µé¾î¾ß ÇÏ´Â °æ¿ì°¡ Á¾Á¾ ÀÖ½À´Ï´Ù. ÀÌ Æû¿¡ °ªÀ» ÀÔ·ÂÇÏ¿© ÀûÀýÇÑ SQL ¹®ÀÚ¿­À» µ¿ÀûÀ¸·Î ¸¸µé ¼ö ÀÖ½À´Ï´Ù. ´ÙÀ½ ´Ü°è¿¡¼­´Â BuildCriteria ¸Þ¼­µå¸¦ »ç¿ëÇÏ´Â Äõ¸® ¹®ÀÚ¿­À» µ¿ÀûÀ¸·Î ¸¸µå´Â ¹æ¹ýÀ» º¸¿© ÁÝ´Ï´Ù.

Microsoft´Â ¸ðµç º¸Áõ(»óǰ, ƯÁ¤ ¸ñÀû¿¡ ´ëÇÑ ÀûÇÕ¼º ¹× ºñÄ§ÇØ¿¡ ´ëÇÑ ¹¬½ÃÀûÀÎ º¸ÁõÀ» Æ÷ÇÔÇϸç ÀÌ¿¡ Á¦ÇѵÇÁö ¾ÊÀ½)À» ¹èÁ¦ÇÏ¸ç ¿¹¸¦ º¸¿©ÁÖ±â À§ÇÑ ¸ñÀûÀ¸·Î¸¸ ÀÌ ÇÁ·Î±×·¡¹Ö ¿¹Á¦¸¦ Á¦°øÇÕ´Ï´Ù. º» ¹®¼­ÀÇ ³»¿ëÀº ÇÁ·Î½ÃÀú¸¦ ÀÛ¼ºÇÏ°í µð¹ö±ëÇÏ´Â µ¥ »ç¿ëµÇ´Â µµ±¸ ¹× ¿©±â¼­ ¼³¸íÇÏ´Â ÇÁ·Î±×·¡¹Ö ¾ð¾î¿¡ Àͼ÷ÇÑ »ç¿ëÀÚ¸¦ ´ë»óÀ¸·Î ÇÕ´Ï´Ù. Microsoft Áö¿ø ¿£Áö´Ï¾î´Â »ç¿ëÀÚ¿¡°Ô µµ¿òÀÌ µÇµµ·Ï ƯÁ¤ ÇÁ·Î½ÃÀú¿¡ ´ëÇÑ ±â´ÉÀ» ¼³¸íÇÒ ¼ö ÀÖÁö¸¸ »ç¿ëÀÚÀÇ Æ¯Á¤ ¿ä±¸ »çÇ׿¡ ¸Âµµ·Ï ¿¹Á¦¸¦ ¼öÁ¤ÇÏ¿© Ãß°¡ ±â´ÉÀ» Á¦°øÇϰųª ÇÁ·Î½ÃÀú¸¦ ±¸¼ºÇÏÁö´Â ¾Ê½À´Ï´Ù. ÁÖÀÇ: ÀÌ ¿¹Á¦¿¡¼­ ¼³¸íÇÏ´Â ´Ü°è¸¦ ¼öÇàÇϸé Northwind.mdb ¿¹Á¦ µ¥ÀÌÅͺ£À̽º°¡ ¼öÁ¤µÇ¹Ç·Î Northwind.mdb ÆÄÀÏÀ» ¹é¾÷ÇÏ°í º¹»çº»À» »ç¿ëÇÏ¿© ¾Æ·¡ ´Ü°è¸¦ ¼öÇàÇÏ´Â °ÍÀÌ ÁÁ½À´Ï´Ù.

´Ü°èº° ¿¹Á¦

  1. Access¸¦ ½ÃÀÛÇÕ´Ï´Ù.
  2. µµ¿ò¸» ¸Þ´º¿¡¼­ ¿¹Á¦ µ¥ÀÌÅͺ£À̽º¸¦ °¡¸®Å² ´ÙÀ½ Northwind ¿¹Á¦ µ¥ÀÌÅͺ£À̽º¸¦ ´©¸¨´Ï´Ù.
  3. µðÀÚÀÎ º¸±â¿¡¼­ Customers ÆûÀ» ¿±´Ï´Ù.
  4. Æû¿¡ ¸í·É ´ÜÃß¿Í ÅØ½ºÆ® »óÀÚ¸¦ Ãß°¡ÇÏ°í ´ÙÀ½ ¼Ó¼ºÀ» ¼³Á¤ÇÕ´Ï´Ù.
    Ç¥ Ãà¼ÒÇ¥ È®´ë
    ¸í·É ´ÜÃß
    À̸§:cmdSearch
    ĸ¼Ç:°Ë»ö
    OnClick:À̺¥Æ® ÇÁ·Î½ÃÀú
    Ç¥ Ãà¼ÒÇ¥ È®´ë
    ÅØ½ºÆ® »óÀÚ
    À̸§:txtSQL
    ³Êºñ:4.4583"
    ³ôÀÌ:1.25"
  5. ¸í·É ´ÜÃßÀÇ OnClick ¼Ó¼ºÀ» ¾Æ·¡ÀÇ À̺¥Æ® ÇÁ·Î½ÃÀú·Î ¼³Á¤ÇÕ´Ï´Ù.
    Private Sub cmdSearch_Click()
        On Error Resume Next
        
        Dim ctl As Control
        Dim sSQL As String
        Dim sWhereClause As String
        
        'Initialize the Where Clause variable.
        sWhereClause = " Where "
        
        'Start the first part of the select statement.
        sSQL = "select * from customers "
        
        'Loop through each control on the form to get its value.
        For Each ctl In Me.Controls
            With ctl
                'The only Control you are using is the text box.
                'However, you can add as many types of controls as you want.
                Select Case .ControlType
                    Case acTextBox
                        .SetFocus
                        'This is the function that actually builds
                        'the clause.
                        If sWhereClause = " Where " Then
                            sWhereClause = sWhereClause & BuildCriteria(.Name, dbtext, .Text)
                        Else
                            sWhereClause = sWhereClause & " and " & BuildCriteria(.Name, dbtext, .Text)
                        End If
                End Select
            End With
        Next ctl
        
        'Set the forms recordsource equal to the new
        'select statement.
        Me.txtSQL = sSQL & sWhereClause
        Me.RecordSource = sSQL & sWhereClause
        Me.Requery
        
    End Sub
    					
  6. ÆûÀ» ÀúÀåÇÑ ÈÄ, Æû º¸±â¿¡¼­ ¿±´Ï´Ù.
°Ë»ö ¸í·É ´ÜÃ߸¦ ´©¸£¸é txtSQL ÅØ½ºÆ® »óÀÚ´Â Customers ÆûÀÇ °ª¿¡¼­ ¸¸µç Äõ¸®¸¦ ¹Ý¿µÇÕ´Ï´Ù. ¶ÇÇÑ Customers ÆûÀÌ ´Ù½Ã Äõ¸®µÇ¾úÀ¸¹Ç·Î »õ SQL ¹®ÀÚ¿­ÀÇ °á°ú¸¦ ¹Ý¿µÇÕ´Ï´Ù.

ÂüÁ¶

BuildCriteria ¸Þ¼­µå¿¡ ´ëÇÑ ÀÚ¼¼ÇÑ ³»¿ëÀº Visual Basic EditorÀÇ µµ¿ò¸» ¸Þ´º¿¡¼­ Microsoft Visual Basic µµ¿ò¸»À» ´©¸£°í Office ±æÀâÀ̳ª µµ¿ò¸» ¸¶¹ý»ç¿¡¼­ buildcriteria ¸Þ¼­µå¸¦ ÀÔ·ÂÇÑ ´ÙÀ½ ã±â¸¦ ´­·¯¼­ ³ªÅ¸³ª´Â Ç׸ñÀ» ÂüÁ¶ÇϽʽÿÀ.





?Microsoft Á¦Ç° °ü·Ã ±â¼ú Àü¹®°¡µé°ú ¿Â¶óÀÎÀ¸·Î Á¤º¸¸¦ ±³È¯ÇϽ÷Á¸é Microsoft ´º½º ±×·ì (http://support.microsoft.com/newsgroups/default.aspx) ¿¡ Âü¿©ÇϽñ⠹ٶø´Ï´Ù.

º» ¹®¼­ÀÇ Á¤º¸´Â ´ÙÀ½ÀÇ Á¦Ç°¿¡ Àû¿ëµË´Ï´Ù.
  • Microsoft Access 2002 Standard Edition
  • Microsoft Office Access 2003
Ű¿öµå:?
kbforms kbdta kbhowto KB304302
 

±â¼ú ÀÚ·á ¹ø¿ª

 

Related Support Centers