Re: [de-users] Base friert beim Aufruf eines Makros ein [Win7]

Muss den Code noch mal korrigieren:

        Path = createunoservice("com.sun.star.util.PathSettings")
        
        sDrive="Y:/"
        'sDrive=ConvertFromUrl(Path.Work & getPathSeparator())
        
        wait(200)
        'msgbox "TEST vor"
        If ismissing(sPath) then
                sPath = sDrive & "MMB\allgemeine Korrespondenz"
        End If
        
        'msgbox "TEST mitte"
        wait(200)

        If not FileExists(sPath) Then
        msgbox "TEXT 3"
                Mkdir(sPath)
                If not FileExists(sPath) Then
                        sPath = Path.work
                End If
        End If
        wait(200)

Ich benötige alle 3 wait-Kommandos, sonst friert mit LO ein.

Spannenderweise auf Linux (dort wo keine der Netzwerkpfade vorhanden
sind) klappt die Abfrage problemfrei.

Daher vermute ich ganz dringend, dass der Fehler in der Abfrage der
Netzlaufwerke liegt, wo kein oder kein eindeutiger Rückgabewert kommt,
oder der kommt zu spät...

lg jakob

Am 2015-10-27 um 17:21 schrieb Jakob Schürz:
> Am 2015-10-27 um 16:48 schrieb G. Mohing, VT:
> > N´Abend!
> >
> > Ein WAIT(200) ist aber auch keine Lösung- was wenn´s mal wieder länger
> > dauert?
> > Hier müsste eindeutig ein Wert zurück gegeben werden und/oder nach
> > Zeitüberschreitung eine Msg.
> > Also eindeutig ein LO- Problem.
>
> Wie auch meine Anfangsvermutung war... da es mit den Microsoft-Produkten
> klappt (wie ungern ich das schreibe... :-( )
>
> Ein weiteres Timeout-Problem hab ich auch mit dem Pfad-Objekt
>
> Der Codeabschnitt sieht so aus:
>
>       Path = createunoservice("com.sun.star.util.PathSettings")
>       
>       sDrive="Y:/"
>       'sDrive=ConvertFromUrl(Path.Work & getPathSeparator())
>       
>       wait(200)
>       'msgbox "TEST vor"
>       If ismissing(sPath) then
>               sPath = sDrive & "MMB\allgemeine Korrespondenz"
>       End If
>
>
> egal welche der beiden "sDrive"-Zeilen ich aktiviere (also lokaler Pfad
> oder Remote-Pfad zu einem Network-Drive) ohne dem wait(200) produziert
> LO Freezes. In LO 5.0.2 wesentlich öfter als mit LO 4.5.
>
> Es wirkt auf mich so, als ob der Pfad-Service noch nicht voll
> initialisiert ist (sagt man da so?) bevor auf es zugegriffen wird. Ich
> müsst jetzt noch einmal nachsehen, ob bei den Pfaden auch welche zu
> Netzlaufwerken dabei sind... Das würde es wiederum erklären.
>
> Dann würde ich den Fehler eindeutig dort lokalisieren, wo LO auf
> Netzlaufwerke zugreift und entweder zu kurze Timeouts hat, und/oder
> keine eindeutigen Rückgabewerte liefert...
>
> Lesen hier Entwickler mit?
> Soll ich es auch an diese Liste users@de.openoffice.org  schicken?
>
> lg jakob



-- 
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert