471,854 Members | 1,548 Online
Bytes | Software Development & Data Engineering Community
Post +

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 471,854 software developers and data experts.

Voice Recorder For Pocket PC (VB.NET version)

Okay we have here a VB.NET version of the .net compact framework voice
recorder sample that uses open net CF
c# version at:

get it to record, save, play back, etc?

' Q: Once we have a voice recorder object, how do you then pass messages
to it??
' A: Im working on that... Essentially the sendmessage api function will
need to
' be p/invoked. The voicerecordercreate function has returned the hwnd
' messages can be sent to this. The voice recorder messages are
documented in
' the sdk
' I haven't had much luck with the sendmessage function - everytime I
try to
' send a message to the voicerecorder, it just closes the
' I got this code to run. This code seems to record to files in \\My
' Documents\~VRec_* where * is a number.
' Alan, did you install the Speech.NET or Speech API?
' The files ~VRec_* are temporary files that the voice recorder uses to
' the data while it is recording. Sometimes, depending on how the
recorder is
' terminated, they get converted to recording*.wav
' Take a look here:
' http://www.innovativedss.com/forums/...sp?TOPIC_ID=80
' for an example of playing .WAV sounds.

' ported to vb.net by
' Tom Shelton (to*@YOUKNOWTHEDRILLmtogden.com)
' Off the top of my head... I'm not sure why the original code is using
' unsafe code. There doesn't seem to be anything used that would require
' - but, I don't know much about the Pocket PC environment. If the
unsafe is
' required for some reason on PPC, then you have to use C#.
' with additional help from
' "Ken Tucker" <vb***@bellsouth.net>

Imports System
Imports System.Data
Imports System.Runtime.InteropServices
Public Class VoiceRecorder
<StructLayout(LayoutKind.Sequential)> _
Protected Structure CM_VOICE_RECORDER
Public cb As Integer
Public dwStyle As Integer
Public xPos As Integer
Public yPos As Integer
Public hwndParent As IntPtr
Public id As Integer
Public lpszRecordFileName As String
End Structure
<DllImport("voicectl.dll", CallingConvention:=CallingConvention.Winapi)>
Private Shared Function VoiceRecorder_Create _
(ByRef myVoiceRecorder As CM_VOICE_RECORDER) As IntPtr
End Function
Private voicerec As CM_VOICE_RECORDER
Private handle As IntPtr
Public Sub New()
With voicerec
.cb = Marshal.SizeOf(voicerec)
.lpszRecordFileName = "\My Documents\VoiceControl.wav"
.xPos = -1
.yPos = -1
End With
End Sub
Public Sub Show()
handle = VoiceRecorder_Create(voicerec)
End Sub
End Class

'************************************************* **********************
'code for Button1 codebehind to record & save a voice memo to
'currently we can only create an instance of VoiceRecorder
'how do you get it to record, save, play back, etc?
'************************************************* **********************
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim VoiceRecorder1 As VoiceRecorder
VoiceRecorder1 = New VoiceRecorder
End Sub

*** Sent via Devdex http://www.devdex.com ***
Don't just participate in USENET...get rewarded for it!
Nov 20 '05 #1
0 1820

This discussion thread is closed

Replies have been disabled for this discussion.

Similar topics

5 posts views Thread by Oliver Huppert | last post: by
1 post views Thread by Jon Lehrer | last post: by
2 posts views Thread by Kent Briggs | last post: by
1 post views Thread by Fab | last post: by
5 posts views Thread by Terry Metcalfe | last post: by
reply views Thread by NeoPa | last post: by
reply views Thread by YellowAndGreen | last post: by

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.