Set(
startDate,
DateValue(
Text(DatePicker1_2.SelectedDate, "dd-mm-yyyy") & " " &
Text(Value(Dropdown1_6.Selected.Value), "00") & ":" &
Text(Value(Dropdown1_7.Selected.Value), "00")
)
);
Set(
endDate,
DateValue(
Text(DatePicker1_3.SelectedDate, "dd-mm-yy") & " " &
Text(Value(Dropdown1_8.Selected.Value), "00") & ":" &
Text(Value(Dropdown1_9.Selected.Value), "00")
)
);
// Patch-Befehl für das Hinzufügen von Daten in die SharePoint-Liste
If(
IsBlank(cb_PeoplePicker.Selected) || IsBlank(cb_PeoplePicker_1.Selected),
Notify("Bitte wählen Sie einen Wert für Requester und Contact Person aus.", NotificationType.Error),
Patch(
'Besucheranmeldung PowerApps - testing',
Defaults('Besucheranmeldung PowerApps - testing'),
{
Requester: {
'@odata.type': "#Microsoft.Azure.Connectors.SharePoint.SPListExpandedUser",
Claims: "i:0#.f|membership|" & cb_PeoplePicker.Selected.Mail,
Department: "",
DisplayName: cb_PeoplePicker.Selected.DisplayName,
Email: cb_PeoplePicker.Selected.Mail,
JobTitle: "",
Picture: ""
},
'Grammer Location visited': Dropdown1_3.Selected.Value,
'Contact Person':{
'@odata.type': "#Microsoft.Azure.Connectors.SharePoint.SPListExpandedUser",
Claims: "i:0#.f|membership|" & cb_PeoplePicker_1.Selected.Mail,
Department: "",
DisplayName: cb_PeoplePicker_1.Selected.DisplayName,
Email: cb_PeoplePicker_1.Selected.Mail,
JobTitle: "",
Picture: ""
},
'Day of Arrival': DateTimeValue(Text(startDate, "[$-en-US]dd/mm/yyyy HH:mm")),
'Day of Departure': DateTimeValue(Text(endDate, "[$-en-US]dd/mm/yyyy HH:mm")),
Creator: varCurrentUser,
'More then 1 Visitor': Dropdown1_13.Selected.Value,
VisitorName1: TextInput1_6.Text,
VisitorName2: TextInput1_9.Text,
VisitorName3: TextInput1_10.Text,
VisitorName4: TextInput1_13.Text,
VisitorName5: TextInput1_16.Text,
'More then 1 Company': Dropdown1_14.Selected.Value,
CompanyName1: TextInput1_21.Text,
CompanyName2: TextInput1_22.Text,
CompanyName3: TextInput1_23.Text,
CompanyName4: TextInput1_24.Text,
CompanyName5: TextInput1_25.Text,
VisitorEmail1: TextInput1_14.Text,
VisitorEmail2: TextInput1_26.Text,
VisitorEmail3: TextInput1_27.Text,
VisitorEmail4: TextInput1_28.Text,
VisitorEmail5: TextInput1_29.Text,
'Reason of visit': TextInputCanvas1.Value,
'Wifi Access needed': Checkbox2_8.Value,
'Number of Accesses': Value(NumberInput1_8.Value),
'Area which is visited': If(
IsEmpty(ComboboxCanvas2_1.SelectedItems),
Blank(),
Concat(ComboboxCanvas2_1.SelectedItems, Value & ", ")
),
'Exact area visited:': If(
IsEmpty(ComboboxCanvas2.SelectedItems),
Blank(),
Concat(ComboboxCanvas2.SelectedItems, Value & ", ")
)
}
);
// Kalender-Event erstellen
Office365Outlook.V4CalendarPostItem(
"Calendar", // Kalendername
"Besucheranmeldung - " & ComboboxCanvas2.Selected.Value & " - " & ComboboxCanvas2_1.Selected.Value, // Betreff mit visitedArea und exactArea
DateAdd(DateTimeValue(DatePicker1_2.SelectedDate & " " & Dropdown1_6.Selected.Value & ":" & Dropdown1_7.Selected.Value), TimeZoneOffset(), TimeUnit.Minutes), // Startdatum und -zeit
DateAdd(DateTimeValue(DatePicker1_3.SelectedDate & " " & Dropdown1_8.Selected.Value & ":" & Dropdown1_9.Selected.Value), TimeZoneOffset(), TimeUnit.Minutes), // Enddatum und -zeit
"(UTC) Coordinated Universal Time", // Zeitzone
{
requiredAttendees: "xy@gmail.com",
location: "Immenstetten", // Festgelegter Standort
body:"Grund des Besuchs: " & TextInputCanvas1.Value
}
);