Ihr habt euch sicher schon gewundert, warum ich in letzter Zeit nicht mehr so viel Blogge. Das liegt daran, dass ich von einem Freund eine Domain zur Verfügung gestellt bekommen habe und nun dorthin um ziehe: www.meinpc-blog.de
Ich habe die letzten Tage damit verbracht, ein neues auf Wordpress basierendes Design zu entwerfen. Hoffentlich gefällt es euch.
Mit der neuen Domain kommt auch ein neues Logo und aus mein PcBlog wird meinPc Blog. Der alte Blog erhält einen Hinweis und wird sonst nicht verändert.
In diesem extra meiner Visual Basic Tutorialreihe zeige ich euch, wie ihr ein Mikrophon mit mciSendStrind aufnehmt.
Quellcode:
Public Class Form1
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal Command As String, ByVal ReturnString As String, ByVal ReturnLenght As Integer, ByVal Callback As Integer) As Integer
Dim Path As String = "C:\Users\Manuel\Desktop\Test.wav"
Dim rs As String
Dim cb As String
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
If Button1.Text = "Record" Then
Button1.Text = "Stop"
Button2.Enabled = False
rs = New String(" ", 128)
mciSendString("Open New Type waveaudio Alias aufnahme", rs, 128, cb)
mciSendString("record aufnahme", rs, 128, cb)
Else
Button1.Text = "Record"
Button2.Enabled = True
mciSendString("Stop aufnahme", rs, 128, cb)
mciSendString("save aufnahme " & Path, rs, 128, cb)
mciSendString("Close aufnahme", rs, 128, cb)
End If
End Sub
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
My.Computer.Audio.Play(Path, AudioPlayMode.Background)
End Sub
End Class
In diesem Video möchte ich euch das Programm Snippage vorstellen, mitdem ihr euch jeden erdenklichen ausschnitt einer Webseite als Gadget auf den Desktop packen könnt.
Euch nervt es sicher auch, dass wenn ein Programm abgestürzt ist und man es mit dem Task Manager beenden will
man diese unbequeme Tastenkombination strg + alt + entf drücken muss
man auf langsameren PC's man mitunter 5 Sekunden auf den Blauen Bildschirm warten muss
man mehrere Sekunden warten muss bis der Blaue Bildschirm wieder weg ist und der Task Manager gestartet ist
Ich habe grade einen kürzeren Weg gefunden den Task Manager starten kann: Einfach einen Rechtsklick auf einen freien Platz in der Taskleiste machen und Task Manager auswählen. Schon wird der Task Manager gestartet.
Wie einige vielleicht schon gelesen haben, erstellt das iPhone von einem Bewegungsprofile. Es werden permanent Geodaten gespeichert und zu allem Überfluss dann auch noch beim Synchronisieren auf den PC übertragen und unverschlüsselt gespeichert. Dabei bekommt kein Nutzer die Daten je zu sehen, er wird noch nicht einmal gefragt. Steve Jobs hat dazu jetzt in einer kurzen Email dazu Stellung genommen: "Wir überwachen niemanden. Die Information, die derzeit die Runde macht, ist falsch."
Aber auch Android speichert GEO-daten, jedoch bleiben die auf dem Gerät. Google ist uns bisher eine Erklärung schuldig geblieben. Nachbessern werden wohl beide Hersteller müssen.
Ich finde die ganze Sache ziemlich eklig. Ich kann nur jedem, der so ein Gerät besitzt empfehlen, die Ortungsfunktionen abzuschalten.
Heute habe ich an einer Homepage programmiert: www.online-tools.de.ms (ms für ManuSoft). Auf dieser Seite möchte ich in Zukunft nützliche und auch weniger nützliche online-tools ansammeln. Bis jetzt gibt es dort nur einen Taschenrechner und einen Zufallsgenerator (der nur zu 80% funktioniert).
Hintergrund des ganzen ist, dass ich mich momentan viel mit der serverseitigen Sprache Asp.net beschäftige. Ich habe jetzt einen guten Free-Hoster gefunden und habe jetzt viel Freiraum auf dieser neuen Homepage, asp.net in ruhe kennen zulernen und auszuprobieren.
Was haltet ihr von der Webseite? Habt ihr Vorschläge für Tools, die ich dort integrieren könnte? Hinterlasst doch mal einen Kommentar.
YouTube hat nun einen neuen Schritt gegen Urheberrechtsverstoßer gemacht: Wer gegen das Urheberrecht verstößt, wird gezwungen sich eine 5-Minütige Happy Tree Friends-Folge ansehen und im Anschluss ein Quiz beantworten, bevor der Youtubechannel wieder freigeschaltet wird:
Ich finde dies eine witzige Idee, nur mich wundert, dass diese folge so unblutig verläuft. Ansonsten hoffe ich, dass ich nie gezwungen werde mir diesen Film anzusehen.
Zu einem der Bekanntesten Cloud-Anbietern gehört DropBox. DropBox bietet unter anderem an, eine Software runterzuladen, die die Cloud direkt als Laufwerk in den Explorer einbindet. Dafür werden die Login-Daten in einer Datei "config.db" gespeichert.
in der config.db steckt der Fehler
Wenn man nun die "config.db"-Datei klaut und seine "config.db" durch die geklaute ersetzt, hat man unbeschränkten Zugriff auf die Dateien.
Hier sieht man deutlich wo die Gefahr in den Cloud-Computing-Services besteht: Man hat seine Dateien nicht vor einem in einem Computergehäuse vor sich stehen, sondern irgendwo im WWW liegen.
Ich nutze Cloud-Computing nur für Dateien, die nur mich und keinen sonst interessieren (z.B. PowerPoint-Präsentationen für die Schule). Also für hochsensibele Daten ist nicht zu empfehlen.
Das US-Heimatschutzministerium will jetzt über Twitter, Facebook und Co vor Terroranschlägen und anderen Notlagen Warnen. Dadurch soll die Anzahl der Opfer verringert werden.
Ich halte das für eine richtig gute Idee. Heutzutage ist fast jeder Mensch auf Twitter, Facebook und Co. und das häufiger als in manchen andren Medien, deshalb macht das durchaus Sinn. Ich würde mir eine solche Richtlinie auch für Deutschland wünschen.
Nun hat auch Microsoft mit seinem Kartendienst Bing Maps beschlossen, die Autos mit Kameras für Microsofts Streetview-Clon Streetside durch Deutschland zu Jagen.
Ab den 9. April starten die Autos in Nürnberg, Fürth, Erlangen und Augsburg. Später sollen dann die restlichen großen Städte folgen.
Genau so wie Google will auch Microsoft die Positionen von WLan-Netzten speichern um Leute damit zu orten allerdings will sich Microsoft auf die Namen der Netze beschränken und nicht wie Google E-Mails und Passwörter aus ungeschützten W-Lan's mitlesen.
Es gab ja die riesige Diskussion über Streetview, aber ich denke das wir das Thema jetzt noch ein zweites mal durchkauen müssen, deshalb gehe ich hier jetzt nicht weiter drauf ein.
Wo wir grade beim Thema sind: Es gibt übrigens jetzt schon eine Streetview-alternative in Deutschland: Sightwalk.
Hat euch auch schon immer bei Google Earth gestört, dass man die Aufnahmen nur aus der Satelitenperspektive ansehen kann (und so meist nur die Dächer der Häuser zu sehen bekommt)? Dann kann ich euch den folgenden Dienst empfehlen: Bing Maps. Dort kann man oben Rechts die Vogelperspektive einschalten und so wird aus der schlichten draufsicht eine schöne Vogelperspektive:
In Japan wurden bei der Katastrophe unter anderem drei Fabriken der Firma Texas Instruments beschädigt. Texas Instruments baut vor allemControllerbausteine für die Motoren von Festplatten. Durch den Ausfall dieser drei Fabriken könnten die Preise für Festplatten um bis zu 10% steigen.
Ich hätte nicht gedacht, das die ganze Festplattenproduktion durch den Ausfall von 3 Fabriken so sehr beeinflusst werden kann. Diese Firma scheint sich ja ein gigantisches Monopol aufgebaut zu haben.
Google hat jetzt einen Chefwechsel angekündigt. Der neue Chef soll Larry Page werden, der 1995 zusammen mit Sergei Brin Google gegründet hat. Der bisherige Googlechef Eric Schmidt wurde 2001 Chef, weil Larry und Sergei wenig Ahnung von Unternehmensführung hatten. Der hatte Google zu diesem großen Milliardenkonzern gemacht hat.
Dieser Wechsel hat mich ziemlich überrascht. Auf der anderen Seite ist er auch irgendwie logisch: Larry und Sergei konnten sich viel von ihm abgucken und sind jetzt selbst im Stande, Google zu leiten. Für uns Endnutzer wird sich aber wahrscheinlich nicht viel ändern.
Ab Morgen startet Facebook damit, die persönlichen Fotos in Werbeanzeigen zu nutzen. Das ist "legal" und kann im Kleingedruckten nachgelesen werden. Um dies zu verhindern: Geht auf KONTO -KONTOEINSTELLUNGEN, dann auf den Tab "WERBEANZEIGEN" oben rechts klicken, NIEMAND angeben und speichern.
Als Windows 7 raus kam gab es heiße Diskussionen über ein "geheimes Feature" was Microsoft inplementiert hat: den God Mode. In diesem Video zeige ich euch, was es damit auf sich hat und wie ihr euch so einen God Mode erstellt.
Die Bewegungssteuerung Kinect von Microsoft war eigentlich nur für Spiele auf der xbox gedacht, aber Entwickler waren davon so begeistert, dass sie auch Treiber für den PC entwickelten.
Das Krankenhaus Sunnybrook Hospital hat darauf basieren eine Software entwickelt, mit der der operierende Atzt ohne den nicht sterilen Computer zu bedienen seine Ansicht steuern kann.
Aber seht selbst:
Ich finde, die Kinect zeigt eindrucksvoll, wie wir den PC in Zukunft steuern werden. Microsoft hat ja auch schon ein Software Development Kit für Kinect angekündigt. In 30 Jahren werden sich wohl unsere Kinder darüber aufregen, dass wir damals PC's mit Mäusen gesteuert haben, wie ich mich darüber aufrege, dass mine Eltern damals mit Schreibmaschienen geschrieben haben ;-)
Ich bin gerade auf eine interessante Webseite gestoßen, auf der sehr ausführlich erklärt wird, wie es vor allem in europäischen Ländern mit Atomenergie steht.
Auf der linken Seite gibt es eine interaktive Karte zu dem jeweils ausgewählten Land, auf der man anschaulich sehen kann, wo welche Reaktoren, stillgelegte Reaktoren, Zwischenlager etc. stehen.
In der Mitte sieht man einen anschaulichen Darstellungstext.
Die Webseite wurde von den Grünen gemacht und umfasst daher vor allem europäische Länder. Es sind auch einige andere Länder, wie USA oder Russland vertreten.
Insgesamt handelt es sich hier um eine sehr interessante Webseite, nur es wäre schön, wenn die Anzahl der Länder noch weiter ausgebaut werden würde.
Es ist jetzt ein par Tage her, dass das Erdbeben der Stärke 8,9 auf Japan gewütet hat und für die Softwarebranche Zeit, Bilanz zu ziehen.
Auch die Softwareindustrie hat den Tsunami nicht unbeschadet überlebt. Sony Beispielsweise musste sechs Fabriken im Norden des Landes schließen und die Arbeiter evakuieren, sagte der Firmensprecher Yasuhiro Okada.
Es werden außerdem viele Produktionen eingestellt und viele Server vom Netz genommen, um die Stromversorgung Japans zu entlasten.
Uns erreichen Tweets von Firmenmitarbeitern wie z.B. "Wir sind hier sicher in unseren Büros in Okaka und Tokio, aber viel wichtiger: Unsere Herzen sind bei denen, die vom Erdbeben in Japan betroffen sind."
Die Bekämpfung von illegalen Filmen im Netz wird immer schwieriger, meldet die Gesellschaft zur Verfolgung von Urheberrechtsverletzungen (GVU) in einem Bericht von Focus.
Die Anzahl der illegalen Filmportalen konnte zwar verringert werden, allerdings hat sich die Zahl der illegalen Filmen in den letzten 2 Jahren verfünffacht. Ende 2009 waren noch 124.00, heute sind es gut 515.000!
Ich habe eine gespaltene Meinung zu diesen Filmportalen. Es ist ja für den Endnutzer Legal, sich die Filme anzusehen. Trotzdem sehe ich mir nur Filme an, für die ich ohne solche Seiten nicht ins Kino gehen würde.
In diesem Teil meiner Visual Basic Tutorialreihe zeige ich euch, wie ihr unseren Musikplayer um eine Playlist ergänzt. Außerdem lernt ihr Funktionen besser kennen, was ein Timer ist und wofür die restlichen Parameter bei mciSendString sind.
Quellcode:
Imports System.IO
Public Class Form1
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpszCommand As String, ByVal lpszReturnString As String, ByVal cchReturnLength As Integer, ByVal hwndCallback As Integer) As Integer
Dim IsPlaying As Boolean = False
Dim currentTime As Double = 0
Dim currentlength As Integer = 0
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Not IsPlaying Then
'Datei abspielen
PlayDatei()
Else
'Pause
mciSendString("pause Datei", Nothing, 0, 0)
IsPlaying = False
Button1.BackgroundImage = ImageList1.Images(0)
Timer.Stop()
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'Stop
If IsPlaying Then
mciSendString("stop Datei", Nothing, 0, 0)
mciSendString("close Datei", Nothing, 0, 0)
Button1.BackgroundImage = ImageList1.Images(0)
Timer.Stop()
End If
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
OpenFileDialog1.ShowDialog()
End Sub
Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
ListBox1.Items.Add(OpenFileDialog1.FileName)
GroupBox1.Enabled = True
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Try
ListBox1.Items.RemoveAt(ListBox1.SelectedIndex)
Catch ex As Exception
End Try
If ListBox1.Items.Count = 0 Then
GroupBox1.Enabled = False
mciSendString("stop Datei", Nothing, 0, 0)
Button1.BackgroundImage = ImageList1.Images(0)
End If
End Sub
Private Function ErmitteleLaenge()
If IsPlaying Then
Dim laenge As Double
Dim sReturn As String = Space$(256)
mciSendString("status Datei length", sReturn, Len(sReturn), 0)
laenge = Convert.ToDouble(Val(sReturn) / 1000)
Return laenge
Else
Return 0
End If
End Function
Private Sub Timer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer.Tick
If currentTime < currentlength Then
currentTime += 1
ToolStripStatusLabel2.Text = currentTime
Else
Timer.Stop()
If ListBox1.Items.Count - 1 <> ListBox1.SelectedIndex Then
mciSendString("stop Datei", Nothing, 0, 0)
mciSendString("close Datei", Nothing, 0, 0)
IsPlaying = False
ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
PlayDatei()
Else
Button1.BackgroundImage = ImageList1.Images(0)
End If
End If
End Sub
Private Sub PlayDatei()
If IsPlaying Then
mciSendString("stop Datei", Nothing, 0, 0)
mciSendString("close Datei", Nothing, 0, 0)
IsPlaying = False
End If
mciSendString("open " & ListBox1.SelectedItem.ToString & " alias Datei", Nothing, 0, 0)
mciSendString("play Datei", Nothing, 0, 0)
IsPlaying = True
Button1.BackgroundImage = ImageList1.Images(1)
currentTime = 0
currentlength = ErmitteleLaenge()
Timer.Start()
ToolStripStatusLabel1.Text = ListBox1.SelectedItem
End Sub
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
PlayDatei()
End Sub
End Class
Das ein Hersteller seine eigenen Produkte beerdigen will kommt wirklich selten vor. So ist es aber mit dem Internet E6.
Microsoft hat nämlich eine Webseite aufgesetzt die sich das Ziel setzt, den Anteil der Benutzer die den IE6 nutzen unter 1% zu bringen. Dies geschieht in Form eines Countdowns, der Anzeigt, wie viele User den IE6 aktuell noch nutzen.
Man kann sogar auf seiner Homepage für IE6 Nutzer so einen Hinweis einbinden:
Gründe für diese Aktion sind wahrscheinlich, das die Wartung/Sicherheitsupdates für den IE6 Microsoft zu teuer geworden ist.
Ich finde diese Aktion eine Witzige Idee. Allerdings hat der IE6 (vor allem in China, Südkora und weiteren östlichen Ländern) noch sehr viele Fans, die sich über solche Aktionen mit Sicherheit Ärgern.
Microsoft hat es im Handymarkt ja allgemein schwer. Windows Phone 7 sollte den erhofften Aufschwung geben. Damit dies passiert hatte Microsoft es sogar jedem Menschen kostenlos alle Tools zur Verfügung gestellt, damit die Anzahl der Apps für Windows Phone 7 schnell attraktiv wird.
Das alles hat aber nur wenig gebracht - der Marktanteil von Windows Phone lag 2007 in den USA bei nur 6.8%*. Für 2014 gibt es voraussichtlich nur einen Anstieg um 2%*.
Aber für Microsoft sollte es noch Schlimmer kommen: Nokia wollte auf das Betriebssystem Android von Google umsteigen. Das durfte Microsoft nicht zulassen und hat Nokia deshalb eine kleine Spende in höhe von 1 Milliarde Dollar überwiesen. Im Gegenzug stellt Nokia in den nächsten 5 Jahren auf Windows Phone 7 um.
Das könnte - zumindest meiner Meinung nach - für Microsoft den erhofften Umschwung bringen. Mal sehen, was daraus wird.
*Quelle: IDC Worldwide Quarterly Mobile Phone Tracker
Letztes Jahr wollte der Politiker Majed Moughni die Congress-Wahlen in einem Bezirk des US-Bundesstaats Michigan gewinnen. Ein zentraler Bestandteil seiner Wahlkampagne war die Facebook-Seite, auf der sich seine Anhänger vernetzen und die Stimmen multiplizieren sollten.
Doch das ging nicht auf - die Konkurrenz hat sein Profil wegen "verdächtigem und unnormalem Verhalten" gemeldet, weil Moughni sich Kritisch über die Konkurrenz geäußert hat. Die Anfrage wurde offenbar ohne Kontrolle angenommen.
Jetzt hat Majed Moughni eine Klage eingereicht, mit der er erreichen will, dass die User über die Gründe der Löschung informiert werden, über eine Sperrung widersprechen können und einen Menschlichen Ansprechpartner bekommen.
Ich finde es etwas dreist, Facebook anzuklagen, andererseits hat Facebook sich da einen Fatalen Fehler erlaubt. Auf jeden Fall sind seine Ziele durchaus erstrebenswert.
Vielleicht hat der eine oder andere meinen Post zu dem Thema gelesen: Die letzten Monate konnten die Bürger dem Bayrischen Ministerpräsidenten Fragen stellen. Diese werden gleich (um 16:00) Live beantwortet.
Die Videoplattform YouTube will ab der 2. Jahreshälfte Live Sport übertragen. Zunächst sollen nur Cricket-Spiele aus der Indian Premier League übertragen werden. Später sollen dann auch Eishockey und Fußball folgen.
YouTube ist derzeit in einem Wandel von der Videoplattform, wo Privatpersonen ihre kleinen Filmchen hochladen zu einer Film und Fernsehplattform. Die Qualität der Videos steigt immer höher. Es werden ja schon lange auf Youtube komplette Filme zum ansehen Angeboten. Nun ist es also bald soweit, das auch Live-Ereignisse übertragen werden.
Auch wenn ich nicht so sehr der Sport-Freek bin, finde ich das doch eine positive Wendung.
Google lässt sich ja bekanntlich immer neue Funktionen einfallen. Jetzt hat Google eine Rezeptsuche programmiert.
Das funktioniert auch insgesamt sehr gut. Zusätzlich kann man noch an der linken Seite angeben, welche Zutaten man verwenden möchte, wie lange die Zubereitung maximal dauern darf und wie viele Kalorien das Gericht maximal haben darf.
Das Internet erhält momentan immer mehr Einzug in den Alltag. Internet im Fernseher ist längst nichts neues mehr, mittlerweile tüftelt man schon am Internet für Autos. Mal sehen wann es so weit ist, dass auch Küchengeräte Internetzugang haben ;-)
Google hat übrigens auch ein Vorstellungsvideo gemacht, dass vom nächstbesten Google-Kantinen-Chef präsentiert wird:
Im letzten Jahr haben es in den USA 33 Filme auf den Platz 1 der Charts geschaft. In 10 davon haben die Schauspieler Apple Produkte in die Kamera gehalten.
Platz 2 belegen Nike, Chevrolet und Ford, wobei alle drei nur in 15% der Filme vertreten waren.
Wie ich auch schon in anderen Blogposts erzählt habe, ist die Marketingstrategie von Apple genial. Auch wenn sin neues iPhone raus kommt wird das erst mal das große Geheimnis draus gemacht und fleißig Spekuliert und dann macht Steve Jobs so ne Liveveranstaltung in der dann das neue Model vorgestellt wird und die geladenen Gäste ordentlich in die Hände klatschen. Selbst die Tagesschau berichtet darüber.
Die Lufthansa fängt nun an, ausgewählte Fluglinien mit WLan zu versehen. Dies geschieht in einer Kooperation mit der Telekom.
Im Flugzeug wird eine Art Hotspot aufgebaut, der alle Daten nach unten sendet. Damit kann jeder Laptop, Netbook und jedes WLan-fähige Handy ins Internet.
Der Internetzugang ist leider nicht kostenlos: Telekom-Kunden zahlen 1,79€ für 10 Minuten und aller anderen Zahlen an Bord mit der Kreditkarte: 10,95€ für eine Stunde und 19,95€ 24 Stunden.
Ich finde das Angebot sympatisch, obwohl ich seit ca. 10 Jahren nicht geflogen bin (weil fliegen in den Schulferien so teuer ist). Ich würde es mir ernsthaft überlegen, so ein Angebot zu nutzen.
Die Bewegungserkennung Kinect hat viele Programmierer begeistert. Deswegen haben Sie einfach Kinect gehackt und bieten nun viele offene Treiber an, mit denen man Bewegungssteuerungen für Windows entwickeln kann.
Das gefiel Microsoft zuerst gar nicht, doch sich ein Duell mit Hackern zu liefern ist kostspielig und fast immer Erfolglos.
Daher hat sich Microsoft umentschieden, mit der Kommerziellen Entwicklung von Bewegungserkennung bei Windows Geld zu verdienen. Microsoft entwickelt jetzt an einer Entwicklungsumgebung für Kinect am PC. Es wird auch eine kostenlose Version geben.
Ich finde diese Meinungsänderung von Microsoft sympatisch. Microsoft hat mit Kinect ohne es zu wissen eine Zukunftsweisende Art der Computerbedienung zu schaffen. Das potenzial einer solchen Umgebung reicht von einfachen Spielen über Augmented Reality bis hin zu komplett anderen Anwendungen. Ich überlege mir ernsthaft, mir so ein Ding anzuschaffen, wenn die Entwicklungsumgebung raus kommt.
Die drei Abgeordneten Dorothee Bär (CSU), Jimmy Schulz (FDP) und Manuel Höferlin (FDP) haben für den nächsten Mittwoch eine besondere Veranstaltung geplant: Die Politiker bekommen Killerspielnachhilfe.
Ich persöhnlich finde diese Aktion absolut Notwendig, da die Politiker bei Killerspielen über etwas entscheiden müssen von dem Sie überhaupt keine Ahnung haben.
Die Politiker selbst sind nicht so begeistert: "Wozu soll ich lernen, wie man ein Killerspiel wie Counter Strike spielt?" fragte Hans-Peter Uhl. Die Antwort von mir: "Weil du darüber entscheiden musst!"
Microsoft hatte eigentlich noch nie wirklich Erfolg auf dem Handy. Windows Mobile war ein flopp. Seit letztem Oktober ist Windows Phone 7 draußen, das auch eher weniger Erfolg hatte.
Nun hat Microsoft anscheinend den Kampf um den Handymarkt ganz aufgegeben, denn Microsoft hat im AppStore (zur Zeit nur in den USA) eines seiner Office-Produkte (One Note) in einer Mobilen Variante im amerikanischen Appstore online gestellt - und das auch noch **Free for a limited time**.
Das Microsoft so leicht aufgibt hätte ich mir nicht gedacht. Das Bing und Windows live im Appstore angeboten wird kann man ja noch verstehen, aber das Microsoft jetzt Office-Produkte anbietet.....
Ich bin gespannt, wann Word und Excel für iPhone rauskommen ;-)
Public Class Form1
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal IpszCommand As String, ByVal IpszReturnString As String, ByVal cchReturnLength As Integer, ByVal hwndCallback As Integer) As Integer
Dim IsPlaying As Boolean = False
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Button1.BackgroundImage = ImageList1.Images(0)
Button2.BackgroundImage = ImageList1.Images(2)
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Not IsPlaying Then
mciSendString("open C:\Users\Manuel\Music\Soundtracks\Jan_Morgenstern-Sintel-MP3\8-Circling_Dragons.mp3 alias Datei", Nothing, 0, 0)
mciSendString("play Datei", Nothing, 0, 0)
IsPlaying = True
Button1.BackgroundImage = ImageList1.Images(1)
Else
mciSendString("pause Datei", Nothing, 0, 0)
IsPlaying = False
Button1.BackgroundImage = ImageList1.Images(0)
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If IsPlaying Then
mciSendString("stop Datei", Nothing, 0, 0)
IsPlaying = False
Button1.BackgroundImage = ImageList1.Images(0)
End If
Obwohl das Internet vom 28. Januar bis zum 2. Februar in Ägypten aufgrund der Internet-sperre wegen den Protesten gegen Mubarak gar nicht zugänglich war, mussten die Ägypter trotzdem Geld an die Provider bezahlen.
Das wollen die Provider jetzt entschädigen. Vodafone, Telecom Egypt's TE Data, Etisalat und Mobinil's LinkDotNet wollen den Ägytern jetzt den halben Monatspreis zurückzahlen.
Eigentlich müsste meiner Meinung nach die Ägyptische Regierung die Kosten übernehmen, da ja auch die Provider dafür nichts können. Trotzdem finde ich diese Aktion sympathisch.
Letzten Juli wurde in Weißrussland ein Wurm der Superlative entdeckt - Stuxnet. Er unterscheidet sich von anderen Würmern gewaltig, denn er ist nicht etwa da, um den Privatcomputernutzer ein par Kennwörter zu entlocken, sondern er soll große Industrieanlagen abschalten.
Stuxnet wurde wahrscheinlich entwickelt, um im Iran Atomkraftwerke abzuschalten. Seit Ende Januar ist bekannt, dass die Regierung der USA zusammen mit Israel die Entwicklung des Wurms 2 Jahre lang unterstützt hat.
Somit ist eine völlig neue Waffe entstanden mit der Wir in der Zukunft noch sicher viel zu kämpfen haben. Ende 2010 ist bekannt geworden, dass Stuxnet im Untergrund verkauft wurde. Theoretisch könnten Experten, die sich sehr gut mit Computern auskennen den Wurm umschreiben und damit Stromkraftwerke, Öl- und Gasversorger und Atomkraftwerke lahmlegen.
Ich behaupte mal ganz Frech, dass das Zeitalter des Cyberwars begonnen hat.
Ich glaube die von Google ticken manchmal nicht richtig ;-) Nachdem mir Google empfohlen hat auf meiner Reise von der USA nach Japan ein Kajak zu benutzen, spuckt Google noch was kurioseres aus: Auf meiner Reise von der USA nach China soll ich den Jet-Ski benutzen:
Hat von euch jemand schon mal bei Google Maps eine Routenberechnung von der USA nach Japan gemacht? Google leitet das Auto direkt durch den Pazifik - mit einem Kayak:
Wenn ich morgens zur Schule fahre komme ich an diesem interessanten Geschäft vorbei. Im Äppel Store gibt es frisches Obst und Gemüse und in der hinteren hälfte hausgemachte Salate/Mittagessen.
Nur der Applefan wird hier seine Lieblingsprodukte vermissen. Aber es würde jedem mal gut tun gesünder zu essen ;-)
In diesem Video zeige ich euch, wie ihr aus jedem Dokument eine PDF-Datei machen könnt. Das ganze funktioniert natürlich nicht nur mit Word, sondern mit jedem Programm, das Drucken kann ;-)
Wenn ich etwas nachschlagen will, war bis jetzt meine erste Anlaufstelle Wikipedia. Das könnte sich jetzt ändern, denn ich habe gerade eine neue Funktion bei Google entdeckt.
Wenn ihr vor euren Suchbegriff ein define: setzt, spuckt Google automatisch sämtliche gefundene Lexikonartikel aus.
Ein Beispiel: Wenn ich wissen will, was Pfeffer ist, suche ich nach define: Pfeffer und schon Spukt mir Google diverse Lexikonartikel aus:
zum Vergrößern klicken
Ein Tipp noch: Wenn Google euch Englische Lexikonartikel präsentiert, dann Scrollt ganz nach unten, dot könnt ihr dann "German" anklicken.
In diesem Teil meiner Tutorialreihe zeige ich euch, wie man mit einem OpenFileDialog dateien öffnet, mit einem SaveFileDialog Dateien speichert und Dateien druckt.
Imports System.IO
Imports System.Drawing
Public Class Form1
Private Sub ÖffnenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ÖffnenToolStripMenuItem.Click
OpenFileDialog1.ShowDialog()
End Sub
Private Sub SpeichernToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SpeichernToolStripMenuItem.Click
SaveFileDialog1.ShowDialog()
End Sub
Private Sub ÜberToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ÜberToolStripMenuItem.Click
Form2.Show()
End Sub
Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click
If Not RichTextBox1.SelectionFont.Style = FontStyle.Bold Then
RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont, FontStyle.Bold)
Else
RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont, FontStyle.Regular)
End If
End Sub
Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click
If Not RichTextBox1.SelectionFont.Style = FontStyle.Italic Then
RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont, FontStyle.Italic)
Else
RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont, FontStyle.Regular)
End If
End Sub
Private Sub ToolStripButton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton3.Click
If Not RichTextBox1.SelectionFont.Style = FontStyle.Underline Then
RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont, FontStyle.Underline)
Else
RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont, FontStyle.Regular)
End If
End Sub
Private Sub ToolStripComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripComboBox1.SelectedIndexChanged
Try
RichTextBox1.SelectionFont = New Font(New FontFamily(ToolStripComboBox1.Text), Convert.ToInt32(ToolStripComboBox2.Text), FontStyle.Regular)
Catch ex As Exception
End Try
RichTextBox1.Focus()
End Sub
Private Sub ToolStripComboBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripComboBox2.SelectedIndexChanged
Try
RichTextBox1.SelectionFont = New Font(New FontFamily(ToolStripComboBox1.Text), Convert.ToInt32(ToolStripComboBox2.Text), FontStyle.Regular)
Catch ex As Exception
End Try
RichTextBox1.Focus()
End Sub
Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
RichTextBox1.Text = ""
Dim sr As New StreamReader(OpenFileDialog1.FileName)
While Not sr.EndOfStream
RichTextBox1.Text = RichTextBox1.Text & sr.ReadLine & vbCrLf
End While
sr.Close()
End Sub
Private Sub SaveFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles SaveFileDialog1.FileOk
Dim sw As New StreamWriter(SaveFileDialog1.FileName)
For Each line As String In RichTextBox1.Lines
sw.WriteLine(line)
Next
sw.Close()
End Sub
Private Sub DruckenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DruckenToolStripMenuItem.Click
PrintDocument1.Print()
End Sub
Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
Dim Schrift As Drawing.Font = New Drawing.Font("Arial", 14, FontStyle.Regular)
