Springen naar inhoud


- - - - -
VS 2015

Hoe Google Kalender Invullen

VS2015

  • Log in a.u.b. om te beantwoorden
Er zijn 45 reacties in dit onderwerp

#1 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 09 oktober 2018 - 20:12

Hi
Ik heb al gezocht via google. Maar geen oplossing gevonden voor het volgende probleem.
Ik zou graag de code willen hebben hoe ik een google calender kan bewerken via vb.net
Vind niks via google

Bedankt voor de medewerking

#2 doebi

doebi

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 538 berichten
    Laatst bezocht 16 nov 2018 19:48

Geplaatst op 09 oktober 2018 - 20:15

Misschien via de api

https://developers.g...pis/calendar/v3

Niet getest, maar ben zelf ook wel geïnteresseerd

#3 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 10 oktober 2018 - 16:56

Bericht bekijkenglda19, op 09 oktober 2018 - 20:12, zei:

Ik heb al gezocht via google. Maar geen oplossing gevonden voor het volgende probleem.
Ik zou graag de code willen hebben hoe ik een google calender kan bewerken via vb.net

Ik heb dat anderhalf jaar geleden blijkbaar eens (voor jou) gedaan.
Ik weet niet of ik die code nog ga terugvinden, maar ik zal binnenkort eens op zoek gaan.


Bericht bekijkenglda19, op 09 oktober 2018 - 20:12, zei:

Vind niks via google
Dat vind ik stug, ik meen me te herinneren dat ik de info ook via google heb opgeduikeld.



Bericht bekijkendoebi, op 09 oktober 2018 - 20:15, zei:

Inderdaad, dat is waar ik de mosterd heb gehaald.

#4 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 10 oktober 2018 - 17:26

had daar ook al gezien maar vind het niet duidelijk.
Kun je even kort vb maken

#5 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 10 oktober 2018 - 17:50

Ik heb nooit uw code een anderhalf jaar geleden gezien.
En vind die site van google niet vree duidelijk

#6 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 10 oktober 2018 - 17:57

Is het via deze link dat ik moet gaan kijkenhttps://developers.g...ickstart/dotnet
en daar dan de stapen uitvoeren

#7 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 12 oktober 2018 - 14:26

Bericht bekijkenglda19, op 10 oktober 2018 - 17:50, zei:

Ik heb nooit uw code een anderhalf jaar geleden gezien.
Dat heb ik toch niet gezegd.
En we weten beiden waarom, ik zou daar niet op terugkomen in jouw geval.

Bericht bekijkenglda19, op 10 oktober 2018 - 17:50, zei:

En vind die site van google niet vree duidelijk
Tja, ik had daar blijkbaar geen problemen mee, want ik heb ondertussen die code teruggevonden, waaronder het volgende proof of concept (heb enkel de data aangepast naar 2018 én mijn ClientId en Secret er uit gehaald, natuurlijk én ook de Application name ).

Visual Basic Code:
Option Strict On

Imports System.Threading
Imports Google.Apis.Calendar.v3
Imports Google.Apis.Calendar.v3.Data
Imports Google.Apis.Services
Imports Google.Apis.Auth.OAuth2

Module Module1
	 Dim service As CalendarService

	 Public Sub Main(ByVal args As String())
		 Dim credential As UserCredential =
			 GoogleWebAuthorizationBroker.AuthorizeAsync(
			 New ClientSecrets With
			 {
			 .ClientId = "jouw ClientId",
			 .ClientSecret = "jouw ClientSecret"
			 },
			 {CalendarService.Scope.Calendar}, "user", CancellationToken.None).Result

	 service = New CalendarService(New BaseClientService.Initializer() With
		 {
			 .HttpClientInitializer = credential,
			 .ApplicationName = "jouw Calendar App"
		 })
	
	
		 Dim list As IList(Of CalendarListEntry) = service.CalendarList.List().Execute().Items
		 DisplayList(list)

		 For Each calendar As CalendarListEntry In list
			 DisplayFirstCalendarEvents(calendar)
		 Next

		 Console.WriteLine("Press any key to continue...")
		 Console.ReadKey()
	 End Sub

	 Private Sub DisplayList(ByVal list As IList(Of CalendarListEntry))
		 Console.WriteLine("Lists of calendars:")
		 For Each item As CalendarListEntry In list
			 Console.WriteLine("Summary: " + item.Summary)
			 Console.WriteLine("Location:" + item.Location)
			 Console.WriteLine("TimeZone:" + item.TimeZone)
		 Next
	 End Sub

	 Private Sub DisplayFirstCalendarEvents(ByVal list As CalendarListEntry)
		 Console.WriteLine(Environment.NewLine & "Events tussen 01/09/2018 en 31/12/2018", list.Summary)
	 Dim request As EventsResource.ListRequest = service.Events.List(list.Id)
		 'request.MaxResults = 10
		 request.TimeMin = New DateTime(2018, 09, 1)
		 request.TimeMax = New DateTime(2018, 12, 31)
		 For Each calendarEvent As [Event] In request.Execute().Items
			 Console.WriteLine("Summary: " + calendarEvent.Summary)
		 Next
	 End Sub
End Module




En het werkt nog steeds:de eerste is een eigen calendar, de tweede de feestdagen in België (die ik -voor jou- toen ook heb toegevoegd blijkbaar) :

Bijlage  kalendergoogle.png   21,82K   4 downloads

#8 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 12 oktober 2018 - 18:20

thx
dus ik moet eerst  nog iets doen
En dit is voor het weergeven van de kalender
maar wat doe je als je er meer hebt

#9 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 14 oktober 2018 - 17:47

Bericht bekijkenglda19, op 12 oktober 2018 - 18:20, zei:

dus ik moet eerst  nog iets doen
Wat bedoel je?

Bericht bekijkenglda19, op 12 oktober 2018 - 18:20, zei:

En dit is voor het weergeven van de kalender
Ja. Maar je kan ook nieuwe events toevoegen:
Visual Basic Code:
Public Sub Nieuw(calendarId As String)
Dim moment = Date.Today.AddDays(1).AddHours(9)
Dim newEvent As New [Event]()
With newEvent
	 .Summary = "Dit is ook een nieuw event"
	 .Description = "Ook een nieuw event"
	 .Start = New EventDateTime()
	 .Start.DateTime = moment
	 .[End] = New EventDateTime()
	 .[End].DateTime = moment.AddHours(2)
End With
service.Events.Insert(newEvent, calendarId).Execute()
End Sub




Bericht bekijkenglda19, op 12 oktober 2018 - 18:20, zei:

maar wat doe je als je er meer hebt
Gebruik het Calender Id

Werkt ook gewoon:
Bijlage  kalendergoogleinsert2.png   19,93K   4 downloads

#10 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 15 oktober 2018 - 07:10

Wat is de clientid clientsecret en je spreekt daar ook in je eerste code van een application name
Dus veronderstel ik dat ik.eerst de link op de developer pagina moet volgen niet? Om zo een application name aan te maken vermoed ik ? Verder nog iets doen ze spreken daar ook van een bepaald bestand daar iets mee doen!

#11 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 15 oktober 2018 - 07:11

Wat is de clientid clientsecret en je spreekt daar ook in je eerste code van een application name
Dus veronderstel ik dat ik.eerst de link op de developer pagina moet volgen niet? Om zo een application name aan te maken vermoed ik ? Verder nog iets doen ze spreken daar ook van een bepaald bestand daar iets mee doen!

#12 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 15 oktober 2018 - 10:48

Bericht bekijkenglda19, op 15 oktober 2018 - 07:11, zei:

Wat is de clientid clientsecret en je spreekt daar ook in je eerste code van een application name

Volg de link Get Started:
  • SetUp
  • Authentication and authorization : kies voor 2. Authorized API access (OAuth 2.0)
  • Kies de juiste ClientId voor wat je wil doen

Bericht bekijkenglda19, op 15 oktober 2018 - 07:11, zei:

Verder nog iets doen ze spreken daar ook van een bepaald bestand daar iets mee doen!
Dat is een .json bestand met je ClientId en ClientSecret in, ik heb die gewoon in de code geplakt (dat is weliswaar ok voor een demo of proof-of-concept, maar niet voor productiecode).

Je hebt nu alle stappen en daarnaast ook alle nodige code in vb.net, dus ik vermoed dat het nu wel zou moeten lukken om het werkend te krijgen, niet?

#13 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 19 oktober 2018 - 14:06

Bericht bekijkenDirk Andries, op 15 oktober 2018 - 10:48, zei:

Je hebt nu alle stappen en daarnaast ook alle nodige code in vb.net, dus ik vermoed dat het nu wel zou moeten lukken om het werkend te krijgen, niet?

En? Vlot het een beetje?

#14 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 19 oktober 2018 - 19:50

nog niet de tijd gehad en waarschijnlijk begin november ook niet door operatie. Probeer eens dit weekend.
Maar 1 vraag je nog hoe kun je zeggen dat het in een bepaalde kalender moet als je er meerdere hebt.
vb Een Google kalender op naam en dan een op naam werk verlof.

#15 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 20 oktober 2018 - 18:27

Bericht bekijkenglda19, op 19 oktober 2018 - 19:50, zei:

Maar 1 vraag je nog hoe kun je zeggen dat het in een bepaalde kalender moet als je er meerdere hebt.
Dat heb ik al gezegd: gebruik het Id van de kalender.
Je kan dat id terugvinden op calendar.google.com bij instellingen.

#16 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 23 oktober 2018 - 17:57

Dacht ga er eens grondig naar kijken .
Maar valt ferm tegen.
Snap er tot nu toe niks van.
Volgens de gegeven link.
Stap 1 en 2 geen probleem.
Maar wat met stap die stap 3
Als ik kijk bij deze link https://www.nuget.or...Order=relevance
zou ik volgens mij Google.Apis.Calendar.v3/ nodig hebben niet !
Maar hoe die downloaden zie daar packetmanager .net cli.
Ik heb packetmanger geprobeerd maar die om command line maar werkt niet.
Of moet ik nog iets extra installeren.
Of ben ik totaal verkeerd bezig !!

Eigenlijk zou ik vanuit mijn excel bestand de google kalender willen aanspreken. En dan later nog eens kijken naar u programma dat je hebt gemaakt denk -+ 1,5j terug om te zetten naar vb.net
Want er zit in excel een heel pak code achter om er bepaalrde symbolen op de dagen te leggen bv  een rechthoek voor een volledige dag en een 3hoek die de cel in 2 deelt bv bovenaan gekleurd is voormiddag verlof onderaan de 3hoek naamiddsag verlof.

#17 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 24 oktober 2018 - 11:23

 glda19, on 23 oktober 2018 - 17:57, said:

Maar wat met stap die stap 3
Als ik kijk bij deze link https://www.nuget.or...Order=relevance
zou ik volgens mij Google.Apis.Calendar.v3/ nodig hebben niet !
Dit zijn de packages die ik nu geladen heb voor bovenstaande codes:
[xml]

<?xml version="1.0" encoding="utf-8"?>
<packages>
  <package id="Google.Apis" version="1.36.1" targetFramework="net472" />
  <package id="Google.Apis.Auth" version="1.36.1" targetFramework="net472" />
  <package id="Google.Apis.Calendar.v3" version="1.36.1.1384" targetFramework="net472" />
  <package id="Google.Apis.Core" version="1.36.1" targetFramework="net472" />
  <package id="Newtonsoft.Json" version="11.0.2" targetFramework="net472" />
</packages>

Noteer dat de afhankelijkheden automatisch werden toegevoegd.
Dus je hoeft in de package manager enkel Google.Apis.Calendar.v3 toe te voegen.

#18 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 24 oktober 2018 - 11:24

 glda19, on 23 oktober 2018 - 17:57, said:

Eigenlijk zou ik vanuit mijn excel bestand de google kalender willen aanspreken.
Hoe?

#19 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 24 oktober 2018 - 14:16

 Dirk Andries, on 24 oktober 2018 - 11:23, said:

Noteer dat de afhankelijkheden automatisch werden toegevoegd.
Dus je hoeft in de package manager enkel Google.Apis.Calendar.v3 toe te voegen.
Dus:
Bijlage  Google.ApisCalendar.v3.png   230,03K   3 downloads

en op install klikken, de rest gebeurt automagisch

#20 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 24 oktober 2018 - 14:18

 Dirk Andries, on 24 oktober 2018 - 14:16, said:

de rest gebeurt automagisch

Bijlage  Google.Apis.Nuget.png   46,19K   5 downloads

#21 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 24 oktober 2018 - 17:54

Wat bedoel je met de laatste foto

#22 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 24 oktober 2018 - 17:59

via excel moet ik het nog uitzoeken

#23 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 24 oktober 2018 - 19:21

wat voor applicatie moet ik maken om uw code te testen

#24 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 25 oktober 2018 - 08:38

 glda19, on 24 oktober 2018 - 17:54, said:

Wat bedoel je met de laatste foto
Die demonstreert dat de andere nodige packages (afhankelijkheden - dependencies) worden meegenomen als je v3 installeert.

 glda19, on 24 oktober 2018 - 19:21, said:

wat voor applicatie moet ik maken om uw code te testen
Je mag kiezen.

#25 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 25 oktober 2018 - 08:48

 glda19, on 24 oktober 2018 - 17:59, said:

via excel moet ik het nog uitzoeken
Ok. Ik vermoed dat je hier kan rapporteren over de vooruitgang?

#26 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 25 oktober 2018 - 19:42

wat wil je dat ik rapporteer

#27 Dirk Andries

Dirk Andries

    Guru Developer

  • Leden
  • PipPipPipPipPipPip
  • 1092 berichten
    Laatst bezocht
  • LocatieGent

Geplaatst op 26 oktober 2018 - 08:18

Bericht bekijkenglda19, op 25 oktober 2018 - 19:42, zei:

wat wil je dat ik rapporteer
Hoe je het oplost om de Google Api aan te spreken vanuit excel.
Altijd handig voor iemand die dit onderwerp zou lezen.

#28 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 29 oktober 2018 - 19:01

hier zie een vb in excel
http://ramblings.mcp...n/excelsheetsv4
Maar ge kijken of ik nog tijd vind in het lang weekend om het eens te testen.
En proberen om dit van Dirk eens te testen.

#29 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 02 november 2018 - 12:53

weet er iemand dat we moeten betalen om der api te blijven gebruiken

#30 glda19

glda19

    Professional Developer

  • Leden
  • PipPipPipPip
  • 308 berichten
    Laatst bezocht 02 dec 2018 22:26

Geplaatst op 02 november 2018 - 13:40

Eindelijk eens tijd gehad op het te testen.
Was niet zo eenvoudig maar werkt uiteindelijk.
Maar nu is de vraag hoe kan ik bepaalde kalender selecteren





Ook met taq VS 2015, VS2015 voorzien

0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


[VS 2015] Untitled 1

Met dank aan Jürgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
Met dank aan PascalBianca voor de jarenlange inzet van vbib.be (anno dec 2016)