Here have VB Capture Video to WMV file sample

http://viscomsoft.esmartweb.com