Thursday, November 12, 2009

Setting FTP pada Windows 2003

Untuk setting FTP pada Windows 2003, klik pada link berikut ini:
http://support.microsoft.com/kb/323384/id-id
di sana terdapat tahapan
  1. Menambah program FTP server
  2. Konfigurasi FTP sebelum digunakan

Wednesday, November 11, 2009

Menampilkan Status

Application.StatusBar = "Update Status " & master1 / maxLink * 100 & " %"

Rumus Dalam Visual Basic

Jika ingin memasukkan rumus dalam visual basic, gunakan sintak berikut ini:

ActiveCell.FormulaR1C1 = "=IF(ISNA(MATCH(R1C[-1],MASTERDATA!R[1]C[" & Read_urut_sheet_master & "]:R[200]C[" & Read_urut_sheet_master & "],0)),0,MATCH(R1C[-1],MASTERDATA!R[1]C[" & Read_urut_sheet_master & "]:R[200]C[" & Read_urut_sheet_master & "],0))"

Wednesday, November 4, 2009

Change Single Column Joomla 1.5 for first Instalation

How to change Two Column to Single Column Joomla 1.5 for first Instalation?
  1. Login to administrator
  2. Klik Menus
  3. Klik Main Menu and choose "Home" on the list of article
  4. On right side, on column field change "2" to "1"
  5. Click Save

Tuesday, October 27, 2009

Create Unique List from Data Entry

How to create unique list from data entry in excel?

  1. In Excel, Go to Data > Filter > Advanced Filter
  2. Choose under Action : Copy to another location
  3. Select your data entry where you want to create unique in list range
  4. Choose Copy to in column B
  5. Check list Unique records only, then click OK
Have Fun! :)

Wednesday, September 2, 2009

Using If ErrorLevel & net start on batch file

@echo off &setlocal

VER | find "NT" > nul
IF not errorlevel 1 GOTO :s_win_NT

VER | find "2000" > nul
IF not errorlevel 1 GOTO :s_win_2000

VER | find "98" > nul
IF not errorlevel 1 GOTO :s_win_98

VER | find "ME" > nul
IF not errorlevel 1 GOTO :s_win_ME

VER | find "95" > nul
IF not errorlevel 1 GOTO :s_win_95
GOTO :s_unknown_os

:s_win_NT
echo This computer uses Windows NT Operating System
net start "InterBase Server"
goto :bye

:s_win_2000
echo This computer uses Windows 2000 Operating System
net start "InterBase Server"
goto :bye

:s_win_98
echo This computer uses Windows 98 Operating System
echo Please restart the computer
echo off
rem "C:\Program Files\CDIS Offline\InterBase\bin\IBGuard.exe"
goto :bye

:s_win_95
echo This computer uses Windows 95 Operating System
echo Please restart the computer
echo off
rem "C:\Program Files\CDIS Offline\InterBase\bin\IBGuard.exe"
goto :bye

:s_win_ME
echo This computer uses Windows ME Operating System
goto :bye

:s_unknown_os
echo Unknown Operating System
goto :bye

:bye

Tuesday, July 21, 2009

Excel Can't Right Click

You can reset the right-click menu.

Hit ALT + F11 to go to the VBEditor.

Then View>Immediate Window.

Copy/paste this line into the window and hit

Application.CommandBars("Cell").Enabled = True

OR copy/paste this sub to a module and run it.

Sub reset()
Application.CommandBars("Cell").Enabled = True
End Sub

The Insert and Format not being available could be because the worksheet or
workbook is protected.....I would vote for worksheet.

Tools>Protection>UnProtect Worksheet.

Source:
http://www.wiredbox.net/Forum/Thread327814_i_cannot_use_the_mouse_right_click_in_excel-_how_to_rectify.aspx