Makale numaras�: 285176 - Son G�zden Ge�irme: 23 Ekim 2007 Sal� - G�zden ge�irme: 8.1

Word, XML, SQL Server'� kullanarak bir istemci taraf� posta birle�tirme ger�ekle�tirmek i�in otomatikle�tirme

�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

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�.

Bu makalede, Microsoft Word otomatik hale getirmek i�in etiket adres mektup birle�tirme ger�ekle�tirmek i�in istemci taraf� komut dosyas�ndan g�sterilmi�tir. Word, XML verilerini, adres-mektup birle�tirme i�in veri kayna�� olarak kullanmak i�in do�rudan bir y�ntemi yok. Active Server Pages (ASP) �rnek g�sterilmi�tir Web sunucusundan bir istemciye bir XML kay�t ak�p kodu. Istemci taraf� komut dosyas� bu XML veri, istemcinin yerel olarak ve sonra da Word'�n adres mektup birle�tirme veri kayna�� olarak yerel metin dosyas� kullanarak adres-mektup birle�tirmeyi ger�ekle�tirdi�inizde otomatikle�tirir s�n�rland�r�lm�� bir metin dosyas�na d�n��t�r�r.

�ste

Daha fazla bilgi

ActiveX Data Objects (ADO) 2.5 ve daha sonra XML bi�iminde kal�c�, kay�t verilerini sa�lar. ASP kullanarak Web sunucusunda bir veritaban�ndan bir ADO kay�t k�mesi olu�turmak ve verileri XML olarak istemcilerinize d�nd�r�n. Istemciler, XML kay�t k�mesi'ni okuyup gerekti�i gibi verileri i�lemek i�in ADO kullanabilirsiniz. XML ile ADO kullanma hakk�nda ek kaynaklara ba�lant�lar i�in bu makalenin "Ba�vurular" b�l�m�ne bak�n.

G�sterim amac�yla, a�a��daki �rnek, pubs �rnek veritaban�n� Microsoft SQL Server'da kullan�r. Bununla birlikte, benzer bir kod bir ADO yapabilirsiniz herhangi bir veritaban� ile bir adres-mektup birle�tirme ger�ekle�tirmek i�in kullan�lan ba�lant�.

�ste

�RNEK

Web sunucunuzda WordMailMerge adl� bir sanal dizin olu�turun.

A�a��da verilen kod i�eren default.asp adl� bir dosya olu�turmak i�in Not Defteri'ni kullan�n. Dosyay� WordMailMerge sanal dizine kaydedin.

<%@ Language=VBScript %>
<HTML>
<BODY>
<SCRIPT LANGUAGE=VBScript>
Sub CreateDataDoc(oApp)
  ' Declare variables.
  Dim sServer,oDoc,oRS,sTemp,sHead,oRange,oField
  
  ' Place your server's name here.
  sServer = "<servername>"
  ' Create a new document.
  Set oDoc = oApp.Documents.Add
  ' Create a new recordset.
  Set oRS = CreateObject("ADODB.Recordset")
  ' Open the XML recordset from the server
  oRS.Open "http://" & sServer & "/WordMailMerge/Getdata.asp"
  ' Convert the recordset to a string.
  sTemp = oRS.GetString(2, -1, vbTab)  ' 2 = adClipString
         
  ' Append the field names to the front of the string.
  For Each oField In oRS.Fields
    sHead = sHead & oField.Name & vbTab
  Next
        
  ' Strip off the last tab.
  sTemp = Mid(sHead, 1, Len(sHead) - 1) & vbCrLf & sTemp
         
  ' Get a range object and insert the text into the document.
  Set oRange = oDoc.Range
  oRange.Text = sTemp
  
  ' Convert the text to a table.
  oRange.ConvertToTable vbTab
  ' Save the document to a temp file.
  oDoc.SaveAs "C:\data.doc"
  ' Close the document (no save).
  oDoc.Close False
End Sub


Sub ButtonClick()
  Dim oApp
  Dim oDoc
  Dim oMergedDoc
  
  ' Create an instance of Word.     
  Set oApp = CreateObject("Word.Application")
 
  ' Create our data file.
  CreateDataDoc oApp
  
  ' Add a new document.
  Set oDoc = oApp.Documents.Add
  With oDoc.MailMerge
    ' Add our fields.
    .Fields.Add oApp.Selection.Range, "au_fname"
    oApp.Selection.TypeText " "
    .Fields.Add oApp.Selection.Range, "au_lname"
    oApp.Selection.TypeParagraph
    .Fields.Add oApp.Selection.Range, "city"
    oApp.Selection.TypeText ", "
    .Fields.Add oApp.Selection.Range, "state"
    oApp.Selection.TypeParagraph
    .Fields.Add oApp.Selection.Range, "zip"
    oApp.Selection.TypeParagraph
           
    ' Create an autotext entry.
    Dim oAutoText
    Set oAutoText = oApp.NormalTemplate.AutoTextEntries.Add _
    ("MyLabelLayout", oDoc.Content)
    oDoc.Content.Delete
    .MainDocumentType = 1  ' 1 = wdMailingLabels
         
    ' Open the saved data source.
    .OpenDataSource "C:\data.doc"

    ' Create a new document.
    oApp.MailingLabel.CreateNewDocument "5160", "", _
         "MyLabelLayout", , 4  ' 4 = wdPrinterManualFeed

    .Destination = 0  ' 0 = wdSendToNewDocument
    ' Execute the mail merge.
    .Execute

    oAutoText.Delete
  End With
       
  ' Close the mail merge edit document.
  oDoc.Close False
  ' Get the current document.
  Set oMergedDoc = oApp.ActiveDocument
  ' Show Word to the user.
  oApp.Visible = True
  
  ' Uncomment these lines to save the merged document locally.
  'oMergedDoc.SaveAs "C:\test.doc"
  'oMergedDoc.Close False
  'oApp.Quit False
End Sub
</SCRIPT>
<INPUT type=button value="Create Word Document" onclick="VBScript:ButtonClick">
</BODY>
</HTML>

A�a��da verilen kod i�eren getdata.asp adl� bir dosya olu�turmak i�in Not Defteri'ni kullan�n. Dosyay� WordMailMerge sanal dizine kaydedin.

<%@ Language=VBScript %>
<%
  Dim oConn,oRS,strConn,sSQLServer
  
  ' Build the connection string. Replace <username> and <strong password> with
  ' the username and password of an account that has permissions on the database.
  sSQLServer = "<servername>"
  strConn = "Provider=SQLOLEDB.1;Persist Security Info=False;" & _
            "User ID=<username>;Password=<strong password>;Initial Catalog=pubs;Data Source=" & sSQLServer
  ' Set our return content type.
  Response.ContentType = "text/xml"
  
  ' Create a connection.
  set oConn = Server.CreateObject("ADODB.Connection")
  ' Open the connection.
  oConn.Open strConn
  ' Execute the SQL statement.
  set oRS = oConn.Execute(�SELECT * FROM AUTHORS�)
  ' Save the recordset in the Response object.
  oRS.Save Response,1
%>

Web sunucunuza i�aret edecek bi�imde default.ASP sServer de�i�keni de�i�tirmek ve sSQLServer de�i�keni getdata.asp i�in SQL Server'� i�aret edecek bi�imde de�i�tirin.
�nternet Explorer'� ba�lat�n ve http:// i�in g�zat�n <sunucuad� > /WordMailMerge/Default.asp(WHERE <sunucuad� > Web sunucunuzun ad�d�r).
Word otomatik hale getirmek ve adres-mektup birle�tirme ger�ekle�tirmek i�in Web sayfas�ndaki d��meyi t�klat�n. Otomasyon i�lemi tamamland��nda, Word adres-mektup birle�tirme sonu�lanan mektup etiketlerini i�eren yeni bir belge g�r�nt�lenir.

�ste

Referanslar

Daha fazla bilgi i�in, Microsoft Bilgi Bankas�'ndaki makaleleri g�r�nt�lemek �zere a�a��daki makale numaralar�n� t�klat�n:

195826� (http://support.microsoft.com/kb/195826/ ) CreateObject istemci taraf�nda �al��an komut dosyalar� ba�ar�s�z olur.

258512� (http://support.microsoft.com/kb/258512/ ) Word'deki Adres mektup birle�tirme i�in posta etiketleri olu�turmak i�in Visual Basic otomatikle�tirme

278260� (http://support.microsoft.com/kb/278260/ ) Word otomatik hale getirmek ve adres mektup birle�tirme i�in posta etiketleri olu�turmak i�in Microsoft Foundation Classes (MFC) nas�l kullan�l�r

263247� (http://support.microsoft.com/kb/263247/ ) Bir ADO kay�t k�mesini XML'DEN nas�l elde edilir

252767� (http://support.microsoft.com/kb/252767/ ) Visual Basic'te bir ADO kay�t k�mesi XML betimlemesi alma

�ste

Bu makaledeki bilginin uyguland�� durum:

Microsoft Office Word 2007
Microsoft Office Word 2003
Microsoft Word 2000 Standard Edition
Microsoft ActiveX Data Objects 2.6
Microsoft ActiveX Data Objects 2.5
Microsoft Active Server Pages 4.0

�ste

kbmt kbmerge kbexpertiseinter kbautomation kbhowto KB285176 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:285176� (http://support.microsoft.com/kb/285176/en-us/ )

�ste

This site in other countries/regions:

Word, XML, SQL Server'� kullanarak bir istemci taraf� posta birle�tirme ger�ekle�tirmek i�in otomatikle�tirme

Bu Sayfada

�zet

Daha fazla bilgi

�RNEK

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:

Word, XML, SQL Server'� kullanarak bir istemci taraf� posta birle�tirme ger�ekle�tirmek i�in otomatikle�tirme

Bu Sayfada

�zet

Daha fazla bilgi

�RNEK

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: