vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: DDE Poke / DDE Initiate ???? 
Autor: brave@heart
Datum: 20.03.03 02:11

wie wäre es denn hiermit?
[color=000080]Private Sub [/color][color=000000]VerschickeFax(Destination$, _
  ProgFax$) [/color]
[color=000000]    [/color][color=000080]Dim [/color][color=000000]canal [/color]
[color=000000]    [/color][color=000080]Dim [/color][color=000000]SendTime$ _
  [/color]
[color=000000]    SendTime$ = "03:00:00" [/color]
[color=000000]    [/color][color=000080]If [/color][color=000000]CInt(Left( _
  Time, 2)) >= 14 [/color][color=000080]And [/color][color=000000]CInt(Left( _
  Time, 2)) <= 16 [/color][color=000080]Then [/color]
[color=000000]        [/color][color=000080]If [/color][color=000000]ProgFax$ _
<> "Printer" [/color][color=000080]Then [/color]
[color=000000]            [/color][color=000080]If _
[/color][color=000000]ProgFax$ = "E-FAX" [/color][color=000080]Then [/color]
[color=000000]                canal = WordBasic.DDEInitiate("Eclipse FAX" & _
"Manager", "SEND") [/color]
[color=000000]                WordBasic.DDEPoke canal, "SEND", Destination$ _
[/color]
[color=000000]            [/color][color=000080]Else [/color]
[color=000000]                canal = WordBasic.DDEInitiate("FAXMNG", _
  "TRANSMIT") [/color]
[color=000000]                WordBasic.DDEPoke canal, "SENDFAX", "recipient(" _
+ Chr(34) + SendTime$ + Chr(34) + ", " + Chr(34) + Destination$ + Chr(34) + ")" _
[/color]
[color=000000]            [/color][color=000080]End If [/color]
[color=000000]            WordBasic.DDETerminate (canal) [/color]
[color=000000]        [/color][color=000080]End If [/color]
[color=000000]    [/color][color=000080]End If [/color]
[color=000000]    Imprime [/color]
[color=000080]End Sub [/color]
oder kann es vielleicht sein das die reihenfolge nicht stimmt?
recipient("03:00:00", "040-384467")
ich hab keine ahnung ob das auf euer faxprogramm zutrifft, nur hier:
http://www.dbase2000.com/Knowledgebase/v5_docs/FAX.txt
ist die reihenfolge anders. die nummer als erstes, dann die anderen
parameter wie zeit, datum, usw.
Recipient("Fax Number", "Time", "Date", "Name", "Company", "Subject", "Keywords", "Billing Code")

mfg
brave@heart

...bis zur unendlichkeit und noch viel weiter...

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Makro: Programmaufruf zeitgesteuert?760Angelika_2603.03.03 10:05
Re: Makro: Programmaufruf zeitgesteuert?561Marcus W03.03.03 20:42
Re: Makro: Programmaufruf zeitgesteuert?530Angelika_2619.03.03 08:42
DDE Poke / DDE Initiate ????515Angelika_2619.03.03 13:50
Re: DDE Poke / DDE Initiate ????575unbekannt19.03.03 14:20
Re: DDE Poke / DDE Initiate ????601Angelika_2619.03.03 14:29
Re: DDE Poke / DDE Initiate ????703brave@heart20.03.03 02:11
nachtrag523brave@heart20.03.03 02:25
Re: DDE Poke/DDE Initiate559Angelika_2620.03.03 08:38
Es läuft 477Angelika_2620.03.03 14:31

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel