Share toàn bộ Kho web ( Mu Bá Vương) [Lưu trữ]

View Full Version : Share toàn bộ Kho web ( Mu Bá Vương)

NhocCoi

10-12-09, 10:54 PM

Từ dã làm Game MU bước sang hướng mới mong mọi ng cho mình vài lời dễ nghe . Hay chúc mình may mắn ở công việc mới bạn nhé :)

Nếu thắc mắc gì bạn cứ pm mình rảnh vô trả lời
Hãy yên tâm xài , mình cũng bảo qua Hà rồi cậu ấy ko nói gì chắc là Oke hehe
Mà bản này bị share nhiều rồi , yên tâm đi đâu phải bản asp MuLC đâu , Mu Hoàng Long nè , Mu Net Bạn Bè , Bản Mu Aspx của HP nè , bản php của lamphuong cừ từ từ các bạn sẽ có hết tất cả Code web bạn muốn
À còn bản Mu Trống Đồng nữa rảnh test wa đưa lên luôn
=)) Nói nhiều đéo ai tin , cứ cho là phét đi rảnh ghé vào mà lượm lặt nhá
Bản Mu Thăng Long [Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
Bản Gốc nè bản này mà ai đã share cho mọi ng mà tên bài là web bảo mật dành cho Admin Mu gì gì đó ý
Link [Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
Bản web MU ANh Em [Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
Tiếp X_X [Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

Download hết về mà ngâm cứu làm cảnh cũng đc Up đc vậy thui
Còn mấy cái kia từ từ share hết cho các bạn
Chúc các bạn vui vẻ
Tạm biệt Mu Server
Note " 1 số cái thiếu DB rảnh mình up lên cho cái DB nặng lắm 54 MB hay sao ý X_X
Cám ơn ng đã Local Mu Bá Vương , cám ơn bạn đó nhiều , đã làm tôi Sụp đổ hoàn toàn , nợ nần chồng chất , gia đình thì cãi lộn ầm ầm , đối tác thì nghi nghờ và ko tin tưởng , tình bạn sứt mẻ .vvv =))
Cám ơn rất nhiều nhá

saigonlangtu

10-12-09, 11:42 PM

bóc tem, thanks bạn nhiều lắm, đúng là cái đang cần, để mình tét cái đã

adm_mubmt

11-12-09, 08:39 AM

:Laluot_180: Ha ha, đúng là " chuyện bây giờ mới kể "
Mu server đã đến hồi kết, nên để các server làm offline để hồi tưởng lại thời hoàng kim thôi.
Không chỉ riêng NhocCoi mà còn rất rất nhiều các cao thủ đã rời bỏ Mu server ra đi mãi mãi. Trên diễn đàn giờ chủ yếu chỉ có box hổi đáp là đông vui vì toàn những người tập tọe làm server lên hổi cách đưa lên online thế nào =))
Có lẽ cũng chỉ mấy hôm nữa tôi sẽ share toàn bộ kho web và kho server của tôi tự sưu tầm và chỉnh sửa rồi cũng chia tay luôn....
Các anh em trên diễn đàn khi đó uống với tôi 1 ly nhé!

Destruct

11-12-09, 11:54 AM

MuServer hay thế cơ mà. Chẳng có gì đi đến hồi kết cả, chỉ có sự yêu thích và có mới nới cũ thôi!

YeuVo_ThuongCon

11-12-09, 12:02 PM

Đúng cái gì cũng có giá của nó

Cũng như bản 97 > 1.0 đã shre rất good
nhưng đó là nhưng cái cũ

Cái cũ không đi sao cái mới lại đến

MU ko có kết chỉ thiếu là người có lòng với nó thôi

hoangtinpro

11-12-09, 12:09 PM

mặc dù ko dơload nhưng vẫn thank bạn chúc bạn trên còn đường mới sẽ tốt hơn .Đời lắm thèn dog lém bạn àh .:)

LilCe

11-12-09, 08:44 PM

Đam mê không nuôi sống đc bản thân <<<<< Lần thứ 2 nói trên clb này
Tớ thực sự đã từ bỏ. Lâu lâu ghé qua xem cãi nhau cho vui. Không support guide release gì nữa. Dành thời gian lo cho thực tế thì tốt hơn.
Peace!

Hà ML`

12-12-09, 03:28 PM

MU ko có kết chỉ thiếu là người có lòng với nó thôi

Như mày chẳng hạn :"> /:)/:)/:)

mylove09

12-12-09, 11:43 PM

web ko có DB thì chạy sao nhỉ :-?

Yahoo.com

13-12-09, 09:18 AM

web ko có DB thì chạy sao nhỉ :-?

Kết nhất câu của ông này ^_______^

gayluyxac

13-12-09, 09:35 AM

sao mình không chạy được cái web này nhỉ?>:P

Yahoo.com

13-12-09, 09:43 AM

sao mình không chạy được cái web này nhỉ?>:P

Tất cả web trên muốn chạy được phải đi cùng DB - MuOnline riêng của nó .

MuBeijing

13-12-09, 10:48 AM

vui vãi mu THăng long trên file connect thì bị block rồi mà các code web chức năng chuẩn ngon chưa bị block . ành gà hà mới làm thêm nhiều chức năng :)) bê về xài vậy thank you sướng vãi. :))

quoctiensinhvn

15-12-09, 10:17 AM

Nếu PRO mà có 1 bản hướng dẫn cài web này thì tốt biết mấy, thanks pro đã share cho tụi em mở rộng tầm mắt, nhớ kèm hướng dẫn nhé đại ka

ducongthanh

15-12-09, 05:08 PM

chờ mãi ko thấy chủ top share nốt database
file connect thì bị mã hóa :-?

Chiritokaji

15-12-09, 06:04 PM

Không biết có phải vậy ko? Web Encoder bằng VBScript.Encoder kinh quá :D

Sec_Connect.asp được có 1 đoạn ko à ^^. Mà cũng chẳng biết phải vậy ko nữa. Share đoạn chống DDOS cho anh em coi :D

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]
<div style="text-align:center">
<%
'### Datetime
Function DateTimeNum(ByVal strElement)
Dim strDateElement
Select Case strElement
Case "Nam"
strDateElement = CInt(Year(Now()))
Case "Thang"
strDateElement = CInt(Month(Now()))
Case "Ngay"
strDateElement = CInt(Day(Now()))
Case "Gio"
strDateElement = CInt(Hour(Now()))
Case "Phut"
strDateElement = CInt(Minute(Now()))
Case "Giay"
strDateElement = CInt(Second(Now()))
End Select
If strDateElement < 10 then strDateElement = "0" & strDateElement
DateTimeNum = strDateElement
End Function
'### Chong tan cong DOS bang lien ket truc tiep
strReferer = Request.ServerVariables("[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]")
If InStr(1, strReferer, "[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]", 1) = 0 Then
Response.Redirect("[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]")
Response.End()
End If
'###Ham chong an phim F5 lien tuc
private function GC_ChapTime(intSecond)
Dim valTimeNow, valChapTime
valChapTime = Session("ChapTime")
IF valChapTime = "" THEN
valChapTime = 0
Session("ChapTime") = 0
END IF
a = time
valTimeNow = Minute(Time)*60 + Second(Time)
IF valChapTime+intSecond > valTimeNow THEN
Session("ChapTime") = valTimeNow
%>
</div>

Yahoo.com

15-12-09, 06:52 PM

" Cho cái PC mà không cho cái bàn Phím " :-ss:-ss

Thanks vì công share

bachcotsau

15-12-09, 07:07 PM

Đúng cái gì cũng có giá của nó

Cũng như bản 97 > 1.0 đã shre rất good
nhưng đó là nhưng cái cũ

Cái cũ không đi sao cái mới lại đến

MU ko có kết chỉ thiếu là người có lòng với nó thôi

Đúng thế, nó chỉ kết thúc khi không còn ai có lòng với nó.
PS: Dự tính tháng sau share web 3.0 siêu tốc công nghệ số ajax cho mọi người dùng thử, lúc đó mong mọi người ủng hộ nhé.Vì không có nhiều thời gian rãnh nên thi thoảng mới code .

huntersun

15-12-09, 07:12 PM

Nếu share free thì tốt rồi. :x

bachcotsau

15-12-09, 08:09 PM

Vậy share kiểu ji mới không được coi là free >:)

Chiritokaji

15-12-09, 08:20 PM

Vậy share kiểu ji mới không được coi là free >:)

Chắc ổng kêu phải có cả KeyGen - Ko Encode - rồi....:D ^^!

NhocCoi

17-12-09, 10:21 PM

Đợi chút mọi ng nhé , tôi sẽ up sau dạo này gặp nhiều chuyện quá
@ Hà tớ cũng buồn có cậu tớ mới vào MU SERVER có cậu biết nhiều .. dựa vào cậu biết nhiều nhưng mà vì con non lên ng khác lợi dụng ảnh hưởng tới cậu sorry :|

huntersun

17-12-09, 10:52 PM

Giun nói cái gì thế, ai lợi dụng ?????

mylove09

18-12-09, 12:17 AM

chắc từ cái mu bá vương mà ra rồi
mâu thuẫn cá nhân . ko nên tìm hiểu quá sâu Hunter à

boydanvip100

19-12-09, 05:24 AM

bạn ơi up cái querry ý thay vì db :D

Yahoo.com

19-12-09, 01:32 PM

nói chung là phụ thuộc vào nhau , nên lịnh nhau tí . Không sau này nhớ vả nó " khó"

huyhaf

19-12-09, 05:52 PM

có cái DB và Web làm éo gi khó nhau thế. Pm tớ leehuyvn lấy DB và Web MU Thăng Long và Netbanbet license unlimited nhé

huntersun

19-12-09, 06:17 PM

[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]

antiblood

27-01-10, 12:31 PM

sao web asp em up lên host rồi mở port 1433 rồi mà sao vào web cứ báo là "mất liên lạc với máy chủ....." là sao nhi?

gackiem4

31-03-10, 11:53 AM

ai làm hướng dẫn cài Web MU Thang Long được không? mình thấy cái Skin đẹp quá

onetheside123

31-03-10, 12:01 PM

ai làm hướng dẫn cài Web MU Thang Long được không? mình thấy cái Skin đẹp quá
cơm mà mà ko biết ăn thì cũng thành [-X bạn à
các web là dành cho pro thôi
bạn chưa biết cả cách cài thì tốt nhất xài các web có hướng dẫn ngoài kia
không người làm ra web người ta bùn đấy o:-)
đã nấu cơm rồi mà bắt ng ta bón cho nữa thì .....(~~)

gackiem4

31-03-10, 12:05 PM

mình không biết thì hỏi ai giúp được thì thank mấy Web kia mình cài rồi lỗi không àh cài thử cái web nbb thì chẳng biết pass code là gì giờ thấy cái này thì không có hướng dẫn
bạn biết thì hướng dẫn cho mình đi

gackiem4

31-03-10, 05:24 PM

a/e nào hướng dẫn mình cài Web MU Thăng Long được không

gackiem4

08-04-10, 10:33 AM

ai có Query mấy Web trên Share cho mình với

Mr.Quy

20-04-10, 12:59 AM

với file Sec_Connect.asp của web MuThangLong hôm nọ mình share
thử cái củ ở dưới này vào xem đc ko nhóe :D
Còn data thì xem có phải là nằm ở trong folder MuThangLong\trangchu\Images\ohlala.jpge <=== ohlala.jpge ấy :D
còn không thì có cái data riêng của nó chạy chung với MuOnline này
mediafire.com/?1mhjyyzwyan
------------
Ai biết làm GG hay anti hack cho main chỉ em với nick :D ko.bietchat :D
dạo này khoái Mu rồi :"> :"> :">

<div style="text-align:center">
<%
'### Datetime
Function DateTimeNum(ByVal strElement)
Dim strDateElement
Select Case strElement
Case "Nam"
strDateElement = CInt(Year(Now()))
Case "Thang"
strDateElement = CInt(Month(Now()))
Case "Ngay"
strDateElement = CInt(Day(Now()))
Case "Gio"
strDateElement = CInt(Hour(Now()))
Case "Phut"
strDateElement = CInt(Minute(Now()))
Case "Giay"
strDateElement = CInt(Second(Now()))
End Select
If strDateElement < 10 then strDateElement = "0" & strDateElement
DateTimeNum = strDateElement
End Function
'###Ham chong an phim F5 lien tuc
private function GC_ChapTime(intSecond)
Dim valTimeNow, valChapTime
valChapTime = Session("ChapTime")
IF valChapTime = "" THEN
valChapTime = 0
Session("ChapTime") = 0
END IF
a = time
valTimeNow = Minute(Time)*60 + Second(Time)
IF valChapTime+intSecond > valTimeNow THEN
Session("ChapTime") = valTimeNow
Response.Write("<fieldset><legend>Chống Dos</legend>Tốc độ click chuột của bạn nhanh hơn vận tốc ánh sáng, hay bạn đang muốn thử một phép lạ?</fieldset>")
Response.End()
ELSE
Session("ChapTime") = valTimeNow
END IF
end function
'###Format Input data
private function formatchar(byval str)
str = replace(str, "'", "", 1, -1, 1)
str = replace(str,"""", "", 1, -1, 1)
str = replace(str, "<", "<", 1, -1, 1)
str = replace(str, ">", ">", 1, -1, 1)
str = replace(str, "[", "[", 1, -1, 1)
str = replace(str, "]", "]", 1, -1, 1)
str = replace(str, "=", "", 1, -1, 1)
str = replace(str, "select", "select", 1, -1, 1)
str = replace(str, "join", "join", 1, -1, 1)
str = replace(str, "union", "union", 1, -1, 1)
str = replace(str, "where", "where", 1, -1, 1)
str = replace(str, "insert", "insert", 1, -1, 1)
str = replace(str, "delete", "delete", 1, -1, 1)
str = replace(str, "update", "update", 1, -1, 1)
str = replace(str, "like", "like", 1, -1, 1)
str = replace(str, "drop", "drop", 1, -1, 1)
str = replace(str, "create", "create", 1, -1, 1)
str = replace(str, "modify", "modify", 1, -1, 1)
str = replace(str, "rename", "rename", 1, -1, 1)
str = replace(str, "alter", "alter", 1, -1, 1)
str = replace(str, "cast", "cast", 1, -1, 1)
formatchar = str
end function
'###Value Connect
dim connstr,conn
dim strUserName,lgVipUser,valVip,valExp,valCoin
'###Connect ODBC
on error resume next
connstr = "driver={sql server};server=mucnc.hopto.org,6565;uid=sa;pwd=who isthekingmucnc;database=MuOnline"
set conn = Server.CreateObject("ADODB.Connection")
conn.open connstr
IF err.number<>0 THEN
Set conn = Nothing
Response.Write("<fieldset><legend>Phát hiện lỗi</legend><center>Server đang trong quá trình bảo trì Mới các bạn quay lại sau</center></fieldset>")
Response.End()
END IF
'###Check Login Session
IF Session("User") <> "" THEN
strUserName = formatchar(Session("User"))
lgVipUser = false
Set adoRec = server.createobject("adodb.recordset")
'###Get Account Info
ssql="select * from MEMB_INFO where memb___id = '"& strUserName &"'"
adoRec.open ssql,conn,1,1
if not adoRec.eof then
valVip = adoRec("gc_vip")
valExp = adoRec("gc_exp")
valCoin = adoRec("gc_coin")
adoRec.close
Set adoRec = Nothing
Response.Cookies("Coin") = valCoin
if valVip = 9 then
if valExp > now() then 'kiem tra thoi han hieu luc cua vip
lgVipUser = true
Session("VipUser") = true
else
lgVipUser = false
Session("VipUser") = false
end if
else
lgVipUser = false
Session("VipUser") = false
end if
end if
adoRec.close
END IF
Set adoRec = nothing
'####Guild
Public Function LogoGuild(Byval strhex, na)
ketqua = ketqua & ""
For r = 1 To 64
ketqua = ketqua & "<img src=Images/Colour/" & Mid(strhex, r, 1) & ".gif id=toadoz"& r &" >"
If ((r Mod 8) = 0) And (r < 64) Then
ketqua = ketqua & " "
ElseIf (r = 64) Then
ketqua = ketqua & ""
End If
Next
ketqua = ketqua
LogoGuild = ketqua &""
End Function
Public Function LogoGuildTo(Byval strhex, na)
ketquaTo = ketquaTo & ""
For r = 1 To 64
ketquaTo = ketquaTo & "<img src=Images/Colour/" & Mid(strhex, r, 1) & ".gif id=toadoz"& r &" width=15 height=15>"
If ((r Mod 8) = 0) And (r < 64) Then
ketquaTo = ketquaTo & " "
ElseIf (r = 64) Then
ketquaTo = ketquaTo & ""
End If
Next
ketquaTo = ketquaTo
LogoGuildTo = ketquaTo &""
End Function
Public Function Hex2Color(Byval strhex)
if (strhex = "0") then Hex2Color = "#660066"
if (strhex = "1") then Hex2Color = "#000000"
if (strhex = "2") then Hex2Color = "#8c8a8d"
if (strhex = "3") then Hex2Color = "#FFFFFF"
if (strhex = "4") then Hex2Color = "#fe0000"
if (strhex = "5") then Hex2Color = "#ff8a00"
if (strhex = "6") then Hex2Color = "#ffff00"
if (strhex = "7") then Hex2Color = "#8cff01"
if (strhex = "8") then Hex2Color = "#00ff00"
if (strhex = "9") then Hex2Color = "#01ff8d"
if (strhex = "a" or strhex = "A") then Hex2Color = "#00ffff"
if (strhex = "b" or strhex = "B") then Hex2Color = "#008aff"
if (strhex = "c" or strhex = "C") then Hex2Color = "#0000fe"
if (strhex = "d" or strhex = "D") then Hex2Color = "#8c00ff"
if (strhex = "e" or strhex = "E") then Hex2Color = "#ff00fe"
if (strhex = "f" or strhex = "F") then Hex2Color = "#ff008c"
End Function
Public Function Color2Hex(Byval strcolor)
if (strcolor = "#660066") then
Color2Hex = "0"
elseif (strcolor = "#000000") then
Color2Hex = "1"
elseif (strcolor = "#8c8a8d") then
Color2Hex = "2"
elseif (strcolor = "#ffffff") then
Color2Hex = "3"
elseif (strcolor = "#fe0000") then
Color2Hex = "4"
elseif (strcolor = "#ff8a00") then
Color2Hex = "5"
elseif (strcolor = "#ffff00") then
Color2Hex = "6"
elseif (strcolor = "#8cff01") then
Color2Hex = "7"
elseif (strcolor = "#00ff00") then
Color2Hex = "8"
elseif (strcolor = "#01ff8d") then
Color2Hex = "9"
elseif (strcolor = "#00ffff") then
Color2Hex = "A"
elseif (strcolor = "#008aff") then
Color2Hex = "B"
elseif (strcolor = "#0000fe") then
Color2Hex = "C"
elseif (strcolor = "#8c00ff") then
Color2Hex = "D"
elseif (strcolor = "#ff00fe") then
Color2Hex = "E"
elseif (strcolor = "#ff008c") then
Color2Hex = "F"
else
Color2Hex = "False"
end if
End Function
%>
</div>