Metainformationen zur Seite
  •  

Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

Link zu dieser Vergleichsansicht

Beide Seiten der vorigen RevisionVorhergehende Überarbeitung
Nächste Überarbeitung		Vorhergehende Überarbeitung
speedy:30_modules:script [2024/11/28 12:53] – [ParamName_onBuild(timing, handling, dictionary)] speedyspeedy:30_modules:script [2026/06/12 07:42] (aktuell) – [Speedy.DoFileExport] speedy
Zeile 83: Zeile 83:
 === Application.GetRootPath === === Application.GetRootPath ===
 Gibt den Root Path, wie in der dwKernel.ini eingestellt, zurück. \\ Gibt den Root Path, wie in der dwKernel.ini eingestellt, zurück. \\
-\\+<code vbscript> 
 +rootpath = Application.GetRootPath() 
 +MsgBox "Rootpath = " & rootpath 
 +</code>
  
 === Application.GetVaultCount === === Application.GetVaultCount ===
 Gibt die Anzahl der Vault datenbank zurück. \\ Gibt die Anzahl der Vault datenbank zurück. \\
-\\ +<code vbscript> 
 +count = Application.GetVaultCount() 
 +MsgBox "Vault Count = " & count  
 +</code>
 === Application.GetVaultDbAt(iIndex) === === Application.GetVaultDbAt(iIndex) ===
 Gibt das ADODB.Connection Object der entsprechenden Vault Datenbank zurück. \\ Gibt das ADODB.Connection Object der entsprechenden Vault Datenbank zurück. \\
-\\+<note warning> 
 +Diese Funktion liefert kein Ergebnis, wenn mit dem Datenbank-Direkttreiber „MYSQL“ gearbeitet wird. 
 +</note>
  
 === Application.GetVaultNameAt(iIndex) === === Application.GetVaultNameAt(iIndex) ===
 Gibt den Namen der Vault Datenbank zurück. \\ Gibt den Namen der Vault Datenbank zurück. \\
-\\+<code vbscript> 
 +count = Application.GetVaultCount() 
 +for i=0 to count-1 
 +   name = Application.GetVaultNameAt(i) 
 +   MsgBox "Vault Name [" & i & "] = " & name  
 +next  
 +</code>
  
 === Application.GetTempFileName === === Application.GetTempFileName ===
Zeile 131: Zeile 144:
 === Application.InvokeCommand(sCallBack, wParam, lParam) === === Application.InvokeCommand(sCallBack, wParam, lParam) ===
 Ruft einen speedy Zusatzbefehl auf. \\ Ruft einen speedy Zusatzbefehl auf. \\
-\\+Die Zusatzbefehle werden von den Zusatzmodulen definiert. \\ 
 +^Befehl^Parameter^Beschreibung^ 
 +|OnBomEdit | | Stückliste des aktuell selektierten Objekts bearbeiten | 
 +|OnBomDelete | | |  
 +|OnBomCompare | | |  
 +|OnBomPrint | | |  
 +|OnBomSave | | |  
 +|OnBomShow | | |  
 +|OnBomShowAll | | |  
 +|OnBomShowStructure | | |  
 +|OnEplanImport | | |  
 +|OnProjectBom | | |  
 +|OnEditClass | | |  
 +|LanguageSearch | | | 
 +|LanguageAnalyse | | | 
 +|LanguageEdit | | | 
 +|OnOutput | | | 
 +|ToGo | | | 
 +|GoOffline | | | 
 +|GoOnline | | | 
 +|CompareConflict | | | 
 +|GoOfflineDirect | | | 
 +|GoOnlineDirect | | | 
 +|OnBulkload | | | 
 +| | | |
  
 === Application.HasCommand(sCallBack) === === Application.HasCommand(sCallBack) ===
Zeile 188: Zeile 225:
 Die Funktion liefert kein Ergebnis aus dem SQL-Statement zurück. \\ Die Funktion liefert kein Ergebnis aus dem SQL-Statement zurück. \\
 <code> <code>
-Call DbExecute("", "UPDATE dm_document d inner join dm_version v ON d.doc_did=v.ver_did AND d.doc_rev=v.ver_major AND d.doc_ver=v.ver_minor inner join dm_prop_cad p on v.ver_vid=p.prop_did SET p.NORM = 'DIN 931' WHERE d.doc_docno = 'BS01516';")+Call Application.DbExecute("", "UPDATE dm_document d inner join dm_version v ON d.doc_did=v.ver_did AND d.doc_rev=v.ver_major AND d.doc_ver=v.ver_minor inner join dm_prop_cad p on v.ver_vid=p.prop_did SET p.NORM = 'DIN 931' WHERE d.doc_docno = 'BS01516';")
 </code> </code>
 \\ \\
Zeile 201: Zeile 238:
 Beispiel:  Beispiel: 
 <code vbscript> <code vbscript>
-Call DbQuery(result, "", "SELECT lst_idx,lst_name,lst_desc FROM lng_lst WHERE lst_typ='PROJEKTSTATUS';") +Call Application.DbQuery(result, "", "SELECT lst_idx,lst_name,lst_desc FROM lng_lst WHERE lst_typ='PROJEKTSTATUS';") 
  
 Ergebnis: Ergebnis:
Zeile 232: Zeile 269:
 <code sql>SELECT <Expression> FROM <Domain> WHERE Criteria</code> <code sql>SELECT <Expression> FROM <Domain> WHERE Criteria</code>
 <code vbscript> <code vbscript>
-Call DbLookup(result, "", "MAX(doc_docno)", "dm_document", "") - Liefert die größte Dokumentnummer +Call Application.DbLookup(result, "", "MAX(doc_docno)", "dm_document", "") - Liefert die größte Dokumentnummer 
-Call DbLookup(result, "", "sett_value", "dm_setting", "sett_key='bom.autosorted'")  - Liefert den Einstellungswert des Konfigurationsparameters [bom.autosorted]+Call Application.DbLookup(result, "", "sett_value", "dm_setting", "sett_key='bom.autosorted'")  - Liefert den Einstellungswert des Konfigurationsparameters [bom.autosorted]
 </code> </code>
 +
 +<code vbscript>
 +If Application.DbLookup(result, "", "MAX(doc_docno)", "dm_document", "") = 0 Then 
 +   MsgBox "Die Datenbank enthält " & CLng(result) & " Dokumente"
 +End If
 +</code>
 +
 \\ \\
  
Zeile 258: Zeile 302:
 s = Application.GetDocumentProperty(dictionary.item("dm_docno"), “projectcontainer.PROJECTMANAGER“) s = Application.GetDocumentProperty(dictionary.item("dm_docno"), “projectcontainer.PROJECTMANAGER“)
 </code> </code>
-\\+ 
 +=== Application.DumpDictionary(File, Dictionary) === 
 +Schreibt den Inhalt des Dictionaries in die Datei //File//. 
 + 
 +=== Application.ShowDictionary(Title, Dictionary) === 
 +Zeigt den Inhalt des Dictionaries in einem Dialog an.  
  
 ==== Clipboard - Objekt ==== ==== Clipboard - Objekt ====
 Globales Objekt mit Funktionen zur Zwischenablage. Globales Objekt mit Funktionen zur Zwischenablage.
 +
 === Clipboard.Clear === === Clipboard.Clear ===
 Leert die Zwischenablage Leert die Zwischenablage
-\\ 
  
 === Clipboard.Copy(Text) === === Clipboard.Copy(Text) ===
 Kopiert den Text in die Zwischenablage Kopiert den Text in die Zwischenablage
-\\ 
  
 === Clipboard.Paste === === Clipboard.Paste ===
Zeile 274: Zeile 323:
 <code VBScript>Text = Clipboard.Paste()</code> <code VBScript>Text = Clipboard.Paste()</code>
 \\ \\
 +
 +==== Path - Objekt ====
 +Globales Objekt mit Funktionen zu Pfadangaben und Dateinamen.
 +
 +=== String Path.AddBackslash(String pszPath) === 
 +=== String Path.AddExtension(String  pszPath, String pszExt) === 
 +=== String Path.Append(String  pszPath, String pszMore) === 
 +=== String Path.BuildRoot(int   iDrive) === 
 +=== String Path.Combine(String pszDir, String pszFile) === 
 +=== Boolean Path.FileExists(String pszPath) === 
 +=== String Path.FindExtension(String pszPath) === 
 +=== String Path.FindFileName(String pszPath) === 
 +=== Boolean Path.IsDirectory(String pszPath) === 
 +=== Boolean Path.IsFileSpec(String pszPath) === 
 +=== Boolean Path.IsPrefix(String pszPrefix, String pszPath) === 
 +=== Boolean Path.IsRelative(String pszPath) === 
 +=== Boolean Path.IsRoot(String pszPath) === 
 +=== Boolean Path.IsSameRoot(String pszPath1, String pszPath2) === 
 +=== Boolean Path.IsSystemFolder(String pszPath, Integer  dwAttrb) === 
 +=== Boolean Path.IsUNC(String pszPath) === 
 +=== Boolean Path.IsURL(String pszPath) === 
 +=== String Path.MakePretty(String pszPath) === 
 +=== Boolean Path.MatchSpec(String pszFile,String pszSpec) === 
 +=== String Path.QuoteSpaces(String lpsz) === 
 +=== String Path.RelativePathTo(String pszFrom, Integer  dwAttrFrom, String pszTo, Integer  dwAttrTo) === 
 +=== String Path.RemoveArgs(String pszPath) === 
 +=== String Path.RemoveBackslash(String pszPath) === 
 +=== String Path.RemoveExtension(String pszPath) === 
 +=== String Path.RemoveFileSpec(String pszPath) === 
 +=== String Path.RenameExtension(String  pszPath, String pszExt) === 
 +=== String Path.SkipRoot(String pszPath) === 
 +=== String Path.StripPath(String pszPath) === 
 +=== String Path.StripToRoot(String pszPath) === 
 +=== String Path.Undecorate(String pszPath) === 
 +=== String Path.UnquoteSpaces(String lpsz) === 
 +
 +
 +
 +==== Shell - Objekt ====
 +Globales Objekt mit Funktionen zur Windows-Shell.
 +
 +=== Shell.ExecuteCommand(Command, bVisible, iWait, CurrentDirectory) ===
 +Führt ein Programm (Command) aus.
 \\ \\
  
 +==== Speedy - Objekt ====
 +Globales Objekt mit speziellen speedy-Funktionen rundum Dokumente.
 +
 +=== Speedy.DoFileView ===
 +=== Speedy.DoFileOpen ===
 +=== Speedy.DoFileCheckout ===
 +=== Speedy.DoFileCheckoutIn ===
 +=== Speedy.DoFilePendingapproval ===
 +=== Speedy.DoFileApprove ===
 +=== Speedy.DoFileRelease ===
 +=== Speedy.DoFileRevokeRelease ===
 +=== Speedy.DoFileCheckin ===
 +=== Speedy.DoFileProperties ===
 +=== Speedy.DoFileAttachDirect ===
 +=== Speedy.DoFileAttach ===
 +=== Speedy.DoCheckInWorkspace ===
 +=== Speedy.DoShellOpen ===
 +=== Speedy.DoOpenLinkToOrigin ===
 +=== Speedy.FindOrigin ===
 +=== Speedy.DoCreateFileFromTemplate ===
 +=== Speedy.ActivateExplorer ===
 +
 +
 +=== Speedy.DoCopyOut ===
 +
 +Boolean Speedy.DoCopyOut(String Docno, String FileOrExt, String Path)
 +
 +=== Speedy.DoFileExport ===
 +Exportiert die Dokumente (siehe auch [[speedy:10_explorer:20_documents#exportieren|]])
 +
 +Speedy.DoFileExport(ByRef Result, ByVal Documents, ByVal DocTypes, ByVal Extensions, ByVal Target, ByVal Options)
 +
 +Return Boolean \\
 +True := Export war erfolgreich \\
 +False := Es ist ein Fehler aufgetreten
 +
 +^Paramter^Beschreibung^
 +|Result | Liste der exportierten Dateien. |
 +|Documents | Liste der zu exportierenden Dokumente. |
 +|DocTypes | Liste der zulässigen Dokumenttypen. |
 +|Extensions | Liste der zulässigen Dateiendungen. |
 +|Target | Zielverzeichnis, wenn in ein Verzeichnis exportiert werden soll. \\ Zieldatei (zip), wenn in eine Zipdatei exportiert werden soll. |
 +|Options | Export-Optionen |
 +
 +Optionen
 +^Option^Beschreibung^
 +|zipped | Als Zip packen. Wenn nicht definiert entscheidet die Dateiendung von Target. true/false |
 +|sendmail | Als Email versenden. true/false |
 +|versiontype | -3 := ActiveVersion \\ -2 := CurrentVersion \\ -1 := LastRevision \\ >=0 := Revision |
 +|buildstructure | Struktur erhalten true/false |
 +|undecorate |  |
 +|prefix | |
 +|suffix | |
 +
 +<code vbscript>
 +Documents = "202601-A00-0001"
 +DocTypes = "A;B;E"
 +Extensions = ".pdf;.step"
 +Target = "c:\temp\export"
 +Options = "buildstructure=true;undecorate=true"
 +
 +if Speedy.DoFileExport(Result, Documents, DocTypes, Extensions, Target, Options) then
 +end if
 +</code>
 +
 +\\ 
 +
 +==== Pdf - Objekt ====
 +Globales Objekt mit speziellen Pdf-Funktionen.
 +
 +=== Pdf.Stamp ===
 +
 +Boolean Pdf.Stamp(String PdfSource, String StampTemplate, String Docno, String PdfTarget, Long nOption)
 +
 +
 +=== Pdf.MergeFiles ===
 +
 +Boolean Pdf.MergeFiles(StringArray Files, ByRef Variant Target, Boolean DeleteSource)
 +
 +=== Pdf.MergePath ===
 +
 +Boolean Pdf.MergePath(String InputWildcard, String Target, Boolean DeleteSource)
 +
 +
 +=== Pdf.Multistamp ===
 +
 +Boolean Pdf.Multistamp(String PdfFile, String StampFile, String Target)
 +
 +
 +=== Pdf.GetTotalPageCount ===
 +
 +Long Pdf.GetTotalPageCount(String Filename)
 +=== Pdf.GetPageInfo ===
 +
 +Boolean Pdf.GetPageInfo(String Filename, Long nPage, ByRef Variant dAngle, ByRef Variant dWidth, ByRef Variant dHeight)
 +=== Pdf.GetPageFormat ===
 +
 +String Pdf.GetPageFormat(Double width, Double height)
  
 +\\ \\ \\ 
 ===== speedy.* ===== ===== speedy.* =====
  
Zeile 813: Zeile 1004:
 Das Dictionary enthält die Eigenschaften des Dokuments sowie die Eigenschaften des Dateiobjekts. \\ Die internen Eigenschaften Dateiobjekts beginnen mit "file_".  Die zusätzlichen Eigenschaften des Dateiobjekts beginnen mit "file." damit keine Überschneidung mit den Zusatzeigenschaften des Dokuments bestehen. \\  Das Dictionary enthält die Eigenschaften des Dokuments sowie die Eigenschaften des Dateiobjekts. \\ Die internen Eigenschaften Dateiobjekts beginnen mit "file_".  Die zusätzlichen Eigenschaften des Dateiobjekts beginnen mit "file." damit keine Überschneidung mit den Zusatzeigenschaften des Dokuments bestehen. \\ 
 Wenn das timing-Argument den Wert kUpdateUI hat kann der Dictionary Eintrag für den "target" durch einen neuen Dateinamen inkl. Pfadangabe ersetzt werden. Wurde das Exportziel "target" verändert muss das Argument handling den Wert kEventHandled erhalten. \\ z.B.: \\ Wenn das timing-Argument den Wert kUpdateUI hat kann der Dictionary Eintrag für den "target" durch einen neuen Dateinamen inkl. Pfadangabe ersetzt werden. Wurde das Exportziel "target" verändert muss das Argument handling den Wert kEventHandled erhalten. \\ z.B.: \\
-<code  VBScript>+<code  vbscript>
 Public Function FileOperations_onFileExport(ByVal timing, handling, dictionary) Public Function FileOperations_onFileExport(ByVal timing, handling, dictionary)
    Dim old_target, target, BEN1, ext    Dim old_target, target, BEN1, ext
Zeile 977: Zeile 1168:
 |dictionary|Übergibt das Dictionary Objekt| |dictionary|Übergibt das Dictionary Objekt|
 **Rückgabe:** true oder 1 := Das Dictionary enthält Eigenschaften, die in den Dialog zu übernehmen sind. **Rückgabe:** true oder 1 := Das Dictionary enthält Eigenschaften, die in den Dialog zu übernehmen sind.
-<code>+<code vbscript>
 Function OnBrowse(lEventTiming, dictionary) Function OnBrowse(lEventTiming, dictionary)
   OnBrowse = False   OnBrowse = False
Zeile 1010: Zeile 1201:
 \\ \\ \\ \\
  
-=== OnPopulateNew(kBefore, dictionary) ===+=== OnPopulateNew(timing, dictionary) ===
 Wird beim Öffnen des Neu-Dialogs vor dem Erstellen eines neuen Dokuments aufgerufen Wird beim Öffnen des Neu-Dialogs vor dem Erstellen eines neuen Dokuments aufgerufen
 ^Parameter^Beschreibung^ ^Parameter^Beschreibung^
-|kBefore | Zeitpunkt wann die Aktion ausgeführt wird (hier unrelevant) |+|timing | Zeitpunkt wann die Aktion ausgeführt wird (hier unrelevant, immer kBeore) |
 |dictionary | Übergibt das Dictionary Objekt | |dictionary | Übergibt das Dictionary Objekt |
 **Rückgabe:** 1 := Das Dictionary enthält Eigenschaften, die in den Dialog zu übernehmen sind. **Rückgabe:** 1 := Das Dictionary enthält Eigenschaften, die in den Dialog zu übernehmen sind.