Login

           | 

Cerca nel sito...

Ricerca personalizzata

Segnala il sito

Segnala a: Mr. Wong Segnala a: Webnews Segnala a: Icio Segnala a: Oneview Segnala a: Kledy.de Social Bookmarking Segnala a: FAV!T Social Bookmarking Segnala a: Favoriten.de Segnala a: Seekxl Segnala a: Social Bookmark Portal Segnala a: BoniTrust Segnala a: Power-Oldie Segnala a: Bookmarks.cc Segnala a: Newskick Segnala a: Newsider Segnala a: Linksilo Segnala a: Readster Segnala a: Yigg Segnala a: Linkarena Segnala a: Digg Segnala a: Del.icoi.us Segnala a: Reddit Segnala a: Jumptags Segnala a: Upchuckr Segnala a: Simpy Segnala a: StumbleUpon Segnala a: Slashdot Segnala a: Netscape Segnala a: Furl Segnala a: Yahoo Segnala a: Blogmarks Segnala a: Diigo Segnala a: Technorati Segnala a: Newsvine Segnala a: Blinkbits Segnala a: Ma.Gnolia Segnala a: Smarking Segnala a: Netvouz Segnala a: Folkd Segnala a: Spurl Segnala a: Google Segnala a: Blinklist Information
Social Bookmarking
Banner
Hello, unfortunately not all of the site is translated into English, or is poorly translated. I apologize and ask you to help me. Notify errors, send me translations, together we will build a free service certainly helpful to many!
Appuntamento in rubrica Outlook da una pagina ASP PDF Stampa E-mail
Valutazione attuale: / 1
ScarsoOttimo 
Scritto da Massimiliano Pasqualoni   
Martedì 19 Aprile 2005 11:51
Inserire nella propria rubrica PMI un appuntamento prelevato da un dB? Niente di più semplice!
vCalender è un formato, supportato da molti PIM, tra cui Outlook e Palm Desktop, per la gestione di appuntamenti, basato su un file di testo facilmente riproducibile.
Questo script permette di aggiungere quindi alla propria rubrica, cliccando su un collegamento, un appuntamento costruito ad esempio a partire dai dati prelevati da un database.
Il codice è molto semplice ed a parte sostituire le varibili con i dati prelevati dal database e fare attenzione alla data ed all'ora (deve essere GMT!), non c'è altro da fare.
<%
' variabili impostate manualmente
' sostituire con la lettura da database
DTStart = FormattaData("02/06/2003 07:00") ' 09:00 italiane
DTEnd = FormattaData("02/06/2003 07:30") ' 09:30 italiane
Location = "http://unoscript@lgiorno.aspitalia.com"
Summary = "Ricordarsi di leggere unoscript@lgiorno"
Description = "E' una lista molto ma molto interessante :)"
ID = 1

' nome da dare al file
Response.ContentType = "text/x-vcalendar"
Response.AddHeader "content-disposition", "inline; filename=" & ID & "_" & Location & ".vcs;"

' generazione dell'appuntamento
Response.Write("BEGIN:VCALENDAR" & VbCrLF)
Response.Write("VERSION:1.0" & VbCrLF)
Response.Write("BEGIN: VEVENT" & VbCrLF)
Response.Write("DTStart:" & DTStart & VbCrLF)
Response.Write("DTEnd:" & DTEnd & VbCrLF)
Response.Write("LOCATION;ENCODING=QUOTED-PRINTABLE:" & Location & VbCrLF)
Response.Write("SUMMARY;ENCODING=QUOTED-PRINTABLE:" & Summary & VbCrLF)
Response.Write("DESCRIPTION;ENCODING=QUOTED-PRINTABLE:" & Description & VbCrLF)
Response.Write("UID:" & DTStart & DTEnd & ID & VbCrLF)
Response.Write("PRIORITY:3" & VbCrLF)
Response.Write("End:VEVENT" & VbCrLF)
Response.Write("End:VCALENDAR" & VbCrLf)


Function FormattaData(data)
  ' il formato è YYYYMMDDThhmmssZ
  ' ricordarsi che le date devono essere secondo GTM
  data = CDate(data)
  FormattaData = Year(data) & Raddoppia(Month(data)) & Raddoppia(Day(data))
  FormattaData = FormattaData & "T" & Raddoppia(Hour(data)) & Raddoppia(Minute(data))
  FormattaData = FormattaData & Raddoppia(Second(data)) & "Z"
End Function

' raddoppia una cifra
Function Raddoppia(valore)
  if Len(valore) = 1 then
  valore = "0" & valore
  end if
  Raddoppia = valore
End Function

%>

< Prec.   Succ. >
Ultimo aggiornamento Venerdì 01 Agosto 2008 15:48
 
RocketTheme Joomla Templates