Marco's .NET Blog

Jetzt habe ich einen Webkalender erstellt und der Ruf nach der Übernahme nach Outlook wird lauter.

Also hier der erste Code-Schnippsel, um in Outlook (per VBA) einen Termin anzulegen:

Sub CreateEvent()
   Set objOUTL = CreateObject(“Outlook.Application”)
   Set appOUTL = objOUTL.CreateItem(1)

   With appOUTL
      .Start = “01.01.2009 10:00″
      .Duration = 30
      .Subject = “Das ist ein Testtermin”
      .AllDayEvent = False
      .Save
   End With

   Set appOUTL = Nothing
   Set objOUTL = Nothing
End Sub

Jeder braucht sie, jeder sucht sie: Icons – kleine Bildchen, die jede Software und jede Webseite aufpeppen.

Eine gute Fundstelle bietet http://www.iconlib.info

Gelegentlich braucht man sie halt doch: Zufallszahlen.

Der Code ist recht übersichtlich:

Random rnd = new Random();
int Zufallszahl = rnd.Next(1,1000);

rnd.Next(1,1000) erzeugt eine zufällige Zahl zwischen 1 und 1000.

Nachdem ich ja bereits das “puristische” modale Popup beschrieben habe, hier nun die elegantere Lösung.

Zunächst benötigen wir ein einfaches Javascript, dass wir im Head-Bereich der aufrufenden Seite platzieren:

<script type=“text/javascript“>
function Dialog()
   {
      var ret=window.showModalDialog(“popup.aspx”,window, ↙
      “dialogHeight: 500px; dialogWidth: 800px; status: No; center:yes”
   );

   if (ret == “1″)
      {
         document.location.href = document.URL;
      }
   }
</script>

Der Aufruf dieses modalen Popups kann über zwei Wege erfolgen:

- per Link im html-Quelltext:

<a href=”javascript:void(0);” onClick=”Dialog();”>Popup öffnen</a>

- per Aufruf durch einen <asp:Button>:

Um den Aufruf durch einen <aps:Button> zu realisieren muss dem Button ein Attribut zugewiesen werden:

protected void Page_Load(object sender, EventArgs e)
{
    myButton.Attributes.Add(“onClick”, “javascript:Dialog();”);
}

Dieses Attribut bewirkt nun, dass beim Klicken des Buttons das Javasript Dialog() aufgerufen werden.

Hinweis:
In der aufgerufenen Seite (also im Popup) sollte im Head folgender Tag platziert werden:

<base target=“_self”/>

Wenn der Tag fehlt, öffnet jeder Link und jeder Klick auf einen Button ein neues Browserfenster ausserhalb unseres modulen Popups.