Click here to Skip to main content
Licence 
First Posted 17 Oct 2007
Views 14,865
Downloads 525
Bookmarked 12 times

Alaram-WakeUp Call

By | 17 Oct 2007 | Article
This Application is developed for Alaram setting this can be used as software to your morning Wake Up.

Introduction

This is the Wake up Alaram Application.this Application is developed using the vb.net .you can Dounload both the Setup and Sample Source Code
for this Application.For the Setup youser first need to Down load and Install the Dotnet Frame Work 1.1.User can Download the Dotnet framework 1.1 from this site
http://www.microsoft.com/downloads/details.aspx?FamilyID=262d25e3-f589-4842-8157-034d1e7cf3a3&displaylang=en . After instaling the Application user can run the setup.
using this Application user can set the Allaram when he needs.This application has the functions with Timer control,Notify Icon with Context Menu, and Playing Sound File

Background

This Application i created for the Users.I was searching for the Morning WakeUp Alaram Software in internet .at that time i think why we create a software For Alaram using VB.Net

Using the code

This code has one SimpleSound.vb Class file for Playing and Stoping the Sound File,Most of users not have clear idea about the
Notify Icon this Code explain the Detail use of Notify Icon

//
// This is to Play the Sound
Public Shared Sub Play(ByVal Name As String, ByVal [Loop] As Boolean)
        If Not m_hgData.Equals(IntPtr.Zero) Then
            StopPlaying()
        End If
        ' get the namespace 
        Dim strNameSpace As String = System.Reflection.Assembly.GetExecutingAssembly().GetName().Name.ToString()
        ' get the resource into a stream
       
        Dim st As Stream = _
        System.Reflection.Assembly.GetExecutingAssembly().GetManifestResourceStream(strNameSpace + "." + Name)
        If st Is Nothing Then Exit Sub
        Dim intLength As Integer = CInt(st.Length)
        Dim abyt(intLength - 1) As Byte
        st.Read(abyt, 0, intLength)
        st.Close()
        m_hgData = Marshal.AllocHGlobal(intLength)
        Marshal.Copy(abyt, 0, m_hgData, intLength)
        Dim Flags As Int32 = SND_MEMORY Or SND_ASYNC
        If [Loop] Then
            Flags = Flags Or SND_LOOP
        End If
        PlaySound( _
        m_hgData, _
        IntPtr.Zero, _
        Flags _
        )
    End Sub

Points of Interest

I learn about the using th Play Sound and Notify Icon in System Tray.

History

Version 1.0

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here

About the Author

syedshanu

Software Developer (Senior)
Telstar-Hommal Corp,South korea
India India

Member

I have 3 Years of Exp in Dotnet,Asp.net,c#,vb.net Smart Device Application,sql Server 2000,20005

Sign Up to vote   Poor Excellent
Add a reason or comment to your vote: x
Votes of 3 or less require a comment

Comments and Discussions

 
You must Sign In to use this message board. (secure sign-in)
 
Search this forum  
 FAQ
    Noise  Layout  Per page   
  Refresh
GeneralThanks a bunch Pinmembernorm .net0:48 18 Oct '07  

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

Permalink | Advertise | Privacy | Mobile
Web04 | 2.5.120517.1 | Last Updated 18 Oct 2007
Article Copyright 2007 by syedshanu
Everything else Copyright © CodeProject, 1999-2012
Terms of Use
Layout: fixed | fluid