Friday, March 30, 2012
Reset Password Joomla
UPDATE `jos_users` SET `password` = MD5( 'new_password' ) WHERE `jos_users`.`username` = "admin" ;
Wednesday, March 21, 2012
Excel: excel Cannot shift object off sheet
Warning : excel Cannot shift object off sheet
Sub Test()
Dim s As Shape
On Error Resume Next
For Each s In ActiveSheet.Shapes
s.Placement = xlMoveAndSize
Next
End Sub
Sub Test()
Dim s As Shape
On Error Resume Next
For Each s In ActiveSheet.Shapes
s.Placement = xlMoveAndSize
Next
End Sub
Tuesday, March 20, 2012
Tanda Tangan Digital
Bagaimana membuat tanda tangan digital? Di link berikut ini caranya
http://www.mylivesignature.com
http://www.mylivesignature.com
Tuesday, March 6, 2012
SELEKSI FILE DAN SHEET
NamaFile = Cells(2, 3).Value
NamaSheet = Cells(3, 3).Value
Windows(NamaFile).Activate
Sheets(NamaSheet).Select
NamaSheet = Cells(3, 3).Value
Windows(NamaFile).Activate
Sheets(NamaSheet).Select
Tuesday, February 7, 2012
Create Domain in Localhost
1. Edit File httpd.conf then create VirtualHost
ServerName wordpress
ServerAlias wordpress
DocumentRoot "G:/03.DATA.WEB/00A.Personal/020.warungilmu.info"
Options Indexes FollowSymLinks
AllowOverride All
Order allow,deny
Allow from all
2. Edit file Hosts in C:\Windows\System32\drivers\etc\hosts
127.0.0.1 localhost
127.0.0.1 wordpress
3. Restart Apache
ServerName wordpress
ServerAlias wordpress
DocumentRoot "G:/03.DATA.WEB/00A.Personal/020.warungilmu.info"
Options Indexes FollowSymLinks
AllowOverride All
Order allow,deny
Allow from all
2. Edit file Hosts in C:\Windows\System32\drivers\etc\hosts
127.0.0.1 localhost
127.0.0.1 wordpress
3. Restart Apache
Wednesday, October 26, 2011
Display Date in two digit Excel to mySQL
=YEAR(L5)&"-"&IF(LEN(MONTH(L5)) = 1,CONCATENATE("0",MONTH(L5)),CONCATENATE("",MONTH(L5)))&"-"&IF(LEN(DAY(L5)) = 1,CONCATENATE("0",DAY(L5)),CONCATENATE("",DAY(L5)))
Thursday, October 13, 2011
Find String in Cell
If InStr("Look in this string", "look") = 0 Then
MsgBox "woops, no match"
Else
MsgBox "at least one match"
End If
End Sub
MsgBox "woops, no match"
Else
MsgBox "at least one match"
End If
End Sub
Subscribe to:
Posts (Atom)