Friday, January 28, 2011

Utilize 'User' type record variable to encyrpt

--begin code--
ScrambleThis(pToScramble : Text[10]) pResult : Text[20]

lrTest."User ID":= 'dummy';
lrTest.VALIDATE(Password, pToScramble);
EXIT( lrTest.Password)
--end code--

Source:
Encrypted/Decrypted Password in Navision tables
www.mibuso.com/forum/viewtopic.php?t=12296

Question:
Will it give same result on different computer?

Thursday, January 27, 2011

XL: Duplicate rows for certain number of times

Sub DupLine()
    Dim wks As Worksheet
    Dim iRow As Long
    Dim r As Long
 
    ' worksheet containing lines to duplicate
    Set wks = Worksheets("test")
    With wks
        'first row excluded
        For iRow = .Cells(.Rows.Count, "A").End(xlUp).Row To 2 Step -1
            'column Q contains how-many-copies
            r = .Range("Q" & iRow)
            If r > 1 Then
            .Range("A" & iRow + 1, "A" & iRow + r - 1).EntireRow.Insert
            .Range("A" & iRow, "A" & iRow + r - 1).EntireRow.FillDown
            End If
        Next iRow
    End With
End Sub

---------------

Other solution:
In your xl sheet hit alt+f11. This opens the vbe window. Select module from the insert menu and paste the following code. Close the vbe window. Back in xl hit alt+f8, select test and click on run.
Once the pompt comes up, use the mouse to select the entire range to be processed. In this example the column_identifier is set to 1. If the identifier is in some other column, set its value accordingly.

Sub test()
Dim myRange As Range
Dim tSht, nSht, i, j, column_identifier
column_identifier = 1
Set tSht = ActiveSheet: Set nSht = Sheets.Add: tSht.Activate
Set myRange = Application.InputBox(Prompt:="Use your mouse to select the range", Type:=8)
For Each c In myRange.Columns(column_identifier).Cells
For i = 1 To Val(c)
j = j + 1
Range(Cells(c.Row, myRange.Columns(1).Column), Cells(c.Row, myRange. _
Columns(1).Column + myRange.Columns.Count - 1)).Copy nSht.Cells(j, 1)
nSht.Cells(j, myRange.Columns.Count + 1) = i
Next i
Next c
nSht.Activate
End Sub

Source:
Develop excel macro to create duplicate rows of records based on criteria
www.experts-exchange.com/Software/Office_Productivity/Spreadsheets/Q_22744596.html

Tuesday, January 25, 2011

OUTLOOK: Transfer all (data, contacts, rules, accounts)

Outlook Express (OE):
How to backup Outlook Express (OE) Email and transfer settings to another PC

NOT free:
ABF Outlook Backup
www.abf-soft.com/outlook-backup.shtml
BackRex Backup for Microsoft Outlookhttp://www.blogger.com/img/blank.gif
www.office-addins.com/-outlook-addins/outlook-backup.html

Related:
Export Contacts to CSV
...on the last step (screen with "Finish" button), click on "Map Custom Fields..." then click "Default Map"
...otherwise some multi-line fields might be broken to several lines

Sunday, January 23, 2011

Simulasi perhitungan KPR (Indonesian)

Tergiur penawaran dana tunai dari sisa limit kartu kredit utk kurangi pokok KPR?
Bandingkan dulu sistem perhitungan bunga FLAT yang dipakai dana tunai dengan bunga EFEKTIF yang dipakai KPR

Spreadsheet Perhitungan Angsuran KPR
http://manggon.wordpress.com/2009/07/29/spreadsheet-perhitungan-angsuran-kpr/

Modem Wi-Fi / GSM-CDMA Router (Indonesian)

ZTE MF30 || Portable USB Modem & WiFi Router ( MiFi )
http://every-thing4u.tokopedia.com/product.pl?id=249581
Rp 900.000 (Jakarta)

HUAWEI E5830
http://magacomputer.com/product/2/19/Modem-WiFi-GSM-HSDPA-HUAWEI-E5830/?o=default
Rp 875.000 (Yogyakarta)

Wifi Router only
----------------
Huawei D100t
www.tokomodemku.com/product/18/139/Router-Huawei-D100t/?o=default
Rp 245.000 (Banyuwangi)

TP-Link MR-3220
www.netkom-wifi.com/produk/detail/wifi.3g.router.tp-link.mr-3220
USD 30 (Surabaya)
www.enterkomputer.com/networking.php
Rp 244.000 (Jakarta)

Related info
------------
3g/4g USB dongle not showing up
..I wrote about my adventures here, maybe it will help someone in 2023
....When I'm trying to install the necessary packages my router's disk gets full. Apparently there's no solution for that, but actually there is: if you compile a new image with the packages you want all at once, some magic happens that saves disk space and much more packages fit (also you don't get Luci, the web interface, as that is an optional package that takes a lot of disk space).
LEDE/OpenWRT — Using 4G LTE USB For Your Internet Connection
Complete Step by Step using OPENWRT + TPLINK MR3420 & MR3220
OpenWRT
dd-wrtv2/downloads/betas/2014/12-22-2014-r25697/tplink_tl-mr3220v1
Download untuk TL-MR3220 V1
Pengguna Router TP-LINK TL-MR3420/TL-MR3220 share disini
www.kaskus.co.id/showthread.php?t=6396602

Cetak struk (Indonesian)

"buat struk dengan Design Report" emang bisa??
http://fox-id.org/smf/index.php?topic=9444.0

PRINT STRUK
www.foxite.com/archives/print-struk-0000037739.htm

Friday, January 21, 2011

Windows 7 or XP Home for Netbook?

Netbooks forum: Windows XP or Windows 7 Starter?
http://forums.cnet.com/7723-19688_102-365839.html

See also "More Discussions" section

Acer Aspire One D260 (Indonesian)

Berikut masing-masing spesifikasi fitur dan harganya:

1. Acer Aspire One D260 with Windows 7 Starter
- Processor Intel Atom N455 (1.66 GHz, 667 MHz FSB, 512 KB L2 cache)
- 10.1” WSVGA (1024 x 600) Acer CrystalBrite LED Backlight)
- 1 GB DDR3, 250 GB HDD
- Multi-in-one card reader, Bluetooth
- 6 cell battery, super slim design
- Harga: Rp 3,6 juta-an

2. Acer Aspire One D260 with Windows XP Home
- Processor Intel Atom N450 (1.66 GHz, 667 MHz FSB, 512 KB L2 cache)
- 1 GB DDR2, 160 GB HDD
- Multi-in-one card reader, Bluetooth
- Harga: Rp 3,3 juta-an

3. Acer Aspire One D260 with Linux & 6 cell battery
- Aspire One D260 LINUX
- Intel® Atom™ processor N450 (1.66 GHz, 667 MHz FSB, 512 KB L2 cache)
- Mobile Intel® NM10 Express Chipset
- 10.1" WSVGA (1024 x 600) Acer CrystalBrite™ LED Backlight
- 1GB DDR2 ; 160GB HDD
- Multi-in-one card reader
- 6-cell battery, Super Slim Design
- Harga: Rp 3 juta-an

Harga dan Fitur Acer Aspire One D260 (Dual Booting)
http://cahayailmukomputer.com/berita-188-harga-dan-fitur-acer-aspire-one-d260-dual-booting.html
3-Sept-2010
---

Tuesday, January 18, 2011

VFX: Things to be paid attention

Make pick-dialog optional for a grid column
Set lNullValid to .T.

Click Insert-button on child-grid won't insert new record
Don't click the button while the cursor is positioned in a Calculated-column

Monday, January 17, 2011

2.6: Multiple-window - agar perpindahan antar window lancar (Indonesian)

Pilih field-field sesuai urutan akses dan letakkan invisible-field di urutan terakhir

Pilih "Bring to front"

Wireless connection is getting disconnected every n minutes

update your Adapter online
---
set the transmitting power of the router(AP) to medium or low
---
try using another channel or securing your wireless network if it isn't secured yet
---
For me the solution has always been to fix the power saving default in windows. Here's what you do:
1. Go to Internet Connection in Control Panel
2. Right click on icon for your wireless connection and go to Properties
3. Go to Configure - Power Management
4. UNCLICK "Allow the computer to turn of this device..."
Hopefully the random signal drops will disappear... because the power is no longer shut down on your USB wireless device
---
Do you have 2.4GHz cordless phones? Baby monitors? Electric cords near antenna? If so, you may want to unplug/move them to see if problem persists. Also, make sure router antenna is at least 6 inches away from any wall.

What wireless channel are you using?
1. Try channel 11, then 1, 2, etc until you find one that resolves the issue. The idea is to stay as far away as possible from saturated channels in your neighborhood.

2. You can download a program like netstumbler to discover wireless networks in range. This will list their channel and allow you to configure your router to a channel not used by your neighbors.
*This program will not pick up WLANs that do not broadcast their SSID.
---
update the router firmware
---

Source:
Dropped connection
http://forums.cnet.com/7723-7589_102-126523.html

Belkin Wireless-N USB Adapter cuts out intermittently
www.wirelessforums.org/network-troubleshooting/belkin-wireless-n-usb-adapter-cuts-out-intermittently-44626.html

Tuesday, January 11, 2011

Brainy Baby download

www.indowebster.com/search.php?keyword=brainy+baby

www.allyoulike.com/37911/brainy-baby-series-for-kids/

Sunday, January 2, 2011

Computer cannot be pinged or its shared printer be seen

Do you have an Cisco-VPN Client installed on this pc?
If so this will blocks off responding to ping requests too.
But you can configure it to allow pinging by changing the setting the option labeled "Stateful firewall (Always On)"
Un-check this option if it has been set and you are fine.

Source:
My computer can not be "pinged" by other computers?
http://answers.yahoo.com/question/index?qid=20080610012706AAGCihe