DialogFilterAssistant

Beschreibung:

Auswahl eines Filters, um diesen zu bearbeiten. Anschliessend wird der bearbeitete Filter gespeichert.

VBScript:

Dim sFilterFileToLoad : sFilterFileToLoad = cRM.DialogSelectFile("Auswahl zu bearbeitender Filter", True, "", "Filter (*.crmshare)|*.crmshare|Alle Dateien|*.*||", 0)

Dim sUserDefinedFilterFile : sUserDefinedFilterFile = cRM.ActiveView.CurrentRecordSet.DialogFilterAssistant("", sFilterFileToLoad, False)

 

If (sUserDefinedFilterFile <> "$CANCEL$" AND InStr(sUserDefinedFilterFile, "$ERROR$") = 0) Then

Dim sNewFilePath : sNewFilePath = cRM.DialogSelectFile("Filterausdruck speichern", False, "", "Filter (*.crmshare)|*.crmshare|Alle Dateien|*.*||", 0)

 

    If (Len(sNewFilePath) > 0) Then

       Dim oFSO : Set oFSO = CreateObject("Scripting.FileSystemObject")

       Call oFSO.MoveFile(sUserDefinedFilterFile, sNewFilePath)

       Set oFSO = Nothing

    End If

 

End If

C#-Script:

string filterFileToLoad = cRM.DialogSelectFile("Auswahl zu bearbeitender Filter", true, "", "Filter (*.crmshare)|*.crmshare|Alle Dateien|*.*||", 0);

string userDefinedFilterFile = cRM.ActiveView.CurrentRecordSet.DialogFilterAssistant("", filterFileToLoad, false);

 

if (userDefinedFilterFile != "$CANCEL$" && !userDefinedFilterFile.Contains("$ERROR$"))

{

string newFilePath = cRM.DialogSelectFile("Filterausdruck speichern", false, "", "Filter (*.crmshare)|*.crmshare|Alle Dateien|*.*||", 0);

 

    if (newFilePath.Length > 0)

    {

        System.IO.File.Move(userDefinedFilterFile, newFilePath);

    }

}

TypeScript:

import { cRM } from "./sdk/combitCRM.SDK.WindowsClient.v13";

import { File } from "./sdk/cosmolink.SDK.FileSystem";

 

let filterFileToLoad: string = cRM.DialogSelectFile("Auswahl zu bearbeitender Filter", true, "", "Filter (*.crmshare)|*.crmshare|Alle Dateien|*.*||", 0);

let userDefinedFilterFile: string = cRM.ActiveView.CurrentRecordSet.DialogFilterAssistant("", filterFileToLoad, false);

 

if (userDefinedFilterFile != "$CANCEL$" && !userDefinedFilterFile.includes("$ERROR$"))

{

let newFilePath: string = cRM.DialogSelectFile("Filterausdruck speichern", false, "", "Filter (*.crmshare)|*.crmshare|Alle Dateien|*.*||", 0);

 

    if (newFilePath.length > 0)

    {

        await File.moveAsync(userDefinedFilterFile, newFilePath);

    }

}