tutorials.de Buch-Aktion 05/2012
ERLEDIGT
NEIN
ANTWORTEN
1
ZUGRIFFE
1031
EMPFEHLEN
  • An Twitter übertragen
  • An Facebook übertragen
AUF DIESES THEMA
ANTWORTEN
  1. #1
    DrMueller DrMueller ist offline Mitglied Brokat
    Registriert seit
    Aug 2006
    Beiträge
    396
    Hallo Leute,
    folgendes Problem bei einer Schnittstelle:
    Ich sollte Journale, welche als Word vorliegen, zu PDF konvertieren und dann importieren.
    Das Problem ist jetzt folgendes:
    Beim Dienst ist die Option Lokales Systemkonto leider vom Konzept her nicht gegeben, ich müsste es also mit "Dieses Konto: " und dann einem Benutzerkonto ausführen.

    Ich habe nun testweise mein eigenes genommen, doch leider funktioniert dann folgender Code-Abschnitt nicht mehr:

    Code :
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    
          With novaObj
            .Initialize(PRINTER_NAME, "xxx", "xxx")
            Try
              .AddProfile(PROFILE_DOW)
            Catch ex As Exception
              OutputDebugString(DEBUGSTRING & "Das Druckerprofil " & PROFILE_DOW & " ist bereits vorhanden. Dieses wird nicht hinzugefügt.")
            End Try
            Try
              .SetActiveProfile2(PROFILE_DOW)
              .SetOptionLong2(NOVAPDF_PAPER_OVERRIDE, 1, PROFILE_DOW)
              .SetOptionString2(NOVAPDF_PAGE_ORIENTATION, 1, PROFILE_DOW)
              .SetOptionString2(NOVAPDF_ACTION_OPEN_DOCUMENT, 0, PROFILE_DOW)
              .SetOptionString2(NOVAPDF_SAVE_PROMPT, 0, PROFILE_DOW)
              .SetOptionString2(NOVAPDF_SAVE_FILE, arbeitsDatei.Name, PROFILE_DOW)
              .SetOptionString2(NOVAPDF_SAVE_FOLDER, arbeitsDatei.DirectoryName, PROFILE_DOW)
              .SetOptionString2(NOVAPDF_FILE_CONFLICT, 3, PROFILE_DOW)
              .SetDefaultPrinter()
              .LicenseShellExecuteFile(arbeitsDatei.FullName)
     
              myProcess = New Process
              myProcess.StartInfo.FileName = arbeitsDatei.FullName
              myProcess.StartInfo.Verb = "Print"
              myProcess.StartInfo.CreateNoWindow = True
              myProcess.Start()
              myProcess.WaitForExit(10000)
              myProcess.Close()
            Catch ex As Exception
              OutputDebugString(DEBUGSTRING & "Fehler beim Setzen des Nova-Druckers. Fehler: " & ex.Message)
            End Try
          End With

    Das Problem ist nun das myProcess.Start, denn dieses wird einfach nicht ausgeführt.
    Ich habe Debugstrings vor und nach dem Start hinzugefügt, und es läuft einfach weiter.

    Hat wer eine Idee, wieso myProcess.Start ignoriert wird?
     

  2. #2
    Avatar von Nico Graichen
    Nico Graichen Nico Graichen ist offline aka gemballa
    tutorials.de Moderator
    Registriert seit
    Dec 2003
    Ort
    Pulheim (NRW)
    Beiträge
    3.898
    Blog-Einträge
    34
    Hi,

    Was ist ArbeitsDatei und was steht in FullName?
    Der Pfad zum Word-Doc?
    Wenn das der Fall ist:
    Da du eine Service schreibst, kannst du nicht über Word drucken. Word ist eine GUI-Anwendung und ein Dienst hat keine GUI (gilt auch dann, wenn du dem Prozess sagst, er soll kein Fenster anlegen).
    Bis XP / W2k3 kannst in den Diensten einstellen, dass sie mit dem Desktop interagieren können, dann kannst du auch GUI-Komponenten nutzen.
    Falls du den Dienst aber auch auf Vista oder W2k8 zur Verfügung stellen willst, hast du diese Option nicht mehr.
     
    Grüße Nico
    ----------------------
    Xing
    ----------------------
    Zitat Zitat von Mark Twain (1835-1910)
    Es gibt drei Dinge, die eine Frau aus dem Nichts hervorzaubern kann: einen Hut, einen Salat und einen Ehekrach.
    Zitat Zitat von Mike Wilson - Biographie über Larry Ellison (CEO Oracle)
    The Difference Between God and Larry Ellison: God Doesn't Think He's Larry Ellison

Ähnliche Themen

  1. Dienst Startet nicht Remoting mit HTTP Chanell
    Von lusiphur im Forum .NET Web und Kommunikation
    Antworten: 0
    Letzter Beitrag: 26.01.09, 08:10
  2. Dienst startet nicht! Fehlercode: 1067
    Von Ive im Forum Relationale Datenbanksysteme
    Antworten: 2
    Letzter Beitrag: 12.03.07, 16:14
  3. Antworten: 0
    Letzter Beitrag: 21.10.06, 18:03
  4. MySQL - Dienst startet nicht
    Von exxe im Forum Relationale Datenbanksysteme
    Antworten: 10
    Letzter Beitrag: 19.02.04, 15:41
  5. Dienst startet nicht!
    Von JustinCaze im Forum Office-Anwendungen
    Antworten: 0
    Letzter Beitrag: 04.03.02, 10:18