Cách gọi tên tự động

[tung99]

Mình có làm file quản lý học sinh, trong đó có table "DANH SACH HOC SINH" gồm các fiel: MAHS, TEN, AMTHANH, ...
Với fiel AMTHANH mình dự định đọc và ghi âm tên của học sinh đó sau đó Insert vào ( ví dụ: MAHS:1 Nguyễn Văn A; MAHS:2 Nguyễn Văn B ...)
Tạo form "GOI TEN HOC SINH" có combobox lấy dữ liệu từ "DANH SACH HOC SINH"
Mình muốn khi nhắp chọn vào combobox học sinh nào thì máy sẽ phát âm thanh tên của học sinh đó
(Cụ thể là Insert file ghi âm vào fiel AMTHANH bằng cách nào, và khi chọn tại combobox thì máy sẽ đọc tên mà không cần phải nhắp vào AMTHANH )
Cảm ơn các bạn nhiều.

[spammailxxx]

Trước tiên bạn thêm vào form Active Control "Windows media Player" đặt tên là mediaplayer1. Nếu bạn k muốn thấy Active Control này khi View form thì bạn dùng thuộc tính Visible ẩn nó đi là được

ComboBox của bạn có :
+ Row Source l: SELECT [DANH SACH HOC SINH].[MaHS], [DANH SACH HOC SINH].[TenHS] FROM [DANH SACH HOC SINH];
+Column Count:2
+Column Witdth: 0";1; 'Combobox chỉ hiển thị tên học sinh thôi

Dùng đoạn code cho Combobox


Private Sub cboName_BeforeUpdate(Cancel As Integer)
Dim filePath As String
Dim Sql As String
Dim rs As DAO.Recordset

Sql = "Select [Am Thanh] from [DANH SACH HOC SINH] where [Mahs] =" & cboName.Column(0)
Set rs = CurrentDb.OpenRecordset(Sql)


If IsNull(rs.Fields("Am Thanh").Value) Then
'---- Neu file am thanh khong co
MsgBox "K ton tai file am thanh"
Else
filePath = rs.Fields("Am Thanh").Value
Me.MediaPlayer1.URL = filePath

End If
Set rs = Nothing
End Sub


Nếu bạn khó hiểu thì đưa email mình sẽ gửi chương trình demo. Diễn đàn k upload file được

[tung99]

Trước tiên mình xin thành thật cảm ơn sự nhiệt tình của bạn.
Để chắc ăn nhờ bạn mail dùm mình file demo đi! email: tung106144@yahoo.com
Chào bạn.

[spammailxxx]

Mình gửi mail cho bạn nhưng dường như email k chính xác. Bạn vui lòng down file tại đây (http://www.4shared.com/file/113336977/477c119/MediaPlayer.html)

[tung99]

Cảm ơn bạn rất nhiều, mình đã download file được rồi
Thấy cũng thú vị lắm, nhưng sao mình thực hiện ý mình chưa được, nhờ bạn giúp thêm mình nhé!
Cụ thể là mình ghi âm lời nói của mình và đặt tên file là DOC, sau đó lưu vào D:\GHIAM\DOC
Mình đã thêm 1 record trên vào file của bạn, nhưng khi chọn tại combobox thì nó im lặng 1 cách đáng sợ. Nhờ bạn giúp dùm mình đi!
Cảm ơn nhiều nhiều ...

[spammailxxx]

Bạn lưu đường dẫn trong tblFilesongs của mình có đúng k?( ví dụ:D:\GHIAM\DOC.wav?)
Nếu chưa đc bạn gửi chương trình của bạn qua mail của mình. saigontoiyeu@ymail.com

[tung99]

Cảm ơn bạn, mình làm được rồi. Thì ra đường dẫn các file phải có .wav nó mới đọc. Xin hỏi thêm bạn đối với những file là bài hát dạng MP3 thì phải làm sao ?
Cảm ơn bạn nhiều nhé, những nội dung bạn chỉ rất tuyệt!

[spammailxxx]

Mình nghĩ dạng .mp3 cũng làm như vậy. Thực chất đây là active control sử dụng Window Media Player của window, vì thế nếu Window Media Player của bạn chạy được file media nào thì ở access nó đều hỗ trợ.
Bạn hãy làm thử xem sao. Mình đã play thử file .mp3, .dat và thấy nó vẫn chạy tốt.
Chúc bạn thành công!