banner

[Rule] Rules  [Home] Main Forum  [Portal] Portal  
[Members] Member Listing  [Statistics] Statistics  [Search] Search  [Reading Room] Reading Room 
[Register] Register  
[Login] Loginhttp  | https  ]
 
Forum Index Thông tin về các địa chỉ và tài liệu hữu ích Download nhạc trên baihatvang.nhacso.net  XML
  [Question]   Download nhạc trên baihatvang.nhacso.net 14/01/2009 08:47:21 (+0700) | #1 | 166400
[Avatar]
gamma95
Researcher

Joined: 20/05/2003 07:15:41
Messages: 1377
Location: aaa">
Offline
[Profile] [PM] [ICQ]
Link: http://baihatvang.nhacso.net/
Mấy bài nhạc ở đây hay phết các bác ạh, file mp3 mỗi bài khoảng > 5Mb. Bác nào thích chạy cái script này để download tất cả bài nhạc đó (bản Original, ko phải bản có đọc lời bình)
(phải có python +wget nha) smilie
Code:
Usage:
$./nhacso.py

.... rồi ngồi chờ thằng wget nó lấy hết về
Cánh chym không mỏi
lol
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 09:22:25 (+0700) | #2 | 166404
[Avatar]
napoleon_tq
Elite Member

[Minus]    0    [Plus]
Joined: 05/12/2006 12:06:39
Messages: 1295
Offline
[Profile] [PM]
Cách của bác hơi phức tạp, thôi thì bọn em cứ dùng IDM cho nhanh smilie







Nhạc mp3 chất lượng cao, nghe ngon ra phết
smilie

Tuỳ tâm biến hiện.
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 10:28:20 (+0700) | #3 | 166410
[Avatar]
secmask
Elite Member

[Minus]    0    [Plus]
Joined: 29/10/2004 13:52:24
Messages: 553
Location: graveyard
Offline
[Profile] [PM] [WWW]
vào thấy cái counter vẫn là 0 times, thấy tội nghiệp anh gamma95 quá nên click vậy smilie)
mà cái script này download cả mẻ 100 bài luôn chứ không phải mở từng bài ra đâu bác napoleon_tq.
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 11:42:22 (+0700) | #4 | 166414
Genetic
Member

[Minus]    0    [Plus]
Joined: 11/07/2006 13:17:17
Messages: 114
Location: Hưng Yên
Offline
[Profile] [PM]
Thằng bạn bên FPT Music báo trước cách đây gần nửa năm là nhacSo sẽ cho download thoải mái nhạc chất lượng cao
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 12:43:18 (+0700) | #5 | 166418
[Avatar]
gamma95
Researcher

Joined: 20/05/2003 07:15:41
Messages: 1377
Location: aaa">
Offline
[Profile] [PM] [ICQ]

secmask wrote:
vào thấy cái counter vẫn là 0 times, thấy tội nghiệp anh gamma95 quá nên click vậy smilie)
mà cái script này download cả mẻ 100 bài luôn chứ không phải mở từng bài ra đâu bác napoleon_tq. 

Nếu mà là script để down xxx thì chắc giang hồ click mỏi tay rồi smilie. Lần sau rút kinh nghiệm, sẽ đặt tên mấy cái script này có dạng free_porn.py chắc ăn khách hơn smilie . Thanks secmask
Cánh chym không mỏi
lol
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 14:48:59 (+0700) | #6 | 166453
[Avatar]
nlfb
Journalist

[Minus]    0    [Plus]
Joined: 09/07/2003 16:41:21
Messages: 1175
Location: HCM
Offline
[Profile] [PM] [Yahoo!]
Đang down, thanks bác gamma nhé smilie

Ban đầu thử rồi nhưng k chạy, chú Mr.Bi chỉ cho thêm lệnh

sudo chmod +x nhacso.py 


là chạy được luôn, không biết cái ubuntu trên vmware này còn chỗ trống không smilie
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 16:32:23 (+0700) | #7 | 166459
FaL
Moderator

Joined: 14/04/2006 09:31:18
Messages: 1232
Offline
[Profile] [PM]
Lão gamma95 có nhiều chiêu hay nhỉ?
Tui dựa trên code của lão viết vài dòng perl, thấy nó cũng chạy được. Các bác không biết Python (như tui) có thể edit code này dùng tạm.
Code:
#!/usr/bin/perl
require HTTP::Request;
require LWP::UserAgent;
use LWP::Simple;
$head = 'http://baihatvang.nhacso.net/index.php?id=';
for ($i=1; $i<100; $i++)
{
   $dest = $head.$i;
   $request = HTTP::Request->new(GET => $dest);
   $usrAgent = LWP::UserAgent->new;
   $response = $usrAgent->request($request);
   if($response->is_success)
   {
      $s = $response->content;
      $s=~/(http:\/\/210.245.126.171\/Music\/BHV\/Original\/\w+.\w+\.mp3)/i;
      if ( $1 eq "")
      {
         print "Link not found!\n";
      }
      else
      {
         $tmp = 'wget '.$1;
         system($tmp);
      }
   }
   else
   {
      print "error in connection \n";
   }
}
print "\n";

Thay:
Code:
#!/usr/bin/perl

tương ứng.
Chạy:
Code:
perl <tên file>

Có gì mong các bác góp ý giúp.
Hãy giữ một trái tim nóng và một cái đầu lạnh
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 16:56:46 (+0700) | #8 | 166461
[Avatar]
Z0rr0
Q+WRtaW5pc3RyYXRvc+g

Joined: 14/08/2002 12:52:01
Messages: 1323
Location: Underground
Offline
[Profile] [PM] [WWW] [Yahoo!]
Nhân tiện quảng cáo tool nhỏ cho mấy bồ sài Windows hỗ trợ down tại nhacso.net nhacdinh.com: http://www.whatvn.com/data/tools/GetLink1.6.zip
Ko viết cho vụ BHV smilie
Hibernating
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 14/01/2009 22:10:17 (+0700) | #9 | 166469
[Avatar]
dungth02
Member

[Minus]    0    [Plus]
Joined: 25/12/2008 21:33:01
Messages: 72
Offline
[Profile] [PM]
Oh, hay thật, cảm ơn các bác nhiều lắm.
@Z0rr0: em nghĩ là bác nên cho thêm một cái button Minimize nữa để cho nó có thể nằm dưới Taskbar sẽ đẹp trời hơn.
PS: nếu được, các bác có thể sticky topic này lên để các soft trên được cập nhật thường xuyên smilie
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 15/01/2009 09:08:29 (+0700) | #10 | 166556
[Avatar]
napoleon_tq
Elite Member

[Minus]    0    [Plus]
Joined: 05/12/2006 12:06:39
Messages: 1295
Offline
[Profile] [PM]

Z0rr0 wrote:
Nhân tiện quảng cáo tool nhỏ cho mấy bồ sài Windows hỗ trợ down tại nhacso.net nhacdinh.com: http://www.whatvn.com/data/tools/GetLink1.6.zip
Ko viết cho vụ BHV smilie 


Em vừa thử down bài "Lời người ra đi" không được bác ạ:




Rõ ràng link mms có thấy đuôi .wma rồi nhưng bấm add to IDM thì hiện thông báo trên.

Tuỳ tâm biến hiện.
[Up] [Print Copy]
  [Question]   Re: Download nhạc trên baihatvang.nhacso.net 18/01/2009 15:42:14 (+0700) | #11 | 166906
[Avatar]
Z0rr0
Q+WRtaW5pc3RyYXRvc+g

Joined: 14/08/2002 12:52:01
Messages: 1323
Location: Underground
Offline
[Profile] [PM] [WWW] [Yahoo!]
Chắc có vấn đề gì khi gọi IDM, để tuần sau cài IDM sẽ xem lại và hiệu chỉnh như bồ dungth02 sử dụng.
Hibernating
[Up] [Print Copy]
  [Question]   Download nhạc trên baihatvang.nhacso.net 20/01/2010 14:06:15 (+0700) | #12 | 203630
[Avatar]
PhanPhungTien
Member

[Minus]    0    [Plus]
Joined: 13/08/2008 11:28:57
Messages: 133
Offline
[Profile] [PM]
Edit tí code của anh g4mm4 cho phù hợp smilie

_http://pastebin.com/f7127e0fe
[Up] [Print Copy]
  [Question]   Download nhạc trên baihatvang.nhacso.net 20/01/2010 18:34:12 (+0700) | #13 | 203640
[Avatar]
gamma95
Researcher

Joined: 20/05/2003 07:15:41
Messages: 1377
Location: aaa&quot;&gt;
Offline
[Profile] [PM] [ICQ]

PhanPhungTien wrote:
Edit tí code của anh g4mm4 cho phù hợp smilie

_http://pastebin.com/f7127e0fe 

_http://pastebin.com/fa2693 <-- update
Cánh chym không mỏi
lol
[Up] [Print Copy]
  [Question]   Download nhạc trên baihatvang.nhacso.net 21/01/2010 22:51:06 (+0700) | #14 | 203699
mR.Bi
Member

[Minus]    0    [Plus]
Joined: 22/03/2006 13:17:49
Messages: 812
Offline
[Profile] [PM] [WWW]
Ăn theo tí smilie . Tên ban nhạc hoặc album mà có khoảng trắng như Bon Jovi thì mấy bạn thêm vào thành "Bon Jovi" nha.
Code:
#! /usr/bin/env python
# Script to download Music from Dreammedia.ru
# Try to find your favorite Band and Album, then use this script
# hungnv coded 
import os
import urllib2
import sys
def usage():
		print "Usage:",sys.argv[0], "\"bandname\" \"albumname\""	
		
def st_replace(string):
		new = string.replace(' ','%20')
		return new
			
def download(url,pl,band,album):
		band1 = st_replace(band)
		album1 = st_replace(album)
		temp = (url + pl[:8] + '/' + band1 + '/' + album1 + '/' + pl)
		try:
				response = urllib2.urlopen(temp)
		except:
				print 'Connection error'
		response = urllib2.urlopen(temp)
		content = response.readlines()
		for line in content:
				a = line.find('music/')
				b = line.find('.mp3')
				if a <> -1 and b <> -1:
						path = line[a:b+4]
						semi = (url + '%s') %path
						final = st_replace(semi)
						os.system('wget '+final)
				else:
						continue
						
if __name__ == '__main__':
		band = sys.argv[1]
		album = sys.argv[2]
		url = "http://dreammedia.ru/"
		pl = 'playlist.xml'
		if len(sys.argv) <> 3:
				usage()
				exit()
		else:
				download(url,pl,band,album)
exit()



All of my life I have lived by a code and the code is simple: "honour your parent, love your woman and defend your children"
[Up] [Print Copy]
[digg] [delicious] [google] [yahoo] [technorati] [reddit] [stumbleupon]
Go to: 
 Users currently in here 
1 Anonymous

Powered by JForum - Extended by HVAOnline
 hvaonline.net  |  hvaforum.net  |  hvazone.net  |  hvanews.net  |  vnhacker.org
1999 - 2013 © v2012|0504|218|