Aforge拍照示例中，在拍照后通过百度的的文字识别采集到信息后，删除所有的图片如何改以下代码
Dim pl As WinForm.Panel = e.Form.Controls("Panel1")
Dim player As Aforge.Controls.VideoSourcePlayer = pl.basecontrol.controls("vp")
addhandler player.newframe, addressof player_newframe
Dim fileName As String = "54250.jpg" & DateTime.Now.ToString("yyyy-MM-dd-HH-mm-ss-ff") & ".jpg"
If filesys.FileExists(projectpath & "temp.jpg") Then
FileSys.CopyFile(projectpath & "temp.jpg",projectpath & filename)
FileSys.DeleteFile(projectpath & "temp.jpg")
MessageBox.Show("保存成功!")
Else
MessageBox.Show("请重新拍照!")
End If
removehandler player.newframe, addressof player_newframe
加好友 
发短信
Post By：2019/7/4 7:57:00 [显示全部帖子]
