ACC2000: ·¹ÄÚµå ÁýÇÕ ´Ù½Ã ¿­ ¶§±îÁö »õ SQL ·¹ÄÚµå »èÁ¦µÈ ³ªÅ¸³­´Ù

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

ÀÌ ¹®¼­¿¡¼­´Â °æ¿ì¿¡¸¸ Access µ¥ÀÌÅͺ£À̽º¸¦ ¼ö (.mdb) Àû¿ëµË´Ï´Ù.

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

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

Çö»ó

ÀÀ¿ë ÇÁ·Î±×·¥¿¡ ´ëÇØ Visual BasicÀ» »ç¿ëÇÏ¿© Å×À̺íÀÇ °íÀ¯ À妽º ÇÊµå ±âº» °ªÀ» ÇØ´ç Çʵ忡 °ªÀ» ÁöÁ¤ÇÒ °æ¿ì SQL Å×ÀÌºí¿¡ ·¹Äڵ带 Ãß°¡ÇÒ ¶§ SQL Å×À̺íÀ» ´Ù½Ã ¿­ ¶§±îÁö »õ ·¹Äڵ尡 »èÁ¦µÈ ³ªÅ¸³³´Ï´Ù. »õ ·¹Äڵ忡¼­ °ªÀ» ±¸ÇÏ´Â ÇÏ¸é ´ÙÀ½ ¿À·ù ¸Þ½ÃÁö°¡ ³ªÅ¸³¯ ¼ö ÀÖ½À´Ï´Ù.
·±Å¸ÀÓ ¿À·ù '3167'

·¹Äڵ尡 »èÁ¦µË´Ï´Ù.

ÇØ°á ¹æ¹ý

SQL Å×À̺íÀ» ¿­¸é VBA Äڵ带 »ç¿ëÇÏ¿© ÀÌ ¹®Á¦¸¦ ÇØ°áÇÏ·Á¸é ´ÙÀ½ ¿¹Á¦¿Í °°ÀÌ dbSeeChanges ¿É¼ÇÀ» Æ÷ÇÔÇÒ:
Set rs = db.OpenRecordset("TestTable", dbOpenDynaset, dbSeeChanges)
				
dbSeeChanges ¿É¼ÇÀ» »õ·Î °íÀ¯ À妽º ÇʵåÀÇ ±âº» °ªÀ» Æ÷ÇÔÇÏ´Â ·¹Äڵ带 ÇöÀç ·¹ÄÚµå ÁýÇÕ¿¡ »ç¿ëÇÒ ¼ö ÀÖ´Â Ãß°¡µÈ °ÍÀ» º¸ÀåÇÕ´Ï´Ù.

Ãß°¡ Á¤º¸

Microsoft´Â ¹¬½ÃÀûÀÎ º¸Áõ ¾øÀÌ ¸ñÀûÀ¸·Î¸¸ ÇÁ·Î±×·¡¹Ö ¿¹Á¦¸¦ Á¦°øÇÕ´Ï´Ù. ÀÌ Æ÷ÇÔµÇÁö¸¸, »óǰ¼º ¶Ç´Â ƯÁ¤ ¸ñÀû¿¡ÀÇ ÀûÇÕ¼º¿¡ ´ëÇÑ ¹¬½ÃÀûÀÎµÈ º¸ÁõÀÌ Á¦ÇѵÇÁö ¾Ê½À´Ï´Ù. ÀÌ ¹®¼­¿¡¼­´Â ¸¸µé·Á¸é ¹× ÇÁ·Î½ÃÀú¸¦ µð¹ö±ëÇÏ´Â µ¥ »ç¿ëµÇ´Â µµ±¸ ¹× ¿©±â¼­ ¼³¸íÇÏ´Â ÇÁ·Î±×·¡¹Ö ¾ð¾î¿¡ Àͼ÷ÇÑ »ç¿ëÀÚ¸¦ ´ë»óÀ¸·Î ÇÕ´Ï´Ù. Microsoft Áö¿ø ¿£Áö´Ï¾î´Â »ç¿ëÀÚ¿¡°Ô µµ¿òÀÌ µÇµµ·Ï ƯÁ¤ ÀýÂ÷¿¡ ´ëÇÑ ±â´ÉÀ» ¼³¸íÇÒ ¼ö ÀÖÁö¸¸ Ãß°¡ ±â´ÉÀ» Á¦°øÇϰųª ƯÁ¤ ¿ä±¸ »çÇ׿¡ ¸Âµµ·Ï ÇÁ·Î½ÃÀú¸¦ ±¸¼ºÇÏÁö´Â ÀÌ ¿¹Á¦¸¦ ¼öÁ¤ÇÏÁö ¾Ê½À´Ï´Ù.

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

Âü°í: ÀÌ ¹®¼­¿¡¼­´Â ¿¹Á¦ Äڵ忡¼­ Microsoft µ¥ÀÌÅÍ ¾×¼¼½º °³Ã¼¸¦ »ç¿ëÇÕ´Ï´Ù. ÀÌ Äڵ带 Á¦´ë·Î ½ÇÇàÇÏ·Á¸é Microsoft DAO 3.6 °³Ã¼ ¶óÀ̺귯¸®¿¡ ÂüÁ¶ÇØ¾ß ÇÕ´Ï´Ù. ÀÌ·¸°Ô ÇÏ·Á¸é Visual Basic ÆíÁý±â¿¡¼­ [µµ±¸] ¸Þ´º¿¡¼­ ÂüÁ¶ ¸¦ ¹× Microsoft DAO 3.6 °³Ã¼ ¶óÀ̺귯¸®¿¡ È®ÀζõÀÌ ¼±ÅõǾî ÀÖ´ÂÁö È®ÀÎÇϽʽÿÀ.

  1. ¸ðµâÀ» ¸¸µé°í ÀÖÀÌ ÀÖÁö ¾ÊÀº °æ¿ì ¼±¾ð ±¸¿ª¿¡ ´ÙÀ½ ÁÙÀ» ÀÔ·ÂÇϽʽÿÀ.
    ¸í½ÃÀû ¿É¼Ç
  2. ´ÙÀ½ ÇÁ·Î½ÃÀú¸¦ ÀÔ·ÂÇÕ´Ï´Ù:
    Function TestSQLData()
    
       Dim db As DAO.Database, rs As DAO.Recordset
       Dim idx, td
       Dim cmd As String
    
       ' Delete TestTable if it exists on the SQL server.
       
       'Insert your database name, user ID, password (if any), and dsn
       'to point to an ODBC data source.
       Set db = OpenDatabase("<MyDatabase>", False, False, _
       "ODBC, Database = <MyDatabase>, UID = <userid>, PWD = <password>, dsn = <MyDSN>")
       cmd = "if exists (select * from sysobjects where" _
          & " id = object_id('dbo.TestTable'))"
       cmd = cmd & " drop table TestTable"
       db.Execute cmd, dbSQLPassThrough
    
       ' Create TestTable with one field on SQL server.
       Set td = db.CreateTableDef("TestTable")
       td.Fields.Append td.CreateField("Int", dbInteger)
       td.Fields.Append td.CreateField("String", dbText, 50)
       db.TableDefs.Append td
    
       Set idx = td.CreateIndex("MyIdx")
       idx.Unique = True
       idx.Fields.Append idx.CreateField("Int")
       td.Indexes.Append idx
    
       cmd = "create Default TestDef3 as 100"
       db.Execute cmd, dbSQLPassThrough
    
       cmd = "sp_bindefault TestDef3, 'TestTable.Int'"
       db.Execute cmd, dbSQLPassThrough
    
       ' Open table, add a record, and then obtain values.
       Set rs = db.OpenRecordset("TestTable")
       rs.AddNew
       rs!String = "Trial"
       rs.Update
    
       Debug.Print "RecordCount = " & rs.RecordCount
       rs.MoveFirst
       Debug.Print "String is " & rs("String")
       Debug.Print "Int is " & rs("Int")
       rs.Close
    
    End Function
    					
  3. ÀÌ ÇÔ¼ö¸¦ Å×½ºÆ®ÇÏ·Á¸é Á÷Á¢ ½ÇÇà â¿¡ ´ÙÀ½ ÁÙÀ» ÀÔ·ÂÇÑ ´ÙÀ½ Enter ۸¦ ´©¸¨´Ï´Ù.
    ? TestSQLData()
    Âü°í 3167 ·±Å¸ÀÓ ¿À·ù°¡ ¹ß»ýÇÕ´Ï´Ù.

¼Ó¼º

±â¼ú ÀÚ·á: 208799 - ¸¶Áö¸· °ËÅä: 2005³â 6¿ù 23ÀÏ ¸ñ¿äÀÏ - ¼öÁ¤: 3.0
º» ¹®¼­ÀÇ Á¤º¸´Â ´ÙÀ½ÀÇ Á¦Ç°¿¡ Àû¿ëµË´Ï´Ù.
  • Microsoft Access 2000 Standard Edition
Ű¿öµå:?
kbmt kberrmsg kbprb kbusage KB208799 KbMtko
±â°è ¹ø¿ªµÈ ¹®¼­
Áß¿ä: º» ¹®¼­´Â Àü¹® ¹ø¿ª°¡°¡ ¹ø¿ªÇÑ °ÍÀÌ ¾Æ´Ï¶ó Microsoft ±â°è ¹ø¿ª ¼ÒÇÁÆ®¿þ¾î·Î ¹ø¿ªÇÑ °ÍÀÔ´Ï´Ù. Microsoft´Â ¹ø¿ª°¡°¡ ¹ø¿ªÇÑ ¹®¼­ ¹× ±â°è ¹ø¿ªµÈ ¹®¼­¸¦ ¸ðµÎ Á¦°øÇϹǷΠMicrosoft ±â¼ú ÀÚ·á¿¡ ÀÖ´Â ¸ðµç ¹®¼­¸¦ Çѱ۷ΠÁ¢ÇÒ ¼ö ÀÖ½À´Ï´Ù. ±×·¯³ª ±â°è ¹ø¿ª ¹®¼­°¡ Ç×»ó ¿Ïº®ÇÑ °ÍÀº ¾Æ´Õ´Ï´Ù. µû¶ó¼­ ±â°è ¹ø¿ª ¹®¼­¿¡´Â ¸¶Ä¡ ¿Ü±¹ÀÎÀÌ Çѱ¹¾î·Î ¸»ÇÒ ¶§ ½Ç¼ö¸¦ ÇÏ´Â °Íó·³ ¾îÈÖ, ±¸¹® ¶Ç´Â ¹®¹ý¿¡ ¿À·ù°¡ ÀÖÀ» ¼ö ÀÖ½À´Ï´Ù. Microsoft´Â ³»¿ë»óÀÇ ¿À¿ª ¶Ç´Â Microsoft °í°´ÀÌ ÀÌ·¯ÇÑ ¿À¿ªÀ» »ç¿ëÇÔÀ¸·Î½á ¹ß»ýÇÏ´Â ºÎ Á¤È®¼º, ¿À·ù ¶Ç´Â ¼ÕÇØ¿¡ ´ëÇØ Ã¥ÀÓÀ» ÁöÁö ¾Ê½À´Ï´Ù. Microsoft´Â ÀÌ·¯ÇÑ ¹®Á¦¸¦ ÇØ°áÇϱâ À§ÇØ ±â°è ¹ø¿ª ¼ÒÇÁÆ®¿þ¾î¸¦ ÀÚÁÖ ¾÷µ¥ÀÌÆ®Çϰí ÀÖ½À´Ï´Ù.

Çǵå¹é º¸³»±â