Quick Search for:  in language:    
Taken,from,Windows,Magazine,August,1999Agent,
   Code/Articles » |  Newest/Best » |  Community » |  Jobs » |  Other » |  Goto » | 
CategoriesSearch Newest CodeCoding ContestCode of the DayAsk A ProJobsUpload
Visual Basic Stats

 Code: 3,014,970. lines
 Jobs: 119. postings

 How to support the site

 
Sponsored by:

 

You are in:

 
Login



Latest Code Ticker for Visual Basic.
Unroll2 - Update
By Cyber Chris on 7/2


MultilinePWD
By Cyber Chris on 7/2


Click here to see a screenshot of this code!Song/Poem Assistant
By Peter Rowan on 7/2

(Screen Shot)

Click here to see a screenshot of this code!GPA Cal
By KBM-00 on 7/2

(Screen Shot)

Click here to see a screenshot of this code!Connection Via the Telephone line.No internet or cable.Just the telephone line
By Nass ClickMan on 7/2

(Screen Shot)

DBTool
By Make Strömberg on 7/2


Click here to see a screenshot of this code!MSChart Simple Example
By Sebastian Pereira on 7/2

(Screen Shot)

CString v1.5
By Ultimatum on 7/2


Tablature Pro
By Michael McMullen on 7/2


Click here to put this ticker on your site!


Add this ticker to your desktop!


Daily Code Email
To join the 'Code of the Day' Mailing List click here!





Affiliate Sites



 
 
   

Use Microsofts Agents in your apps!

Print
Email
 

Submitted on: 8/2/1999
By: Ryan Couch 
Level: Not Given
User Rating: By 101 Users
Compatibility:VB 5.0, VB 6.0

Users have accessed this code 7317 times.
 
 
     Taken from Windows Magazine August 1999 Agent is Microsoft's name for the technology that puts those "cute" cartoon characters on the screen while running any Microsoft Office application. This technoloty will be a standard feature of Windows 2000, but you can also add it to Windows 98 or Windows 95 viea a free download at "HTTP://msdn.microsoft.com/workshop/imedia/agent/agentdl.asp" Once you install this update, you can use these characters in your applications, including macros!
 
code:
Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!
 
Terms of Agreement:   
By using this code, you agree to the following terms...   
1) You may use this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.   
2) You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.   
3) You may link to this code from another website, but ONLY if it is not wrapped in a frame. 
4) You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.

'**************************************
' Name: Use Microsofts Agents in your ap
'     ps!
' Description:Taken from Windows Magazin
'     e August 1999
Agent is Microsoft's name For the technology that puts those "cute" cartoon characters on the screen While running any Microsoft Office application. This technoloty will be a standard feature of Windows 2000, but you can also add it to Windows 98 or Windows 95 viea a free download at "HTTP://msdn.microsoft.com/workshop/imedia/agent/agentdl.asp" Once you install this update, you can use these characters in your applications, including macros!
' By: Ryan Couch
'
' Returns:you can download the free text
'     -to-speech converter and let it talk to 
'     you
'
'This code is copyrighted and has' limited warranties.Please see http://w
'     ww.Planet-Source-Code.com/vb/scripts/Sho
'     wCode.asp?txtCodeId=2770&lngWId;=1'for details.'**************************************

Dim objAgent
Dim objChar
Dim objRequest
Dim txtSpeak
Dim strName
Set objAgent = CreateObject("Agent.Control.1")
objAgent.Connected = True
strName = "Peedy" 'you can use genie, or merlin, or robby or whatever
objAgent.Characters.Load strName, strName & ".acs"
Set objChar = objAgent.Characters(strName)
'objChar.LanguageID = &h409;
objChar.Show
objChar.Speak("Hello! I'm " & strName)
objChar.Play "Wave"
txtSpeak = "What should I say next?"
While txtSpeak > ""
    objChar.Speak txtSpeak
    'objChar.Play "Hearing_1"
    txtSpeak = InputBox("What should I say next?", "Peedy App")
wend

objChar.Speak "Goodbye!" objChar.Hide MsgBox "Goodbye!", vbokonly, "Peedy App" Set objChar = Nothing objAgent.Characters.Unload strName


Other 1 submission(s) by this author

 

 
Report Bad Submission
Use this form to notify us if this entry should be deleted (i.e contains no code, is a virus, etc.).
Reason:
 
Your Vote!

What do you think of this code(in the Not Given category)?
(The code with your highest vote will win this month's coding contest!)
Excellent  Good  Average  Below Average  Poor See Voting Log
 
Other User Comments
8/3/1999 12:47:00 PM:Victor Maldonado
Hi! This Code is Great!
I have 
donloaded some
other languages but I 
don't know
Their Id's. Can you help me?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/19/1999 11:56:00 PM:MaXx
Ummm...where do you put that code in?
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
8/20/1999 12:05:00 AM:MaXx
Oops...i'm not very smart...I figured 
out where it went...
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
10/15/1999 8:12:00 AM:donglei-gu
I like it but how to get it?
need help.
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
1/28/2000 1:52:52 AM:Carmen
Please tell me where I can download the 
text - to - speech converter
Thanks
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
1/29/2000 9:29:18 PM:Positron
Great Code!  I love it!  I've been 
looking for some code like this for a 
while now!  It's easy to use too!, and 
short!  Thanks a lot!
Keep the Planet clean! If this comment was disrespectful, please report it:
Reason:

 
Add Your Feedback!
Note:Not only will your feedback be posted, but an email will be sent to the code's author in your name.

NOTICE: The author of this code has been kind enough to share it with you.  If you have a criticism, please state it politely or it will be deleted.

For feedback not related to this particular code, please click here.
 
Name:
Comment:

 

Categories | Articles and Tutorials | Advanced Search | Recommended Reading | Upload | Newest Code | Code of the Month | Code of the Day | All Time Hall of Fame | Coding Contest | Search for a job | Post a Job | Ask a Pro Discussion Forum | Live Chat | Feedback | Customize | Visual Basic Home | Site Home | Other Sites | About the Site | Feedback | Link to the Site | Awards | Advertising | Privacy

Copyright© 1997 by Exhedra Solutions, Inc. All Rights Reserved.  By using this site you agree to its Terms and Conditions.  Planet Source Code (tm) and the phrase "Dream It. Code It" (tm) are trademarks of Exhedra Solutions, Inc.