如何把文本矿中的一段文字转化成wav格式的文件并保存到固定的硬盘目录上面?

jacobzhang 2005-09-05 04:27:51
注意:1。我要求是在webapplication 下面完成的,不是winform下完成的,所以不要提供winform的代码,我已经有了。2。把文本筐中的txt文字转化为wav音频文件,并且自动生成文件名保存到硬盘上面。3。是自动保存,也就是说不要弹出对话框输入文件名和保存的路径。4。最好使用vb.net语言。谢谢。
...全文
209 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
jacobzhang 2005-09-06
  • 打赏
  • 举报
回复
看来又没有办法揭帖了。
jacobzhang 2005-09-05
  • 打赏
  • 举报
回复
高手请进。
jacobzhang 2005-09-05
  • 打赏
  • 举报
回复
这段代码是保存到硬盘上面,那么如何与前面转化来的wav文件关联起来啊?我在winform下写的转化代码是这样的:
Dim cfile As SaveFileDialog = New SaveFileDialog
Dim SpFlags As SpeechVoiceSpeakFlags = SpeechVoiceSpeakFlags.SVSFlagsAsync
Dim speech As SpVoice = New SpVoice
cfile.Filter = "wav files (*.wav)|*.wav"
cfile.Title = "Save to a wave file"
cfile.FilterIndex = 2
cfile.RestoreDirectory = True
If cfile.ShowDialog() = DialogResult.OK Then
Dim SpFileMode As SpeechStreamFileMode = SpeechStreamFileMode.SSFMCreateForWrite
Dim SpFileStream As SpFileStream = New SpFileStream
SpFileStream.Open(cfile.FileName, SpFileMode, False)
speech.AudioOutputStream = SpFileStream
speech.Speak(Me.TextBox1.Text, SpFlags)
speech.WaitUntilDone(Timeout.Infinite)
SpFileStream.Close()
End If
缺陷是:弹出对话框要你输入wav文件的名称和保存的路径,另外在webform下出现错误。
SpaceTime 2005-09-05
  • 打赏
  • 举报
回复
Function CreateFile(ByVal str As String)
If File.Exists("C:/AAA.WAV") = True Then
File.Delete("C:/AAA.WAV")
End If
Dim sw As StreamWriter = File.CreateText("C:/AAA.WAV")
sw.WriteLine(str)
sw.Flush()
sw.Close()
End Function
jacobzhang 2005-09-05
  • 打赏
  • 举报
回复
与我的思路两样,虽然他也是转换音频格式的文件。
LoveCherry 2005-09-05
  • 打赏
  • 举报
回复
http://www.cnblogs.com/haoxiaobo/archive/2005/06/04/168062.html
jacobzhang 2005-09-05
  • 打赏
  • 举报
回复
说明一下是在服务器端运行的。

62,253

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。

试试用AI创作助手写篇文章吧