Latest posts for the topic "làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)"

làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

daicaducne — GMT

Chào mấy anh em Thắc mắc để làm sao để dữ liệu xuất ra ko được trùng nhau Ví dụ: Mình làm 1 List ca sĩ rồi.Sau khi ấn vào tên casi thì nó sẽ hiện ra bài hát.nhưng mà khi nhập dữ liệu vào thì nhập link bài hat,tên bài hat,tên casi.tất cả đều 1 recordset nhưng khi xuất ra thì có quá nhiều tên casi trùng nhau với số Lượng tên casi bằng với số lượng tên bài hát. Vậy làm sao để tất cả tên casi trùng nhau thì nó chỉ xuất ra 1 tên casi thôi. mình thử dùng select distinct ma` ko được.bạn àno có ý tưởng thì giúp mình nhé :|-))

Re: làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

soccon — GMT

Theo ý hiểu của tôi thì hiện bạn đang chỉ sử dụng một bảng để chứa các trường TENCASI; TENBAIHAT; LINK. Nếu bạn làm như vậy thì sẽ rất khó khăn trong việc Select lấy dữ liệu, đó là chưa kể đến việc CSDL sẽ bị lãng phí. Bạn nên tạo 2 bảng Bảng 1: đặt tên là bảng tblCaSi chẳng hạn, trong đó có các trường CS_ID (key); CS_Name(nvarchar) Bảng 2: đặt tên là bảng tblBaiHat chẳng hạn, trong đó có các trường BH_ID (key); BH_CaSiId (FK); BH_Name (nvarchar); BH_Link (nvarchar) Sau đó bạn hoàn toàn có thể Select 2 bảng này để lấy dữ liệu ra với tiêu chí là 1 ca sĩ có thể có nhiều bài hát. Không hiểu những ý tưởng trên có đúng với những gì bạn cần không? Nếu không phải thì bạn hãy nói rõ hơn ý muốn của mình để mọi người hiểu hơn. Chúc bạn sớm thành công

Re: làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

daicaducne — GMT

thanks bạn nhìu lắm nhưng mà mình ko bít cách select từ 2 bảng .nhưng mà select từ 2 bảng thì đâu có chung record set đâu mà lấy thông tin từ table nhac khi nhấp vào tên casi của table casi bạn chỉ mình cách select đi thanks :|-))

Re: làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

soccon — GMT

Nếu bạn chỉ cần lấy tất cả các bài hát của chỉ 1 ca sĩ thôi thì điều này tương đối đơn giản. Ví dụ trên bảng tblCasi bạn có các record sau CS_ID CS_Name 1 A 2 B ... ... với A, B là tên ca sĩ Và trên bảng tblBaiHat bạn có các record sau BH_ID BH_CasiId BH_Name BH_Link 1 1 xyz xyz123 2 1 abc abc123 3 2 lmn lmn123 Nếu bạn đã từng học qua CSDL thì bạn sẽ hiểu rằng BH_CasiId là khóa ngoại, nó có quan hệ many - one với trường CS_ID của bảng tblCasi. Khi đó bạn có thể sử dụng câu truy vấn như sau SQLtext = "SELECT * FROM tblCasi, tblBaiHat where BH_CaSiId = CS_ID AND CS_ID = " & intCaSiId bạn sử dụng câu lệnh này thì bạn phải truyền qua query id của ca sĩ mà bạn đã chọn. Để cụ thể hơn, bạn có thể tham khảo đoạn code dưới đây Ở đoạn code này tôi sử dụng ví dụ CSDL trên dưới tên file là db1.mdb * FILE1: listCasi.asp <% Dim objSelectCaSi, oConn Dim SQLtext, strFilePath, DuongDan Set oConn = Server.CreateObject("ADODB.Connection") strFilePath = Server.MapPath("db1.mdb") DuongDan = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &strFilePath oConn.Open DuongDan dataConnect = oConn oConn.close set oConn = nothing Set objSelectCaSi = CreateObject("ADODB.RecordSet") SQLtext = "Select * From tblCasi Order By CS_Name" objSelectCaSi.Open SQLtext, dataConnect, 3, 3 While NOT objSelectCaSi.EOF %> <% objSelectCaSi.MoveNext Wend objSelectCaSi.Close Set objSelectCaSi = Nothing %>

Ten ca si	Xem bai hat
<%=objSelectCaSi("CS_Name")%>	"> Xem bai hat

* FILE2: listBaiHat.asp <% Dim objSelectBaiHat, oConn Dim DuongDan, strFilePath, dataConnect Set oConn = Server.CreateObject("ADODB.Connection") strFilePath = Server.MapPath("db1.mdb") DuongDan = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &strFilePath oConn.Open DuongDan dataConnect = oConn oConn.close set oConn = nothing Dim intCasiId intCasiId = 0 If Request.QueryString("casiId") <> "" Then intCasiId = Request.QueryString("casiId") intCasiId = Cint(intCasiId) ' Tranh truong hop nguoi su dung thay doi tham so truyen vao la mot gia tri khong phai la number %> <% Set objSelectBaiHat = CreateObject("ADODB.Recordset") SQLtext = "Select * From tblCasi, tblBaiHat Where BH_CasiId = CS_ID AND CS_ID = " &intCasiId objSelectBaiHat.Open SQLtext, dataConnect, 3, 3 IF NOT objSelectBaiHat.EOF OR NOT objSelectBaiHat.BOF Then %> <%While NOT objSelectBaiHat.EOF%> <% objSelectBaiHat.MoveNext Wend %> <% End IF objSelectBaiHat.Close Set objSelectBaiHat = Nothing %>

Cac bai hat cua ca si <%=objSelectBaiHat("CS_Name")%>
Ten bai hat	Link
<%=objSelectBaiHat("BH_Name")%>	<%=objSelectBaiHat("BH_Link")%>

Trên đây là 2 file mà tôi nghĩ là có thể thể hiển được ý tưởng của bạn. Nếu bạn cần một danh sách các bài hát của tất cả các ca sĩ thì bạn có thể ghép 2 file trên lại cho lồng vào nhau. Nhưng đó là một ý tưởng không hay vì như vậy danh sách sẽ rất dài. Chúc bạn sớm thành công

Re: làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

daicaducne — GMT

bạn thử sửa dùm mình cái này coai mình sửa cái selec 1 bảng thành select 2 bảng mà ko được bạn thử giúp mình nhé thanks nếu thấy rối mắt thì del hết java đi để asp là mình hiểu rồi :wink: http://boybuon.nghiepdu.com/gaiviet/Music.zip

Re: làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

daicaducne — GMT

bạn ơi sao mấy ngày nay ko thấy lên vậy sửa dùm mình được ko :|-))

Re: làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

soccon — GMT

daicaducne wrote:

bạn ơi sao mấy ngày nay ko thấy lên vậy sửa dùm mình được ko :|-))

Mình hơi bận nên ít có thời gian online được, bạn để lại địa chỉ email cho mình, mình sẽ gửi bộ source đã chỉnh sửa lại cho bạn.

Re: làm sao dữ liệu xuất ra ko được trùng nhau(ASP VBScript)

daicaducne — GMT

boy_cui_bap_tien_sinh@yahoo.com