Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Viewing Word documents from VFP
Message
De
21/06/2000 08:32:16
 
 
À
19/06/2000 15:24:13
Information générale
Forum:
Visual FoxPro
Catégorie:
Fonctions Windows API
Divers
Thread ID:
00376075
Message ID:
00382619
Vues:
72
Sam:

Oops!! This is the CONSTANTS.H file that I forgot to include earlier this morning.

* ------------------------------------- *
* -- -- *
* -- Registry -- *
* -- -------- -- *
* -- -- *
* ------------------------------------- *

* --------------------------
* -- Registry access rights
* ---------------------------
#DEFINE REGKEY_QUERYVALUE 1
#DEFINE REGKEY_SETVALUE 2
#DEFINE REGKEY_CREATESUBKEY 4
#DEFINE REGKEY_ENUMERATESUBKEYS 8
#DEFINE REGKEY_NOTIFY 16
#DEFINE REGKEY_CREATELINK 32

* -----------------------------------
* -- Registry compound access rights
* -----------------------------------
#DEFINE REGKEY_READ REGKEY_QUERYVALUE + REGKEY_ENUMERATESUBKEYS + REGKEY_NOTIFY
#DEFINE REGKEY_WRITE REGKEY_CREATESUBKEY + REGKEY_SETVALUE

* -----------------------------------
* -- System registry pre-opened keys
* -----------------------------------
#DEFINE HKEY_CLASSESROOT -2147483648 && bitset(0,31)
#DEFINE HKEY_CURRENTUSER -2147483647 && bitset(0,31)+1
#DEFINE HKEY_LOCALMACHINE -2147483646 && bitset(0,31)+2
#DEFINE HKEY_USERS -2147483645 && bitset(0,31)+3

* ---------------------------
* -- System Registry SubKeys
* ---------------------------
#DEFINE REGKEY_WINWORDPATH "Software\Microsoft\Windows\CurrentVersion\App Paths\WinWord.Exe"

* --------------
*-- Error Codes
* --------------
#DEFINE REGERROR_SUCCESS 0 && OK

* --------------------------
*-- Registry Key Data types
* --------------------------
#DEFINE REG_SZ 1 && Data string
#DEFINE REG_BINARY 3 && Binary data in any form.
#DEFINE REG_DWORD 4 && A 32-bit number.

* --------------------------------------
*-- Disposition Values (RegCreateKeyEx)
* --------------------------------------
#DEFINE REGDISP_CREATEDNEWKEY 1 && New Registry Key created
#DEFINE REGDISP_OPENEDEXISTINGKEY 2 && Existing Key opened


* ------------------------------------- *
* -- -- *
* -- File Attributes -- *
* -- --------------- -- *
* -- -- *
* ------------------------------------- *

#DEFINE FILEATTRIB_READONLY 1
#DEFINE FILEATTRIB_HIDDEN 2
#DEFINE FILEATTRIB_SYSTEM 4
#DEFINE FILEATTRIB_ARCHIVE 32
#DEFINE FILEATTRIB_NORMAL 128
#DEFINE FILEATTRIB_TEMPORARY 256


* ------------------------------------- *
* -- -- *
* -- O/S Errors -- *
* -- ---------- -- *
* -- -- *
* ------------------------------------- *

#DEFINE ERROR_ALREADY_EXISTS 183


* ------------------------------------- *
* -- -- *
* -- Word Automation -- *
* -- --------------- -- *
* -- -- *
* ------------------------------------- *

* ------------------
* -- Logical values
* ------------------
#DEFINE wdFalse 0
#DEFINE wdTrue 1

* ----------------------
* -- WindowState values
* ----------------------
#DEFINE wdWindowStateMaximize 1
#DEFINE wdWindowStateMinimize 2
#DEFINE wdWindowStateNormal 0

* ---------------
* -- SaveOptions
* ---------------
#DEFINE wdDoNotSaveChanges 0
#DEFINE wdPromptToSaveChanges -2
#DEFINE wdSaveChanges -1

* ------------------------------
* -- MailMerge MainDocumentType
* ------------------------------
#DEFINE wdFormLetters 0
#DEFINE wdMailingLabels 1
#DEFINE wdEnvelopes 2
#DEFINE wdCatalog 3
#DEFINE wdNotAMergeDocument -1

* ----------------------------
* -- MailMergeDataSource Type
* ----------------------------
#DEFINE wdMergeInfoFromWord 0
#DEFINE wdMergeInfoFromAccessDDE 1
#DEFINE wdMergeInfoFromExcelDDE 2
#DEFINE wdMergeInfoFromMSQueryDDE 3
#DEFINE wdMergeInfoFromODBC 4
#DEFINE wdNoMergeInfo -1

* -----------------------------------
* -- MailMergeDataSource FirstRecord
* -----------------------------------
#DEFINE wdDefaultFirstRecord 0

* -----------------------------------
* -- MailMergeDataSource LastRecord
* -----------------------------------
#DEFINE wdDefaultLastRecord -16

* -----------------------------------
* -- MailMerge.OpenDataSource Format
* -----------------------------------
#DEFINE wdOpenFormatAuto 0
#DEFINE wdOpenFormatDocument 1
#DEFINE wdOpenFormatTemplate 2
#DEFINE wdOpenFormatRTF 3
#DEFINE wdOpenFormatText 4
#DEFINE wdOpenFormatUnicodeText 5

* -------------------------
* -- MailMerge Destination
* -------------------------
#DEFINE wdSendToNewDocument 0
#DEFINE wdSendToPrinter 1
#DEFINE wdSendToEmail 2
#DEFINE wdSendToFax 3
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform