473,569 Members | 2,477 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

Sample VB .NET source code to create mailing labels or customized letters using MS Word MailMerge

Sample VB .NET source code to create mailing labels or customized letters
using MS Word MailMerge

This VB .NET source code will start MS Word and call methods and set
properties in MS Word to execute a MailMerge to create mailing labels or
customized letters.

A label name known to MS Word MailMerge mailing label wizard may be used or
a template file containing the field names Line1 thru Line5 for each record
to be printed. If a template file is used ("bUseTemplate" =True),
"strLabelNa me" contains the full path filename to the template file
otherwise it contains a label name known to the MS Word MailMerge mailing
label wizard (e.g. "5162").

The "strFileNam e" parameter contains the full path filename to a data file
containing TAB delimited records with exactly 5 fields in each record. Each
record contains the name and address information. The first record of the
data file contains the field names (Line1, Line2, Line3, Line4, Line5)
delimited by a TAB character.

The "wd_AlignmentCo de" parameter and the "intOffset" parameter are used only
when "bUseTempla te" is False. They specify the alignment of the fields
within the label and their offset from the left margin of the label table
cell respectively. "intOffset" is specified in inches.

Add References to:
Microsoft Word 10.0 Object Library
Microsoft Office 10.0 Object Library
or equivalent for older or newer releases of MS Office

Imports:
Microsoft.Visua lBasic
_______________ _______________ _______________ ________
Sub CreateWordMailM erge(ByVal strLabelName As String, _
ByVal wd_AlignmentCod e As Word.WdCellVert icalAlignment, _
ByVal intOffset As Single, _
ByVal strFileName As String, _
ByVal bUseTemplate As Boolean)
Dim oApp As Word.Applicatio n
Dim oDoc As Word.Document
Dim x As Integer
Dim bOK As Boolean = False
Dim oAutoText As Word.AutoTextEn try

Try
'Start a new document in Word
oApp = CType(CreateObj ect("Word.Appli cation"), Word.Applicatio n)
If bUseTemplate Then
Try
oDoc = oApp.Documents. Open(CType(strL abelName,
System.Object), False, True, _
False, , , True, , , _
Word.WdOpenForm at.wdOpenFormat Document,
, True)
Catch MyException As System.Exceptio n
MsgBox(String.C oncat("Unable to open ", strLabelName, _
ControlChars.Cr .ToString, ControlChars.Cr .ToString,
_
"Error Message: ", MyException.Mes sage,
ControlChars.Cr .ToString, _
"Source: ", MyException.Sou rce,
ControlChars.Cr .ToString, _
"InnerException : ",
MyException.Inn erException.Mes sage, ControlChars.Cr .ToString), _
MsgBoxStyle.Cri tical, "Label Template Open Failure")
CType(oApp, Word._Applicati on).Quit()
oApp = Nothing
Exit Sub
End Try
Else
oDoc = oApp.Documents. Add
End If
oApp.Visible = True ' Make MS Word visible
Application.DoE vents()
' Do MailMerge
With oDoc.MailMerge
If Not bUseTemplate Then
With .Fields
.Add(oApp.Selec tion.Range, "Line1")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line2")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line3")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line4")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line5")
End With
oAutoText =
oApp.NormalTemp late.AutoTextEn tries.Add("word AutoTextTemp", oDoc.Content)
oDoc.Content.De lete()
End If ' If bUseTemplate
' Set up the mail merge type as mailing labels and use
' a tab-delimited text file as the data source.
.MainDocumentTy pe =
Word.WdMailMerg eMainDocType.wd MailingLabels
.OpenDataSource (strFileName, _
Word.WdOpenForm at.wdOpenFormat Text, _
False, True, False, False)
If Not bUseTemplate Then
'
'Create the new document for the labels using the
AutoText entry
'
oApp.MailingLab el.CreateNewDoc ument( _
CType(strLabelN ame, String), _
"", _
"wordAutoTextTe mp", _
False, _
Word.WdPaperTra y.wdPrinterManu alFeed)
End If ' If bUseTemplate
'
'Execute the mail merge to generate the labels.
.Destination =
Word.WdMailMerg eDestination.wd SendToNewDocume nt
.Execute()
'
If Not bUseTemplate Then
'Delete the AutoText entry
oAutoText.Delet e()
End If ' If bUseTemplate
End With
'
'Close the original document so that
'the Mail Merge results are displayed
CType(oDoc, Word._Document) .Close(False)
'
If Not bUseTemplate Then
' Apply vertical alignment
For x = 1 To oApp.ActiveDocu ment.Tables.Cou nt

oApp.ActiveDocu ment.Tables.Ite m(x).Range.Cell s.VerticalAlign ment = _
wd_AlignmentCod e
Next
Application.DoE vents()
For x = 1 To oApp.ActiveDocu ment.Tables.Cou nt
oApp.ActiveDocu ment.Tables.Ite m(x).LeftPaddin g =
oApp.InchesToPo ints(intOffset)
oApp.ActiveDocu ment.Tables.Ite m(x).Rows.LeftI ndent =
oApp.InchesToPo ints(intOffset)
Next
Application.DoE vents()
End If
If oApp.ActiveWind ow.View.Type <> Word.WdViewType .wdPrintView
Then
If oApp.ActiveWind ow.View.SplitSp ecial =
Word.WdSpecialP ane.wdPaneNone Then
oApp.ActiveWind ow.ActivePane.V iew.Type =
Word.WdViewType .wdPrintView
Else
oApp.ActiveWind ow.View.Type =
Word.WdViewType .wdPrintView
End If
End If
'
'Prevent save to Normal template when user exits Word
oApp.NormalTemp late.Saved = True
oApp = Nothing
oDoc = Nothing
Catch MyException As System.Runtime. InteropServices .COMException
MsgBox(String.C oncat("Error occured while communicating with MS
Word", _
ControlChars.Cr .ToString, ControlChars.Cr .ToString, _
"ErrorCode: ", MyException.Err orCode,
ControlChars.Cr .ToString, _
"Error Message: ", MyException.Mes sage,
ControlChars.Cr .ToString, _
"Source: ", MyException.Sou rce, ControlChars.Cr .ToString, _
"StackTrace : ", MyException.Sta ckTrace,
ControlChars.Cr .ToString), _
MsgBoxStyle.Cri tical, "MS Word Problem")
End Try
End Sub



Nov 20 '05 #1
2 13494
Hi,

http://support.microsoft.com/default...b;en-us;301656

Ken
------------------
"Mikey" <Mi***@nospam-nohow-noway.net> wrote in message
news:uS******** ******@TK2MSFTN GP11.phx.gbl...
Sample VB .NET source code to create mailing labels or customized letters
using MS Word MailMerge

This VB .NET source code will start MS Word and call methods and set
properties in MS Word to execute a MailMerge to create mailing labels or
customized letters.

A label name known to MS Word MailMerge mailing label wizard may be used or a template file containing the field names Line1 thru Line5 for each record to be printed. If a template file is used ("bUseTemplate" =True),
"strLabelNa me" contains the full path filename to the template file
otherwise it contains a label name known to the MS Word MailMerge mailing
label wizard (e.g. "5162").

The "strFileNam e" parameter contains the full path filename to a data file
containing TAB delimited records with exactly 5 fields in each record. Each record contains the name and address information. The first record of the
data file contains the field names (Line1, Line2, Line3, Line4, Line5)
delimited by a TAB character.

The "wd_AlignmentCo de" parameter and the "intOffset" parameter are used only when "bUseTempla te" is False. They specify the alignment of the fields
within the label and their offset from the left margin of the label table
cell respectively. "intOffset" is specified in inches.

Add References to:
Microsoft Word 10.0 Object Library
Microsoft Office 10.0 Object Library
or equivalent for older or newer releases of MS Office

Imports:
Microsoft.Visua lBasic
_______________ _______________ _______________ ________
Sub CreateWordMailM erge(ByVal strLabelName As String, _
ByVal wd_AlignmentCod e As Word.WdCellVert icalAlignment, _
ByVal intOffset As Single, _
ByVal strFileName As String, _
ByVal bUseTemplate As Boolean)
Dim oApp As Word.Applicatio n
Dim oDoc As Word.Document
Dim x As Integer
Dim bOK As Boolean = False
Dim oAutoText As Word.AutoTextEn try

Try
'Start a new document in Word
oApp = CType(CreateObj ect("Word.Appli cation"), Word.Applicatio n) If bUseTemplate Then
Try
oDoc = oApp.Documents. Open(CType(strL abelName,
System.Object), False, True, _
False, , , True, , , _
Word.WdOpenForm at.wdOpenFormat Document, , True)
Catch MyException As System.Exceptio n
MsgBox(String.C oncat("Unable to open ", strLabelName, _ ControlChars.Cr .ToString, ControlChars.Cr .ToString, _
"Error Message: ", MyException.Mes sage,
ControlChars.Cr .ToString, _
"Source: ", MyException.Sou rce,
ControlChars.Cr .ToString, _
"InnerException : ",
MyException.Inn erException.Mes sage, ControlChars.Cr .ToString), _
MsgBoxStyle.Cri tical, "Label Template Open Failure") CType(oApp, Word._Applicati on).Quit()
oApp = Nothing
Exit Sub
End Try
Else
oDoc = oApp.Documents. Add
End If
oApp.Visible = True ' Make MS Word visible
Application.DoE vents()
' Do MailMerge
With oDoc.MailMerge
If Not bUseTemplate Then
With .Fields
.Add(oApp.Selec tion.Range, "Line1")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line2")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line3")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line4")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line5")
End With
oAutoText =
oApp.NormalTemp late.AutoTextEn tries.Add("word AutoTextTemp", oDoc.Content)
oDoc.Content.De lete()
End If ' If bUseTemplate
' Set up the mail merge type as mailing labels and use
' a tab-delimited text file as the data source.
.MainDocumentTy pe =
Word.WdMailMerg eMainDocType.wd MailingLabels
.OpenDataSource (strFileName, _
Word.WdOpenForm at.wdOpenFormat Text, _
False, True, False, False)
If Not bUseTemplate Then
'
'Create the new document for the labels using the
AutoText entry
'
oApp.MailingLab el.CreateNewDoc ument( _
CType(strLabelN ame, String), _
"", _
"wordAutoTextTe mp", _
False, _
Word.WdPaperTra y.wdPrinterManu alFeed)
End If ' If bUseTemplate
'
'Execute the mail merge to generate the labels.
.Destination =
Word.WdMailMerg eDestination.wd SendToNewDocume nt
.Execute()
'
If Not bUseTemplate Then
'Delete the AutoText entry
oAutoText.Delet e()
End If ' If bUseTemplate
End With
'
'Close the original document so that
'the Mail Merge results are displayed
CType(oDoc, Word._Document) .Close(False)
'
If Not bUseTemplate Then
' Apply vertical alignment
For x = 1 To oApp.ActiveDocu ment.Tables.Cou nt

oApp.ActiveDocu ment.Tables.Ite m(x).Range.Cell s.VerticalAlign ment = _
wd_AlignmentCod e
Next
Application.DoE vents()
For x = 1 To oApp.ActiveDocu ment.Tables.Cou nt
oApp.ActiveDocu ment.Tables.Ite m(x).LeftPaddin g =
oApp.InchesToPo ints(intOffset)
oApp.ActiveDocu ment.Tables.Ite m(x).Rows.LeftI ndent =
oApp.InchesToPo ints(intOffset)
Next
Application.DoE vents()
End If
If oApp.ActiveWind ow.View.Type <> Word.WdViewType .wdPrintView
Then
If oApp.ActiveWind ow.View.SplitSp ecial =
Word.WdSpecialP ane.wdPaneNone Then
oApp.ActiveWind ow.ActivePane.V iew.Type =
Word.WdViewType .wdPrintView
Else
oApp.ActiveWind ow.View.Type =
Word.WdViewType .wdPrintView
End If
End If
'
'Prevent save to Normal template when user exits Word
oApp.NormalTemp late.Saved = True
oApp = Nothing
oDoc = Nothing
Catch MyException As System.Runtime. InteropServices .COMException
MsgBox(String.C oncat("Error occured while communicating with MS Word", _
ControlChars.Cr .ToString, ControlChars.Cr .ToString, _
"ErrorCode: ", MyException.Err orCode,
ControlChars.Cr .ToString, _
"Error Message: ", MyException.Mes sage,
ControlChars.Cr .ToString, _
"Source: ", MyException.Sou rce, ControlChars.Cr .ToString, _ "StackTrace : ", MyException.Sta ckTrace,
ControlChars.Cr .ToString), _
MsgBoxStyle.Cri tical, "MS Word Problem")
End Try
End Sub


Nov 20 '05 #2
Hi,

http://support.microsoft.com/default...b;en-us;301656

Ken
------------------
"Mikey" <Mi***@nospam-nohow-noway.net> wrote in message
news:uS******** ******@TK2MSFTN GP11.phx.gbl...
Sample VB .NET source code to create mailing labels or customized letters
using MS Word MailMerge

This VB .NET source code will start MS Word and call methods and set
properties in MS Word to execute a MailMerge to create mailing labels or
customized letters.

A label name known to MS Word MailMerge mailing label wizard may be used or a template file containing the field names Line1 thru Line5 for each record to be printed. If a template file is used ("bUseTemplate" =True),
"strLabelNa me" contains the full path filename to the template file
otherwise it contains a label name known to the MS Word MailMerge mailing
label wizard (e.g. "5162").

The "strFileNam e" parameter contains the full path filename to a data file
containing TAB delimited records with exactly 5 fields in each record. Each record contains the name and address information. The first record of the
data file contains the field names (Line1, Line2, Line3, Line4, Line5)
delimited by a TAB character.

The "wd_AlignmentCo de" parameter and the "intOffset" parameter are used only when "bUseTempla te" is False. They specify the alignment of the fields
within the label and their offset from the left margin of the label table
cell respectively. "intOffset" is specified in inches.

Add References to:
Microsoft Word 10.0 Object Library
Microsoft Office 10.0 Object Library
or equivalent for older or newer releases of MS Office

Imports:
Microsoft.Visua lBasic
_______________ _______________ _______________ ________
Sub CreateWordMailM erge(ByVal strLabelName As String, _
ByVal wd_AlignmentCod e As Word.WdCellVert icalAlignment, _
ByVal intOffset As Single, _
ByVal strFileName As String, _
ByVal bUseTemplate As Boolean)
Dim oApp As Word.Applicatio n
Dim oDoc As Word.Document
Dim x As Integer
Dim bOK As Boolean = False
Dim oAutoText As Word.AutoTextEn try

Try
'Start a new document in Word
oApp = CType(CreateObj ect("Word.Appli cation"), Word.Applicatio n) If bUseTemplate Then
Try
oDoc = oApp.Documents. Open(CType(strL abelName,
System.Object), False, True, _
False, , , True, , , _
Word.WdOpenForm at.wdOpenFormat Document, , True)
Catch MyException As System.Exceptio n
MsgBox(String.C oncat("Unable to open ", strLabelName, _ ControlChars.Cr .ToString, ControlChars.Cr .ToString, _
"Error Message: ", MyException.Mes sage,
ControlChars.Cr .ToString, _
"Source: ", MyException.Sou rce,
ControlChars.Cr .ToString, _
"InnerException : ",
MyException.Inn erException.Mes sage, ControlChars.Cr .ToString), _
MsgBoxStyle.Cri tical, "Label Template Open Failure") CType(oApp, Word._Applicati on).Quit()
oApp = Nothing
Exit Sub
End Try
Else
oDoc = oApp.Documents. Add
End If
oApp.Visible = True ' Make MS Word visible
Application.DoE vents()
' Do MailMerge
With oDoc.MailMerge
If Not bUseTemplate Then
With .Fields
.Add(oApp.Selec tion.Range, "Line1")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line2")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line3")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line4")
oApp.Selection. TypeParagraph()
.Add(oApp.Selec tion.Range, "Line5")
End With
oAutoText =
oApp.NormalTemp late.AutoTextEn tries.Add("word AutoTextTemp", oDoc.Content)
oDoc.Content.De lete()
End If ' If bUseTemplate
' Set up the mail merge type as mailing labels and use
' a tab-delimited text file as the data source.
.MainDocumentTy pe =
Word.WdMailMerg eMainDocType.wd MailingLabels
.OpenDataSource (strFileName, _
Word.WdOpenForm at.wdOpenFormat Text, _
False, True, False, False)
If Not bUseTemplate Then
'
'Create the new document for the labels using the
AutoText entry
'
oApp.MailingLab el.CreateNewDoc ument( _
CType(strLabelN ame, String), _
"", _
"wordAutoTextTe mp", _
False, _
Word.WdPaperTra y.wdPrinterManu alFeed)
End If ' If bUseTemplate
'
'Execute the mail merge to generate the labels.
.Destination =
Word.WdMailMerg eDestination.wd SendToNewDocume nt
.Execute()
'
If Not bUseTemplate Then
'Delete the AutoText entry
oAutoText.Delet e()
End If ' If bUseTemplate
End With
'
'Close the original document so that
'the Mail Merge results are displayed
CType(oDoc, Word._Document) .Close(False)
'
If Not bUseTemplate Then
' Apply vertical alignment
For x = 1 To oApp.ActiveDocu ment.Tables.Cou nt

oApp.ActiveDocu ment.Tables.Ite m(x).Range.Cell s.VerticalAlign ment = _
wd_AlignmentCod e
Next
Application.DoE vents()
For x = 1 To oApp.ActiveDocu ment.Tables.Cou nt
oApp.ActiveDocu ment.Tables.Ite m(x).LeftPaddin g =
oApp.InchesToPo ints(intOffset)
oApp.ActiveDocu ment.Tables.Ite m(x).Rows.LeftI ndent =
oApp.InchesToPo ints(intOffset)
Next
Application.DoE vents()
End If
If oApp.ActiveWind ow.View.Type <> Word.WdViewType .wdPrintView
Then
If oApp.ActiveWind ow.View.SplitSp ecial =
Word.WdSpecialP ane.wdPaneNone Then
oApp.ActiveWind ow.ActivePane.V iew.Type =
Word.WdViewType .wdPrintView
Else
oApp.ActiveWind ow.View.Type =
Word.WdViewType .wdPrintView
End If
End If
'
'Prevent save to Normal template when user exits Word
oApp.NormalTemp late.Saved = True
oApp = Nothing
oDoc = Nothing
Catch MyException As System.Runtime. InteropServices .COMException
MsgBox(String.C oncat("Error occured while communicating with MS Word", _
ControlChars.Cr .ToString, ControlChars.Cr .ToString, _
"ErrorCode: ", MyException.Err orCode,
ControlChars.Cr .ToString, _
"Error Message: ", MyException.Mes sage,
ControlChars.Cr .ToString, _
"Source: ", MyException.Sou rce, ControlChars.Cr .ToString, _ "StackTrace : ", MyException.Sta ckTrace,
ControlChars.Cr .ToString), _
MsgBoxStyle.Cri tical, "MS Word Problem")
End Try
End Sub


Nov 20 '05 #3

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

10
2730
by: Frank Millman | last post by:
Hi all I would like some advice, and I hope that the good people on c.l.p will give me the benefit of their experience. I am busy developing an accounting package, using Python and wxPython, together with PostgreSQL on a Unix platform or SQL Server on a Windows platform. I am a qualified accountant and have been developing accounting...
3
4308
by: Grim Reaper | last post by:
I print mailing labels out of Access 2000 databases about 3 to 4 times a week. I have been having problems with one thing since I have been printing mailing labels. I print mailing labels by using a report I created and then printing them on a continuous-feed dot matrix printer. I used the Label Wizard, chose the query I created, picked the...
0
1155
by: Not Me | last post by:
Hi, After viewing data using a gridview (asp.net 2) I would like to send this to a word template for address labels. Can I do this using a mailmerge? or just send the data directly? Any tips would be much appreciated. Chris
0
737
by: Mikey | last post by:
Sample VB .NET source code to create mailing labels or customized letters using MS Word MailMerge This VB .NET source code will start MS Word and call methods and set properties in MS Word to execute a MailMerge to create mailing labels or customized letters. A label name known to MS Word MailMerge mailing label wizard may be used or a...
1
12242
by: John Welch | last post by:
I'm trying to use the Mergit() function from the MS Knowledge base article to merge data from a query or table in my Access 2000 mdb into an existing word merge document. Every time it runs it brings up the dialog "Confirm Data Source", and asks if I want to use OLE, DDE, or ODBC. If I say ODBC, it then asks me for the table name. If I do...
0
1704
by: raypjr | last post by:
Hi everyone. I need a little help with some parts of a word guessing game I'm working on. I have some parts done but unsure about others and could use a little advice. Any help is very much appreciated.Here is the code to give more detail: Dim GameOver As Boolean Dim NumWords As Integer, ThreeWordList(1000) As String,...
1
1893
by: jl2886 | last post by:
Hello. I have two tables and some of the fields are the same. I have one primary key for both, and that is case number. One table is what is called Master_Log...this is the main log. I have another table that is a mailmerge table. This was already created before I designed the access database. I have imported the mailmerge database into the...
3
4999
by: brat33 | last post by:
I am trying to use a command button to automate a process for creating mailing labels from a query in Access 2007, going into word 2007. Current code looks like the following: 'Start MS Word Dim objWord As Word.Application Set objWord = CreateObject("Word.Application") 'Make Application visible With objWord .Visible = True ...
0
7941
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. ...
0
8147
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that...
0
7997
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the...
0
6320
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then...
1
5520
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes...
0
5247
by: conductexam | last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one. At the time of converting from word file to html my equations which are in the word document file was convert...
0
3680
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols. I succeeded, with both firewalls in...
1
2130
by: 6302768590 | last post by:
Hai team i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
1
1238
muto222
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.