Dim message, sapi
message=InputBox(“Mit olvassak fel?”,”speaks”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
Copy-Paste txt – save as ****.vbs
Copy & Paste
- Kellemetlen – mondta Micimackó, és kitörölte a C:WINDOWS-t.
- Kellemetlen – mondta Micimackó, és kitörölte a C:WINDOWS-t.
Dim message, sapi
message=InputBox(“Mit olvassak fel?”,”speaks”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
Copy-Paste txt – save as ****.vbs
0 Válaszokr to “speaks”