Makale numaras�: 155512 - Son G�zden Ge�irme: 19 Ocak 2007 Cuma - G�zden ge�irme: 3.3

ACC: nas�l bir Schema.ini dosyas� programsal olarak olu�tur

�ngilizce ve T�rk�e'yi yan yana g�r�nt�leme

Buraya t�klayarak �ngilizce ve T�rk�e'yi yan yana g�r�nt�leyebilirsiniz.

Otomatik terc�me makalelerin ne oldu�unu a��klayan yaz�y� okumak i�in buraya t�klay�n

Kullan�m D�� Bilgi Bankas� ��eri�i Yasal Uyar�

Bu makalenin ge�erli oldu�u �r�nleri g�r�n.

Sistem �pucuBu makale, kulland��n�zdan farkl� bir i�letim sistemine y�neliktir. Sizinle ilgili olmayabilecek makale i�eri�i devre d�� b�rak�ld�.

Orta: temel makro, kodlama ve birlikte �al��abilirlik becerileri gerektirir.

Hepsini a� | Hepsini kapa

�zet

Bu makalede, veritaban�nda varolan bir tabloyu temel alan bir Schema.ini dosyas� olu�turdu�u bir yordam yazmak g�sterilmi�tir.

Bu makalede, Visual Basic for Applications ve programlama Microsoft Access ile sa�lanan ara�lar� kullanarak Microsoft Access uygulamalar� olu�turma bildi�inizi varsayar. Hakk�nda daha fazla bilgi i�in Visual Basic for Applications "Building uygulamalar� ile Microsoft Access" el ile s�r�m� i�in bkz.

�ste

Daha fazla bilgi

Microsoft Access 7.0 ve Microsoft Access 97'de s�n�rl� ve sabit uzunluklu metin dosyalar�n� a�mak veya ba�lant� kullanabilirsiniz. Microsoft Access bir metin dosyas�na do�rudan okuyabilir veya s�tun adlar�, alan uzunluklar� ve veri t�rleri gibi <a1>metin</a1> dosyas�n�n �zelliklerini belirlemek i�in Schema.ini'adl� bir bilgi dosyas�n� kullanabilirsiniz. Sabit uzunluklu metin dosyalar�n� a�mak veya ba�lant� zaman BIR Schema.ini dosyas� gerekli, s�n�rland�r�lm�� metin dosyalar� i�in iste�e ba�l�d�r. Schema.ini dosyas�, onu tan�mlayan metin dosyalar� ile ayn� klas�rde bulunmal�d�r.

Yordam a�a��daki �rnekte d�rt parametre kabul eder:

     Parameter        Value
   ------------------------------------------------------------------------
   bIncFldNames     True/False, stating if the first row of the text file
                    has column names
   sPath            Full path to the folder where Schema.ini will reside
   sSectionName     Schema.ini section name; must be the same as the name
                    of the text file it describes
   sTblQryName      Name of the table or query for which you want to
                    create a Schema.ini file

UYAR�: Bu �rnek yordamda uyarmadan ayn� hedef klas�rde varolan bir Schema.ini dosyas� �zerine yazacakt�r.

Northwind.mdb �rnek veritaban�n� a��n.
Bir mod�l olu�turun ve zaten orada de�ilse, Tan�mlamalar b�l�m�ne a�a��daki sat�r� yaz�n: Option Explicit

A�a��daki yordam yaz�n:

      Public Function CreateSchemaFile(bIncFldNames As Boolean, _
                                       sPath As String, _
                                       sSectionName As String, _
                                       sTblQryName As String) As Boolean
         Dim Msg As String ' For error handling.
         On Local Error GoTo CreateSchemaFile_Err
         Dim ws As Workspace, db As DATABASE
         Dim tblDef As TableDef, fldDef As Field
         Dim i As Integer, Handle As Integer
         Dim fldName As String, fldDataInfo As String
         ' -----------------------------------------------
         ' Set DAO objects.
         ' -----------------------------------------------
         Set db = CurrentDB()
         ' -----------------------------------------------
         ' Open schema file for append.
         ' -----------------------------------------------
         Handle = FreeFile
         Open sPath & "schema.ini" For Output Access Write As #Handle
         ' -----------------------------------------------
         ' Write schema header.
         ' -----------------------------------------------
         Print #Handle, "[" & sSectionName & "]"
         Print #Handle, "ColNameHeader = " & _
                         IIf(bIncFldNames, "True", "False")
         Print #Handle, "CharacterSet = ANSI"
         Print #Handle, "Format = TabDelimited"
         ' -----------------------------------------------
         ' Get data concerning schema file.
         ' -----------------------------------------------
         Set tblDef = db.TableDefs(sTblQryName)
         With tblDef
            For i = 0 To .Fields.Count - 1
               Set fldDef = .Fields(i)
               With fldDef
                  fldName = .Name
                  Select Case .Type
                     Case dbBoolean
                        fldDataInfo = "Bit"
                     Case dbByte
                        fldDataInfo = "Byte"
                     Case dbInteger
                        fldDataInfo = "Short"
                     Case dbLong
                        fldDataInfo = "Integer"
                     Case dbCurrency
                        fldDataInfo = "Currency"
                     Case dbSingle
                        fldDataInfo = "Single"
                     Case dbDouble
                        fldDataInfo = "Double"
                     Case dbDate
                        fldDataInfo = "Date"
                     Case dbText
                        fldDataInfo = "Char Width " & Format$(.Size)
                     Case dbLongBinary
                        fldDataInfo = "OLE"
                     Case dbMemo
                        fldDataInfo = "LongChar"
                     Case dbGUID
                        fldDataInfo = "Char Width 16"
                  End Select
                  Print #Handle, "Col" & Format$(i + 1) _
                                  & "=" & fldName & Space$(1) _
                                  & fldDataInfo
               End With
            Next i
         End With
         MsgBox sPath & "SCHEMA.INI has been created."
         CreateSchemaFile = True
      CreateSchemaFile_End:
         Close Handle
         Exit Function
      CreateSchemaFile_Err:
         Msg = "Error #: " & Format$(Err.Number) & vbCrLf
         Msg = Msg & Err.Description
         MsgBox Msg
         Resume CreateSchemaFile_End
      End Function

Bu i�levi s�namak i�in <a0></a0>, hata ay�klama penceresinde a�a��daki sat�r� yaz�n ve ENTER tu�una bas�n:
? CreateSchemaFile(True,"c:\MSOffice\Access\","EMP.TXT","Employees")
Not Defteri veya WordPad gibi bir metin d�zenleyicisi ile olu�turulmu� bir Schema.ini dosyas� a��n. Dosyay� a�a��daki bilgileri i�erdi�ini unutmay�n:
[emp.txt]
ColNameHeader = true
CharacterSet ANSI =
Bi�im TabDelimited =
S�tun1 = �al��anNo tamsay�
Col1 = Soyad� KRKT width 20
Col3 = ad KRKT width 10
S�tun4 = ba�l�k KRKT Width 30
Col5 = TitleOfCourtesy KRKT width 25
Col6 do�um tarihi tarih =
Col7 = tarih HireDate
Col8 = adres KRKT width 60
Col9 �ehir KRKT Geni�lik 15 =
Col10 b�lge KRKT Geni�lik 15 =
Col11 = PostaKodu KRKT width 10
Col12 �lke KRKT Geni�lik 15 =
Col13 EvTelefonu KRKT geni�lik 24 =
Col14 uzant�s� KRKT geni�lik 4 =
Col15 foto�raf OLE =
Col16 notlar� LongChar =
Col17 = raporlar tamsay�

�ste

Referanslar

Schema.ini dosyas� hakk�nda daha fazla bilgi ve i�erdi�i bilgileri i�in s�r�c�leri ba�lat�l�yor ve Microsoft Access 97 Yard�m dizinini kullanarak, metin veri kayna�� s�r�c�s�ne ba�latma i�in arama.

Schema.ini dosyas� ve ili�kisini Microsoft Access ve Microsoft Jet veritaban� alt yap�s� hakk�nda daha fazla bilgi i�in "Microsoft Jet Database Engine Programmer's K�lavuzu", <a1>Sayfa</a1> 306 312 bak�n.

�ste

Bu makaledeki bilginin uyguland�� durum:

Microsoft Access 95 Standard Edition
Microsoft Access 97 Standard Edition

�ste

kbmt kbhowto kbprogramming KB155512 KbMttr

�ste

Otomatik Terc�me

�NEML�: Bu makale, bir ki�i taraf�ndan �evrilmek yerine, Microsoft makine-�evirisi yaz�l�m� ile �evrilmi�tir. Microsoft size hem ki�iler taraf�ndan �evrilmi�, hem de makine-�evrisi ile �evrilmi� makaleler sunar. B�ylelikle, bilgi bankam�zdaki t�m makalelere, kendi dilinizde ula�m�� olursunuz. Bununla birlikte, makine taraf�ndan �evrilmi� makaleler m�kemmel de�ildir. Bir yabanc�n�n sizin dilinizde konu�urken yapabilece�i hatalar gibi, makale; kelime da�arc��, s�z dizim kurallar� veya dil bilgisi a��s�ndan yanl��lar i�erebilir. Microsoft, i�eri�in yanl�� evrimi veya onun m��teri taraf�ndan kullan�m�ndan do�an; kusur, hata veya zarardan sorumlu de�ildir. Microsoft ayr�ca makine �evirisi yaz�l�m�n� s�k�a g�ncellemektedir.

Makalenin �ngilizcesi a�a��daki gibidir:155512� (http://support.microsoft.com/kb/155512/en-us/ )

�ste

Kullan�m D�� Bilgi Bankas� ��eri�i Yasal Uyar�

Bu makale, Microsoft'un art�k destek sa�lamad�� r�nler ile ilgili olarak yaz�lm��t�r. Bu nedenle, bu makale "oldu�u gibi" sa�lanm��t�r ve bundan sonra g�ncelle�tirilmeyecektir.

�ste

This site in other countries/regions:

ACC: nas�l bir Schema.ini dosyas� programsal olarak olu�tur

�zet

Daha fazla bilgi

Referanslar

Bu makaledeki bilginin uyguland�� durum:

Anahtar Kelimeler:�

Di�er Destek Siteleri

Topluluk

Hemen Yard�m Al

Makale �evirileri

�lgili Destek Merkezleri

This site in other countries/regions:

ACC: nas�l bir Schema.ini dosyas� programsal olarak olu�tur

�zet

Daha fazla bilgi

Referanslar

Bu makaledeki bilginin uyguland��� durum:

Anahtar Kelimeler:�

Di�er Destek Siteleri

Topluluk

Hemen Yard�m Al

Makale �evirileri

�lgili Destek Merkezleri

Bu makaledeki bilginin uyguland�� durum: