OVH Cloud OVH Cloud

VB avec Word

3 réponses
Avatar
Jean-Paul
J'ai cr=E9=E9 une application en VB6 sous WindowsXP et=20
communiquant avec office 2002, J'utilise une connection=20
ODBC et les fonctions de publipostage de word :
With ActiveDocument.MailMerge
Dim strConnection As String
.MainDocumentType =3D wdFormLetters
strConnection =3D "DSN=3DMADSN;" _
& "DBQ=3DC:\secteurs\mabase.mdb;" _
& "FIL=3DredISAM,"
.OpenDataSource =20
Name:=3D"C:\secteurs\mabase.mdb", _
Connection:=3DstrConnection, _
SQLStatement:=3D"SELECT * FROM `TABLE`"
End With

Mon ex=E9cutable plante sur des machines avec Win2k et word=20
2000 sur la ligne ci-dessus ?

3 réponses

Avatar
Pascal B.
Bonjour JP

La syntaxe de la ligne me semble douteuse, écris ceci:

Connection:=strConnection, _
SQLStatement:="SELECT * FROM [TABLE]"


Pascal


"Jean-Paul" a écrit dans le message de news:14de201c3fa22$0712cad0$
J'ai créé une application en VB6 sous WindowsXP et
communiquant avec office 2002, J'utilise une connection
ODBC et les fonctions de publipostage de word :
With ActiveDocument.MailMerge
Dim strConnection As String
.MainDocumentType = wdFormLetters
strConnection = "DSN=MADSN;" _
& "DBQ=C:secteursmabase.mdb;" _
& "FIL=redISAM,"
.OpenDataSource
Name:="C:secteursmabase.mdb", _
Connection:=strConnection, _
SQLStatement:="SELECT * FROM `TABLE`"
End With

Mon exécutable plante sur des machines avec Win2k et word
2000 sur la ligne ci-dessus ?
Avatar
Avatar
Merci,

Je vais tester cette syntaxe, mais ce programme marche
trés bien sous XP et Word 2002