Autor Tema: Eliminar Items Calendario Google  (Leído 1659 veces)

0 Usuarios y 1 Visitante están viendo este tema.

aedEric

  • Megabyte
  • ***
  • Mensajes: 211
  • Reputación: +20/-0
    • Ver Perfil
Eliminar Items Calendario Google
« en: Julio 19, 2014, 06:46:26 pm »
Hola buenas tardes amigos recurro a usted para ver si alguien me puede auxiliar necesito poder manejar cualquier calendario desde un form intente con vb6 y outlook y puedo crear y eliminar eventos sin ningun problema el detalle que tuve es que hay una mala sincronización entre outlook y android las horas de los eventos quedan desfasadas busque por la web pero no encontre nada relacionado para la api de google y vb6 asi que  :(  que encontre para vb. net hay algo: es un ejemplo de como obtener los eventos de los calendarios y poder agregar eventos  hay codigo fuente y proyecto para descargar

http://www.ajpdsoft.com/modules.php?name=News&file=article&sid=538

mi problema radica es que deseo poder tambien elimnar eventos del calendario pero desgraciadamente mi conocimiento en vb.net es escaso si algun forista, me puede orientar, con sus opiniones o sugerencias se los agradecere
encontre tambien información aqui

https://developers.google.com/google-apps/calendar/v2/developers_guide_dotnet#DeletingEvents

de antemano gracias
No he fracasado. He encontrado 10000 soluciones que no funcionan.

aedEric

  • Megabyte
  • ***
  • Mensajes: 211
  • Reputación: +20/-0
    • Ver Perfil
Re:Eliminar Items Calendario Google
« Respuesta #1 en: Julio 21, 2014, 01:06:07 pm »
Hola he podido simplificar esto para agregar un evento a google calendar
Código: [Seleccionar]
    Private Sub InserGCalendar()

        Dim myService As New CalendarService("GoogleSMS")
        myService.setUserCredentials("xxxxx@gmail.com", "xxxxx")

        Dim Entrada As New EventEntry
        Entrada.Title.Text = "gracias dios mio"

        Dim Hora As New [When]
        Hora.StartTime = "20/07/2014 11:00:00"
        Entrada.Times.Add(Hora)

        Dim Recordatorio As New Reminder
        Recordatorio.Minutes = 5
        Recordatorio.Method = Reminder.ReminderMethod.sms
        Entrada.Reminders.Add(Recordatorio)

        Dim myUri As New Uri("http://www.google.com/calendar/feeds/default/private/full")
        Dim myEventEntry As AtomEntry = myService.Insert(myUri, Entrada)

    End Sub

pero aun debido a mi bajo conocimiento en net no e logrado eliminar un evento en google calendar, si alguien me puede hechar una mano con sus opiniones o sugerencias se lo voy agradecer gracias
No he fracasado. He encontrado 10000 soluciones que no funcionan.