Parsing data
set isi_profil=replace(isi_profil,
(
substring(
substring(isi_profil,instr(isi_profil,"
1,
instr(substring(isi_profil,instr(isi_profil,"
)
),"")
where isi_profil !='' and isi_profil like '%src="%'
Akal-akalan
select id_dokter, substring(gambar,1,instr(gambar,'"')-1) pathgambar
from (
select id_dokter, path, substring(path,instr(path, "src")+6) gambar
from (
select id_dokter, isi_profil, gambar,
substring(isi_profil,instr(isi_profil,"
from profil_dokter where isi_profil !='' and isi_profil like '%src="%'
)a
)x
inner join (
SELECT id_dokter, reverse(substring(REVERSE(pathgambar), 1, instr(REVERSE(pathgambar),'/')-1)) gambar_dokter
from x
)y on (a.id_dokter=y.id_dokter)
set gambar=gambar_dokter
Bermain-main dengan path
from (
select id_dokter, path, substring(path,instr(path, "src")+6) gambar
from (
select id_dokter, isi_profil, gambar,
substring(isi_profil,instr(isi_profil,"
from profil_dokter where isi_profil !='' and isi_profil like '%src="%'
)a
)x
Update subquery
from trmasterincentive a
inner join (
select a.idstructure, incentive, cast(incentive*score as int) incentiveNP
from (
select idstructure, percentage, sum(incentive) incentive from _incentiveNPPercentage
group by idstructure, percentage
)a inner join trmasterincentive b on (a.idstructure=b.idstructure)
inner join mscore c on (status=10 and a.percentage between fromrange and torange)
) b on (a.idstructure=b.idstructure)
Query Iseng
select *
from (
select distinct b.idstructure, a.idscheme, c.idscheme idscheme2, c.iscombo
from TrMasterIncentive a
inner join TrRekapIdCovJob b on (a.idstructure=b.idstructure)
inner join mscheme c on (b.idjob=c.idjob and b.idsubcat=c.idsubcat AND IsActive = 'T' and b.iscombo=0 and ('2012-01-01' between c.StartDate and c.EndDate))
where idcat=10 and a.idlogincentive=162
union
select distinct b.idstructure, a.idscheme, c.idscheme idscheme2, c.iscombo
from TrMasterIncentive a
inner join TrRekapIdCovJob b on (a.idstructure=b.idstructure)
inner join mscheme c on (b.idjob=c.idjob and b.idsubcat=c.idsubcat AND IsActive = 'T' and b.iscombo=1 and ('2012-01-01' between c.StartDate and c.EndDate))
where b.iscombo=1 and a.idlogincentive=162
union
select distinct b.idstructure, a.idscheme, c.idscheme idscheme2, c.iscombo
from TrMasterIncentive a
inner join TrRekapIdCovJob b on (a.idstructure=b.idstructure)
inner join mscheme c on (b.idjob=c.idjob and b.idsubcat=c.idsubcat AND IsActive = 'T' and ('2012-01-01' between c.StartDate and c.EndDate))
where b.idjob in(1,24) and a.idlogincentive=162
) xyz
) bbb on (aaa.idstructure=bbb.idstructure)
Cek Mobile Browser
http://www.ziddu.com/download/15826372/browser.txt.html
Tip sederhana mencegah virus masuk ke komputer
- Matikan autorun. Klik Start > Run > gpedit.msc > Local Computer Policy > Computer Configuration > Administrative Templates > System >Klik 2x Turn off Auto Play > Enabled
- Selalu show kan semua file (bahkan juga untuk file OS)
Di windows explorer > Tools > Folder Options > View > Klik Centang semua display dan show hidden files and folder dan Uncheck semua Hide - Saat mencolok flasdisk atau hardisk external jangan langsung masuk lewat icon di my computer tp lewat windows explorer saja.
- Point 1 dan 4sangat efektif untuk menghindari virus yg menyerang dengan memanfaatkan fitur autorun. Sedangkan point 2 dan 3 digunakan sebagai pendeteksi apakah komputer kita terserang virus atau tidak, karena hampir semua virus menyerang fitur ini agar file induk virus tidak ditemukan.
- Sebaiknya sih, saat mencolok flasdisk atau hardisk external, coba liat file2nya apakah ada file autorun.inf. Kalo ada coba buka dan cek isinya, klo isinya panjang dan gak jelas, maka kemungkinan besar flasdisk atau hardisk terbut udah terserang virus, tinggal hati2 aja lagi virus terbut menyerang apa, apakah file, atau lainnya.
- Saat membuka file perhatikan extensionnya, apabila ada yg aneh misal, file word 2007 yg seharusnya .docx menjadi .exe maka kemungkinan besar file tersebut sudah kena virus, jadi apabila tidak ingin menular ke komputer jangan di jalankan dulu file tersebut. Tapi alangkah baiknya di cari dulu penangkalnya. Banyak kok sekarang provider AV mengeluarkan versi portabel untuk virus2 khusus, dan biasanya kalo memakai versi itu file tersebut dapat diperbaiki.
- Klo download software, perhatikan dulu sebelum diinstall, berdasarkan pengalaman saya rada2 susah memebedakan keygen yg bukan virus dan virus. Bisa jadi walau kedetect virus oleh AV tapi ternyata bukan virus, nah biasanya saya disini hanya mengandalkan feeling saja, hehehehe Klo keygennya virus biasanya tidak ada iconnya, trus filenya juga relatif sangat kecil di bawah 10 kB
(koral web)
Enkripsi di SQL Server
- AES_ENCRYPT(str,key_str), AES_DECRYPT(crypt_str,key_str)
- ENCODE(str,pass_str), DECODE(crypt_str,pass_str)
- DES_DECRYPT(crypt_str[,key_str]), DES_ENCRYPT(str[,{key_num|key_str}])
- ENCRYPT(str[,salt])
- MD5(str)
- SHA1(str), SHA(str)
--------------------------
CREATE FUNCTION dbo.fnInitRc4
(
@Pwd VARCHAR(256)
)
RETURNS @Box TABLE (i TINYINT, v TINYINT)
with ENCRYPTION
AS
BEGIN
DECLARE @Key TABLE (i TINYINT, v TINYINT)
DECLARE @Index SMALLINT,
@PwdLen TINYINT
SELECT @Index = 0,
@PwdLen = LEN(@Pwd)
WHILE @Index <= 255
BEGIN
INSERT @Key(i,v)
VALUES (@Index,ASCII(SUBSTRING(@Pwd, @Index % @PwdLen + 1, 1)))
INSERT @Box(i,v)
VALUES (@Index,@Index)
SELECT @Index = @Index + 1
END
DECLARE @t TINYINT,
@b SMALLINT
SELECT @Index = 0,
@b = 0
WHILE @Index <= 255
BEGIN
SELECT @b = (@b + b.v + k.v) % 256
FROM @Box AS b
INNER JOIN @Key AS k ON k.i = b.i
WHERE b.i = @Index
SELECT @t = v
FROM @Box
WHERE i = @Index
UPDATE b1
SET b1.v = (SELECT b2.v FROM @Box b2 WHERE b2.i = @b)
FROM @Box b1
WHERE b1.i = @Index
UPDATE @Box
SET v = @t
WHERE i = @b
SELECT @Index = @Index + 1
END
RETURN
END
---------------------
CREATE FUNCTION dbo.fnRC4
(
@Pwd VARCHAR(256),
@Text VARCHAR(8000)
)
RETURNS VARCHAR(8000)
with ENCRYPTION
AS
BEGIN
DECLARE @Box TABLE (i TINYINT, v TINYINT)
INSERT @Box(i,v)
SELECT i,v
FROM dbo.fnInitRc4(@Pwd)
DECLARE @Index SMALLINT,
@i SMALLINT,
@j SMALLINT,
@t TINYINT,
@k SMALLINT,
@CipherBy TINYINT,
@Cipher VARCHAR(8000)
SELECT @Index = 1, @i = 0, @j = 0, @Cipher = ''
WHILE @Index <= DATALENGTH(@Text)
BEGIN
SELECT @i = (@i + 1) % 256
SELECT @j = (@j + b.v) % 256
FROM @Box b
WHERE b.i = @i
SELECT @t = v
FROM @Box
WHERE i = @i
UPDATE b
SET b.v = (SELECT w.v FROM @Box w WHERE w.i = @j)
FROM @Box b
WHERE b.i = @i
UPDATE @Box
SET v = @t
WHERE i = @j
SELECT @k = v
FROM @Box
WHERE i = @i
SELECT @k = (@k + v) % 256
FROM @Box
WHERE i = @j
SELECT @k = v
FROM @Box
WHERE i = @k
SELECT @CipherBy = ASCII(SUBSTRING(@Text, @Index, 1)) ^ @k,
@Cipher = @Cipher + CHAR(@CipherBy)
SELECT @Index = @Index +1
END
RETURN @Cipher
END
------------------------------
kalau kalian punya metode lain bisa di share dunk .... :)
(koral web)
Admin Finder
import sys, os, time, httplib
if sys.platform == 'linux' or sys.platform == 'linux2':
clearing = 'clear'
else:
clearing = 'cls'
os.system(clearing)
if len(sys.argv) != 2:
print "\n|---------------------------------------------------------------|"
print "| b4ltazar[@]gmail[dot]com |"
print "| 03/2009 Admin login finder v2.0 |"
print "| Help: admin-find.py -h |"
print "| Visit www.darkc0de.com and www.ljuska.org |"
print "|---------------------------------------------------------------|\n"
sys.exit(1)
for arg in sys.argv:
if arg == '-h':
print "\n|-------------------------------------------------------------------------------|"
print "| b4ltazar[@]gmail[dot]com |"
print "| 03/2009 Admin login finder v2.0 |"
print "| Usage: admin-find.py www.site.com |"
print "| Example: admin-find.py site.com |"
print "| Visit www.darkc0de.com and www.ljuska.org |"
print "|-------------------------------------------------------------------------------|\n"
sys.exit(1)
site = sys.argv[1].replace("http://","").rsplit("/",1)[0]
site = site.lower()
admin_path = ['admin.php','admin/','administrator/','moderator/','webadmin/','adminarea/','bb-admin/','adminLogin/','admin_area/','panel-administracion/','instadmin/','memberadmin/','administratorlogin/','adm/','admin/account.php','admin/index.php','admin/login.php','admin/admin.php','admin/account.php','joomla/administrator','login.php',
'admin_area/admin.php','admin_area/login.php','siteadmin/login.php','siteadmin/index.php','siteadmin/login.html','admin/account.html','admin/index.html','admin/login.html','admin/admin.html','admin_area/index.php','bb-admin/index.php','bb-admin/login.php','bb-admin/admin.php','admin/home.php','admin_area/login.html','admin_area/index.html','admin/controlpanel.php','admincp/index.asp','admincp/login.asp','admincp/index.html','admin/account.html','adminpanel.html','webadmin.html','webadmin/index.html','webadmin/admin.html','webadmin/login.html','admin/admin_login.html','admin_login.html','panel-administracion/login.html','admin/cp.php','cp.php','administrator/index.php','administrator/login.php','nsw/admin/login.php','webadmin/login.php','admin/admin_login.php','admin_login.php','administrator/account.php','administrator.php','admin_area/admin.html','pages/admin/admin-login.php','admin/admin-login.php','admin-login.php','bb-admin/index.html','bb-admin/login.html','bb-admin/admin.html','admin/home.html','modelsearch/login.php','moderator.php','moderator/login.php','moderator/admin.php','account.php','pages/admin/admin-login.html','admin/admin-login.html','admin-login.html','controlpanel.php','admincontrol.php',
'admin/adminLogin.html','adminLogin.html','admin/adminLogin.html','home.html','rcjakar/admin/login.php','adminarea/index.html','adminarea/admin.html','webadmin.php','webadmin/index.php','webadmin/admin.php','admin/controlpanel.html','admin.html','admin/cp.html','cp.html','adminpanel.php','moderator.html','administrator/index.html','administrator/login.html','user.html','administrator/account.html','administrator.html','login.html','modelsearch/login.html','moderator/login.html','adminarea/login.html','panel-administracion/index.html','panel-administracion/admin.html','modelsearch/index.html','modelsearch/admin.html','admincontrol/login.html','adm/index.html','adm.html','moderator/admin.html','user.php','account.html','controlpanel.html','admincontrol.html','panel-administracion/login.php','wp-login.php','adminLogin.php','admin/adminLogin.php','home.php','adminarea/index.php','adminarea/admin.php','adminarea/login.php','panel-administracion/index.php','panel-administracion/admin.php','modelsearch/index.php','modelsearch/admin.php','admincontrol/login.php','adm/admloginuser.php','admloginuser.php','admin2.php','admin2/login.php','admin2/index.php','adm/index.php','adm.php','affiliate.php','adm_auth.php','memberadmin.php','administratorlogin.php']
print "\n|---------------------------------------------------------------|"
print "| b4ltazar[@]gmail[dot]com |"
print "| 03/2009 Admin login finder v2.0 |"
print "| Visit www.darkc0de.com and www.ljuska.org |"
print "|---------------------------------------------------------------|\n"
print "\n[-] %s" % time.strftime("%X")
print "[+] Target:",site
print "[+] Checking paths..."
try:
for admin in admin_path:
admin = admin.replace("\n","")
admin = "/" + admin
connection = httplib.HTTPConnection(site)
connection.request("GET",admin)
response = connection.getresponse()
print "%s %s %s" % (admin, response.status, response.reason)
except(KeyboardInterrupt,SystemExit):
raise
except:
pass
--------------------------------------------------
Sekedar mau sharing... gwe dapet source code tersebut dari salah satu milis.... kalau cms Anda memiliki folder/file seperti source code berwarna merah, Anda harus berhati-hati karena begitu ada bugs di web Anda kemungkinan besar web Anda bisa di hack.
Ngakalin Registrasi di Visual Studio Express
Berikut sedikit trik buat kamu yang menggunakan visual studio express yang habis masa berlaku registrationnya.
1. Start > Run > Ketik Regedit
2. Rename HKEY_CURRENT_USER\Software\Microsoft\VWDExpress\9.0\Registration menjadi
HKEY_CURRENT_USER\Software\Microsoft\VWDExpress\9.0\Registration_sv
Silahkan koding lagi bos ;)
Detect invisible Yahoo! Messenger users
Bagi para pemakai Yahoo Messenger mungkin tidak asing lagi dengan status invisible. Banyak alasan kenapa user memasang status invisble, biasanya sih lagi sibuk dan malas di ganggu. Ada beberapa website yang menawarkan untuk melihat status dari pengguna YM salah satunya yahooscan. Untuk mengujinya kita tinggal masukan saja id YM-nya. Silahkan di coba
Hari ini, hari kedua gwe ngeblog di blogspot. Iseng-iseng gwe ngebrowse nama gwe di google.... Sial masih belum ke index juga web gwe andy-reza.blogspot.com. Bahkan gwe browse dengan andy-reza.blogspot.com juga masih ngga ketemu... :(
Yang bikin gwe surprise dari pencarian ini, gwe nemu web gwe yang lama yang gwe buat 15 Juni 2008 atau hampir 2 tahun lalu. Web ini cuma iseng-iseng doang. gwe cuma pengen tau Wordpress itu apa :D abis itu webnya gwe tinggalin dan ngga gwe urus lagi, bahkan gwe lupa gwe buat itu pake username apaan :D
Walaupun berada di page ke-5, gwe masih tetap salut sama wordpress. Wordpress masih terus mempromosikan web gwe, tanpa gwe suruh bahkan ngga gw gaji :D. Gwe sih berharap blogspot bisa melakukan lebih dari wordpress.... (ngarep :D)
Blog Archive
About Me
- Koral Web
- Kami adalah web developer. Beberapa produk yang pernah kami buat antara lain website, aplikasi klinik, aplikasi apotik, aplikasi EDMS (Electronic Database Management System), Energy Consumption Management System, RKBI (Rencana Kunjungan Barang Import) dan lain-lain sesuai dengan request dari client kami. Jika Anda tertarik untuk membuat system atau aplikasi, jangan sungkan-sungkan menghubungi kami.
Bahasa Pemrogramanmu?
Nasihat
Web Sunnah
Blog Archieve
- Info (3)
- Kajian (3)
- My Program (1)
- Orang Terkenal (1)
- scrip (2)
- SQL (23)
- Subquery (9)
- Trik (13)