Home > Inno Setup, Tools Installer > Membuat paket instalasi vb + mysql dengan inno setup

Membuat paket instalasi vb + mysql dengan inno setup

Membuat paket instalasi yang mudah untuk aplikasi yang akan kita distribusikan memang gampang-gampang susah, gampang bagi kita untuk membuatnya hanya dengan menggunakan Package & Deployment Wizard.

Package & Deployment Wizard merupakan tool installer bawaan yang sudah disediakan oleh visual basic, tetapi apakah hasilnya akan cukup memudahkan bagi klien apalagi jika aplikasi yang kita buat menggunakan database yang membutuhkan konfigurasi atau setting-setting yang lumayan banyak pada saat instalasi, seperti MySQL atau Firebird (Maaf ya Ms Access enggak termasuk :D).

Atau kita mencukupkan untuk membuat panduan instalasi yang dibagi menjadi beberapa bagian :

  1. Instalasi Program
  2. Instalasi Database Server (ex. MySQL/Firebird) + Konfigurasi
  3. Install Driver ODBC
  4. Mengcopy database/undump script sql

Atau kita ingin sedikit memaksakan diri dengan membuat paket instalasi yang mudah yang hanya dengan 6 kali klik bisa menyelesaikan semua masalah diatas. Jika iya kita langsung saja mempersiapkan tool-tool yang dibutuhkan :

  1. Inno Setup
  2. MySQL versi noninstall disesuaikan dengan versi MySQL yang terinstall di komputer Anda
  3. Connector ODBC yang sudah terinstall biasanya ada di C:\Program Files\MySQL\Connector ODBC 5.1
  4. Database yang sudah di backup/dump

Adapun versi yang terinstall di komputer saya :

  1. Inno Setup 5.0.8
  2. MySQL Server: 5.1.36-community
  3. Connector ODBC 5.1

Lakukan backup/dump database dengan cara :

  1. Aktifkan dos console
  2. Masuk ke folder instalasi MySQL misal C:\Program Files\MySQL\MySQL Server 5.1\bin
  3. kemudian ketikkan perintah: mysqldump -unama_user -ppassword_user –routines nama_database > c:\nama_database.sql

Parameter –routines wajib Anda ketikkan jika database Anda mempunyai prosedur/fungsi. Persiapan terakhir untuk struktur folder saya buat seperti berikut :

Untuk keterangan lebih lanjut skrip inno setup silahkan baca manualnya. Contoh skrip instalasi lengkap :

;Skrip instalasi by k4m4r82
;http://coding4ever.wordpress.com/
[Setup]
AppName=Sistem Pembelian Bahan Baku PT. ALBASI
AppVerName=Sistem Pembelian Bahan Baku PT. ALBASI Versi 1.0.0.50
AppPublisher=K4m4r82's Laboratory
AllowCancelDuringInstall = yes
DefaultDirName={pf}\PT ALBASI
DefaultGroupName=PT ALBASI
Compression = lzma
SolidCompression = yes
OutputBaseFilename=SetupAlbasiServer
AllowNoIcons = yes
AlwaysRestart = no
AlwaysShowComponentsList = no
DisableProgramGroupPage = yes
AppendDefaultDirName = yes
CreateUninstallRegKey = yes
DisableStartupPrompt = yes
LanguageDetectionMethod=none
ShowLanguageDialog=no
Uninstallable = yes
UninstallFilesDir={app}\uninst
UninstallDisplayIcon={app}\Albasi.exe,0
UninstallDisplayName=Sistem Pembelian Bahan Baku PT. ALBASI
WindowVisible = no
AppCopyright=Copyright © 2009. K4m4r82's Laboratory
FlatComponentsList = yes
PrivilegesRequired = admin
VersionInfoVersion=1.0.0.50
SetupIconFile=Setup.ico
WizardImageFile=SetupModern21.bmp
WizardSmallImageFile=SetupModernSmall21.bmp

[Languages]
Name: ina; MessagesFile: compiler:Indonesia.isl
Name: en; MessagesFile: compiler:Default.isl

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: installmysql; Description: "Install MySQL"; GroupDescription: "Proses tambahan:"; Flags: checkedonce

[Files]
;Visual Basic Runtime
Source: dll&ocx\VB6STKIT.DLL; DestDir: {sys}; Flags: uninsneveruninstall onlyifdoesntexist
Source: dll&ocx\COMCAT.DLL; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\stdole2.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib
Source: dll&ocx\asycfilt.dll; DestDir: {sys}; Flags: uninsneveruninstall onlyifdoesntexist
Source: dll&ocx\olepro32.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\oleaut32.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\msvbvm60.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist

;daftar file MySQL
Source: mysql-5.1.36-win32\bin\*; DestDir: {app}\mysql\bin; Flags: ignoreversion; Tasks: installmysql
Source: mysql-5.1.36-win32\Docs\*; DestDir: {app}\mysql\Docs; Flags: ignoreversion; Tasks: installmysql
Source: mysql-5.1.36-win32\lib\*; DestDir: {app}\mysql\lib; Flags: ignoreversion recursesubdirs; Tasks: installmysql
Source: mysql-5.1.36-win32\share\*; DestDir: {app}\mysql\share; Flags: ignoreversion recursesubdirs; Tasks: installmysql
Source: mysql-5.1.36-win32\data\*; DestDir: {app}\mysql\data; Flags: ignoreversion recursesubdirs uninsneveruninstall; Tasks: installmysql
Source: mysql-5.1.36-win32\*; DestDir: {app}\mysql; Flags: ignoreversion; Tasks: installmysql

;daftar file MySQL ODBC 5.1
Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.dll"; DestDir: {sys}; Flags: onlyifdoesntexist
Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.dll"; DestDir: {sys}; Flags: onlyifdoesntexist
Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.lib"; DestDir: {sys}; Flags: onlyifdoesntexist
Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.lib"; DestDir: {sys}; Flags: onlyifdoesntexist
Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc-installer.exe"; DestDir: {sys}; Flags: onlyifdoesntexist

;My Application Runtime
Source: main\Albasi.exe.manifest; DestDir: {app}; Flags: ignoreversion
Source: main\Albasi.exe; DestDir: {app}; Flags: ignoreversion
Source: main\albasi.sql; DestDir: {app}\mysql\bin; Flags: ignoreversion
Source: main\exec.cmd; DestDir: {app}\mysql\bin; Flags: ignoreversion

Source: dll&ocx\MSMASK32.OCX; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\cTreeOpt6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\Comdlg32.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\vbalDTab6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\MSCOMCT2.OCX; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\MyTextBox.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\LVbuttons.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\vbalExpBar6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\MSCOMCTL.OCX; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\vbalIml6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\cPopMenu6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\cNewMenu6.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\scrrun.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\vbalMDITabs6.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
Source: dll&ocx\SSubTmr6.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist

Source: dll&ocx\msado21.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib

[Icons]
Name: {group}\Sistem Pembelian Bahan Baku PT. ALBASI; Filename: {app}\Albasi.exe; WorkingDir: {app}
Name: {userdesktop}\Sistem Pembelian Bahan Baku PT. ALBASI; Filename: {app}\Albasi.exe; WorkingDir: {app}; Tasks: desktopicon
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\Sistem Pembelian Bahan Baku PT. ALBASI; Filename: {app}\Albasi.exe; WorkingDir: {app}; Tasks: quicklaunchicon

[INI]
Filename: {app}\mysql\my.ini; Section: mysqld; Key: basedir; String: {app}\mysql; Tasks: installmysql
Filename: {app}\mysql\my.ini; Section: mysqld; Key: datadir; String: {app}\mysql\data; Tasks: installmysql

Filename: {app}\infoProgram.ini; Section: Sistem; Key: serverName; String: "127.0.0.1"
Filename: {app}\infoProgram.ini; Section: Sistem; Key: dbName; String: "albasi"

[Run]
;install service MySQL
Filename: "{app}\mysql\bin\mysqld.exe"; Parameters: "install ""MySQL"""; StatusMsg: "Sedang menginstall service MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2; Tasks: installmysql

;jalankan service MySQL
Filename: {sys}\net.exe; Parameters: "start ""MySQL"""; StatusMsg: "Sedang menjalankan service MySQL ..."; Flags: runhidden; MinVersion: 0.0,4.0.1381; Tasks: installmysql

;mendaftarkan port default mysql (3306) ke firewall
Filename: "{sys}\netsh.exe"; Parameters: "firewall add portopening TCP 3306 ""Port MySQL"""; StatusMsg: "Sedang mendaftarkan port MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2
Filename: "{sys}\netsh.exe"; Parameters: "firewall set service type = fileandprint mode = enable"; StatusMsg: "Mengaktifkan File and Printer Sharing ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2

;mengganti password default root (blank). ex : masterkey
Filename: "{app}\mysql\bin\mysqladmin.exe"; Parameters: "-uroot password masterkey"; StatusMsg: "Mengganti password root"; Flags: runhidden; MinVersion: 0,5.01.2600sp2

;menghapus user default1 (user=blank, password=blank)
Filename: "{app}\mysql\bin\mysql.exe"; Parameters: "-uroot -pmasterkey -e ""DELETE FROM mysql.user WHERE Host='localhost' AND User=''"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2
Filename: "{app}\mysql\bin\mysql.exe"; Parameters: "-uroot -pmasterkey -e ""FLUSH PRIVILEGES"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2

;menghapus user default2 (user=root, password=blank)
Filename: "{app}\mysql\bin\mysql.exe"; Parameters: "-uroot -pmasterkey -e ""DELETE FROM mysql.user WHERE Host='127.0.0.1' AND User='root'"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2
Filename: "{app}\mysql\bin\mysql.exe"; Parameters: "-uroot -pmasterkey -e ""FLUSH PRIVILEGES"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2

;set agar user root bisa login dari mesin lain (kalo diperlukan)
Filename: "{app}\mysql\bin\mysql.exe"; Parameters: "-uroot -pmasterkey -e ""GRANT ALL PRIVILEGES ON *.* TO root@'%' IDENTIFIED BY 'masterkey'"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2
Filename: "{app}\mysql\bin\mysql.exe"; Parameters: "-uroot -pmasterkey -e ""FLUSH PRIVILEGES"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2

;membuat database kosong
Filename: "{app}\mysql\bin\mysql.exe"; Parameters: "-uroot -pmasterkey -e ""CREATE DATABASE albasi"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2

;menjalankan file batch exec.cmd untuk melakukan proses undump
Filename: "{app}\mysql\bin\exec.cmd"; Flags: runhidden; MinVersion: 0,5.01.2600sp2

;install driver myodbc
Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -a -n ""MySQL ODBC 5.1 Driver"" -t ""DRIVER=myodbc5.dll;SETUP=myodbc5S.dll"""; StatusMsg: "Tunggu sedang mendaftarkan driver MySQL Connector ODBC 5.1.5"; Flags: runhidden

[UninstallRun]
Filename: {sys}\net.exe; Parameters: "stop ""MySQL"""; StatusMsg: "Menghentikan Service MySQL ..."; Flags: runhidden; MinVersion: 0.0,4.0.1381
Filename: "{app}\mysql\bin\mysqld.exe"; Parameters: "remove ""MySQL"""; StatusMsg: "Sedang menghapus service MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2

Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -r -n ""MySQL ODBC 5.1 Driver"""; StatusMsg: "Tunggu sedang menghapus driver MySQL Connector ODBC 5.1.5"; Flags: runhidden

[UninstallDelete]
Type: files; Name: {app}\mysql\bin\*.*
Type: files; Name: {app}\mysql\Docs\*.*
Type: files; Name: {app}\mysql\lib\*.*
Type: files; Name: {app}\mysql\share\*.*

Type: files; Name: {sys}\myodbc5S.dll
Type: files; Name: {sys}\myodbc5S.lib
Type: files; Name: {sys}\myodbc5.dll
Type: files; Name: {sys}\myodbc5.lib
Type: files; Name: {sys}\myodbc-installer.exe

[Registry]
;mencatat lokasi instalasi program, ini dibutuhkan jika kita ingin membuat paket instalasi update
Root: HKCU; Subkey: "Software\PT ALBASI\SPBB"; ValueName: "installDir"; ValueType: String; ValueData: {app}; Flags: uninsdeletevalue

Di dalam skrip instalasi ada file exec.cmd, isinya adalah :

mysql -uroot -pmasterkey albasi < albasi.sql

Isi file exec.cmd sebenarnya untuk proses undump, tapi saya masih belum tau kenapa inno setup gagal menjalankannya padahal perintah-perintah yang lainnya sukses.

Contoh hasil instalasi :

Gambar 1

Gambar 2

Gambar 3

Gambar 4

Gambar 5

Yuph mungkin itu saja, selamat mencoba :)

About these ads
  1. February 8, 2010 at 3:27 pm | #1

    mas, nyetting nama odbc-nya bagaimana. Kan program kita konek ke DB pake nama odbc.

  2. February 8, 2010 at 10:40 pm | #2

    sagung :

    mas, nyetting nama odbc-nya bagaimana. Kan program kita konek ke DB pake nama odbc.

    Oke masih mengacu ke skrip saya yg diatas, kita lakukan revisi sedikit :
    1. bagian [Run]

    ;install driver myodbc
    Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -a -n ""MySQL ODBC 5.1 Driver"" -t ""DRIVER=myodbc5.dll;SETUP=myodbc5S.dll"""; StatusMsg: "Tunggu sedang mendaftarkan driver MySQL Connector ODBC 5.1.5"; Flags: runhidden
    
    ;skrip baru yang ditambahkan
    Filename: "{sys}\myodbc-installer.exe"; Parameters: "-s -a -c1 -n ""dsn-albasi"" -t ""DRIVER=MySQL ODBC 5.1 Driver;SERVER=127.0.0.1;DATABASE=albasi;UID=root;PWD=masterkey"""; StatusMsg: "Tunggu sedang membuat DSN-ALBASI"; Flags: runhidden
    

    2. bagian [UninstallRun]

    ;skrip baru yang ditambahkan
    Filename: "{sys}\myodbc-installer.exe"; Parameters: "-s -r -c1 -n ""dsn-albasi"""; StatusMsg: "Tunggu sedang menghapus DSN-ALBASI"; Flags: runhidden
    
    ;skrip lama
    Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -r -n ""MySQL ODBC 5.1 Driver"""; StatusMsg: "Tunggu sedang menghapus driver MySQL Connector ODBC 5.1.5"; Flags: runhidden
    

    Selamat mencoba :)

  3. February 19, 2010 at 7:51 am | #3

    oooooh. oke. makasih banyak mas. hohoho

  4. yuli
    March 25, 2010 at 1:42 pm | #4

    Mantap.. mas, terima kasih atas pencerahannya. Ini yang telah lama saya cari. Tapi mas tolong sekalian kalau aplikasi kita menggunakan crystal report 7, gimana run timenya ?

  5. March 25, 2010 at 9:34 pm | #5

    yuli :

    Mantap.. mas, terima kasih atas pencerahannya. Ini yang telah lama saya cari. Tapi mas tolong sekalian kalau aplikasi kita menggunakan crystal report 7, gimana run timenya ?

    Ini daftar dll tambahan yg ketangkep klo pake Crystal Report 7, klo versi lain mungkin beda

    Source: dll&ocx\p2smon.dll; DestDir: {sys}; Flags: sharedfile
    Source: dll&ocx\SSCSDK32.DLL; DestDir: {sys}; Flags: sharedfile
    Source: dll&ocx\crpaig32.dll; DestDir: {sys}; Flags: sharedfile
    Source: dll&ocx\craxdrt.dll; DestDir: {sys}; Flags: sharedfile regserver
    Source: dll&ocx\crviewer.dll; DestDir: {sys}; Flags: sharedfile regserver
    Source: dll&ocx\implode.dll; DestDir: {app}
    

    Skrip masih mengacu pada sample diatas.

    Selamat mencoba :)

    • yuli
      June 9, 2010 at 1:45 pm | #6

      Wah wah hebat dah saya coba mas, berhasil…. siip, terimakasih sekali ya. Tapi datanya yang sy gunakan databasenya acces jadi sy g perlu sertakan bagian installasi mysql dan connectornya.
      Giliran sekarang sy pake MySQL saya bingung, tolongin lagi donk mas maksud mas MySQL non install tuh gimana? Apa yang telah terpasang dikomputer atau installernya? Terima kasih sebelumnya.

    • Dino
      December 19, 2010 at 6:13 pm | #7

      mau tanya om apakah ini tidak usah ocx nya CR?

      • December 20, 2010 at 1:56 am | #8

        Ya tetap lah om, tool pembuat installer seperti Inno Setup atau NSIS, hanya untuk mempermudah distribusi aplikasi semua library pendukung seperti file ocx atw dll tetap harus diikutsertakan pd saat pembuatan paket.

        • Dino
          December 28, 2010 at 6:29 pm | #9

          mengapa y ocx nya CR sudah saya masukan ke instaler tetapi saat install di beberapa komputer gagal / reportnya tidak bisa jalan :(

          • December 29, 2010 at 2:20 am | #10

            Klo beberapa, berarti ada komputer yg berhasil ya om ngeload reportnya?

            Kesimpulannya komputer yg gagal bermasalah :D

  6. April 6, 2010 at 8:12 am | #11

    Makasih mas, tutorialnya mantap. Saya sudah cari-cari gimana cara menyertakan vb runtime di inno setup, ternyata ketemunya disini. Tks ya….

  7. April 6, 2010 at 8:55 am | #12

    blogbeken :

    Makasih mas, tutorialnya mantap. Saya sudah cari-cari gimana cara menyertakan vb runtime di inno setup, ternyata ketemunya disini. Tks ya….

    Oke sama2x, sebenarnya di situs resminya inno setup udah ada kok ini linknya :
    Inno Setup Knowledge Base

  8. erikjazzy
    April 7, 2010 at 6:13 am | #13

    salam kenal mas…langsung saja,kalau menggunakan ODBC 3.51 Driver bagaimana caranya?DLL apa saja yg diperlukan? dan cara buat DSNnya?terima kasih…

  9. April 7, 2010 at 10:26 am | #14

    erikjazzy :

    salam kenal mas…langsung saja,kalau menggunakan ODBC 3.51 Driver bagaimana caranya?DLL apa saja yg diperlukan? dan cara buat DSNnya?terima kasih…

    Salam kenal juga, oke kita masih mengacu skrip diatas untuk instalasi MySQL ODBC 3.5 + membuat DSN skripnya sbb:
    1. [Files]

    ;daftar file MySQL ODBC 3.51
    Source: {sys}\msvcr71.dll; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3i.exe; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3.dll; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3.lib; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3S.dll; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3S.lib; DestDir: {sys}; Flags: onlyifdoesntexist
    

    2. [Run]

    ;install driver myodbc
    Filename: "{sys}\myodbc3i.exe"; Parameters: "-a -d -t""MySQL ODBC 3.51 Driver;DRIVER={sys}\myodbc3.dll;SETUP={sys}\myodbc3S.dll"""; StatusMsg: "Tunggu sedang mendaftarkan driver MySQL Connector ODBC 3.51"; Flags: runhidden
    
    ;install dsn-albasi
    Filename: "{sys}\myodbc3i.exe"; Parameters: "-a -su -t""DSN=dsn-albasi;DRIVER=MySQL ODBC 3.51 Driver;SERVER=127.0.0.1;DATABASE=albasi;UID=root;PWD=masterkey"" -w"; Flags: runhidden; StatusMsg: "Tunggu sedang membuat DSN-ALBASI"
    

    3. [UninstallRun]

    ;uninstall driver myodbc
    Filename: "{sys}\myodbc3i.exe"; Parameters: "-s -r -su -n""dsn-albasi"""; StatusMsg: "Tunggu sedang menghapus DSN-ALBASI"; Flags: runhidden
    
    ;hapus dsn-albasi
    Filename: "{sys}\myodbc3i.exe"; Parameters: "-d -r -n""MySQL ODBC 3.51 Driver"""; StatusMsg: "Tunggu sedang menghapus driver MySQL Connector ODBC 3.51"; Flags: runhidden
    

    Selamat mencoba :)

  10. erikjazzy
    April 8, 2010 at 2:04 am | #15

    makasi banyak mas…kemaren seblum tanya sama mas sy sdh coba seperti itu,tetapi mengapa saat saat saya buka registri driver ODBC 3.51 di Regedit blm teregister,tetapi myodbc3.dll masuk ke system.Apakah di skrip diatas DLL ODBC tidak diregister dahulu mas?trims…

  11. erikjazzy
    April 8, 2010 at 2:10 am | #16

    Maaf lanjut lagi sedikit : dan saat di remove,saya lht di regedit pada ODBCINST.ini,driver ODBC 3.51 belum teremove…bagaimana solusinya..trims lagi..he…

  12. April 8, 2010 at 2:14 am | #17

    Iya file myodbc3.dll tidak perlu diregister, makanya di skrip inno setup di atas

    Source: {sys}\myodbc3.dll; DestDir: {sys}; Flags: onlyifdoesntexist
    

    tidak menggunakan flag regserver

  13. April 8, 2010 at 2:28 am | #18

    erikjazzy :

    Maaf lanjut lagi sedikit : dan saat di remove,saya lht di regedit pada ODBCINST.ini,driver ODBC 3.51 belum teremove…bagaimana solusinya..trims lagi..he…

    Sebenarnya kalo file dg type INI buatan kita pada saat instalasi bisa dihapus otomatis saat uninstall dengan menambahkan flag uninsdeletesection, tp untuk kasus yg mas tanyakan kayaxnya harus membuat program kecil yang menghapus informasi driver ODBC dari file ODBCINST.ini

  14. erikjazzy
    April 8, 2010 at 4:47 pm | #19

    trims banget yw mas atas semua infonya.Tetapi ada satu lagi yang ingin sy tanyakan.Tentang kompile exe project vb 6.0. Saya punya project buat tgs akhr,sebelum dikompile menjadi exe,berjalan baik-baik saja tidak ada bug.Tetapi mengapa setelah dikompile malah jadi rusk ya mas,salah satu msgnya adalah “runtime error 5,call prosedur or argument” padahal sebelum di kompile berjalan baik.Mohon solusinya ya,cz sy sudah bingung banget nih mas….trims…..

  15. April 8, 2010 at 10:37 pm | #20

    salah satu contoh kasus yg sering menyebabkan error seperti yg dimaksud sbb

    Private Sub Command1_Click()
        Text1.SetFocus
    End Sub
    

    sebenarnya tidak ada yg salah dg perintah diatas, tapi akan muncul error “runtime error 5,call prosedur or argument” jika properties Text1.Enabled = False

    Mungkin itu saja, tapi jika ingin jawabannya lebih akuratnya otomatis sy harus tau kode yang menyebabkan errornya.

    Selamat mencoba :)

  16. erikjazzy
    April 10, 2010 at 2:00 am | #21

    wah saya sempat gak tidur 2 hari mas,gara2 nyari error itu,tadi malem sblm baca artikel ini errornya udah ketemu,memang seperti apa yang mas katakan…trims banget ya….

  17. April 10, 2010 at 2:10 am | #22

    Yuph

  18. erikjazzy
    April 11, 2010 at 4:25 am | #23

    sorri ni mas saya tanya terus,maklum baru belajar
    Saya punya koding seperti ini:

    Private Sub Timer1_Timer()
    Dim wSekarang As Date
    Dim wSelesai As Date
    Dim jKeluar As date
    Dim wKeluar As Date
    Dim tKeluar As Date
    Dim SQLCariWaktu As String
    Dim RsCariWaktu As ADODB.Recordset

    SQLCariWaktu = “select * from atur_waktu where kode_waktu = ’1′”
    Set RsCariWaktu = New ADODB.Recordset
    RsCariWaktu.Open SQLCariWaktu, conMySQL

    If Not RsCariWaktu.EOF Then
    wKeluar = Format(RsCariWaktu.Fields(“jam_keluar”), “hh:mm:ss”)
    tKeluar = Format(RsCariWaktu.Fields(“T_jam_keluar”), “hh:mm:ss”)
    End If
    jKeluar = wKeluar – tKeluar

    wSekarang = Time

    If wSekarang = jKeluar Then
    Label2 = “YES!”
    End If
    End Sub

    ———————
    Tabel
    ———————
    jam_keluar(date)=’15:30:00′
    T_jam_keluar(date)=’00:10:00′
    —————————

    Mas ini yang juga bikin bingung,saat saya jalankan mengapa
    kondisi true wsekarang=jkeluar terlewati? apakah tipe data yang salah?
    Bagaimana cara mengurangi waktu jika diketahui a= pukul “00:00:00″ dikurangi 10 menit
    seharusnya hasilnya 23:50:00…mohon pencerahannya…trims…

    • Ivan
      May 24, 2011 at 5:22 pm | #24

      maaf bukan sok pintar ata u sok tau , tapi saya cuma mau bantu aja
      Klaw mnurut saya ya itu karna format cara pengurangan jam anda salah

      kalau menurut saya koding pengurangannya harus :
      jKeluar = format(time(wKeluar) – time(tKeluar))

      atau:

      jKeluar = format(cdate(wKeluar) – cdate(tKeluar))

  19. erikjazzy
    April 11, 2010 at 4:45 am | #26

    lagi satu ketinggalan….apakah dengan tipe data date,bisa membandingkan 2 buah waktu mas?apakah sama dengan menggunakan timevalue?trims lagi sekali mas…he

  20. April 11, 2010 at 5:34 am | #27

    Coba di debug.print aja mas variabel wSekarang dan jKeluar untuk melihat nilainya, saya biasa menggunakan variabel tipe String untuk menyimpan data jam. Saya baru menggunakan fungsi TimeValue jika akan dilakukan operasi ex. penambahan/pengurang

    Private Sub Command1_Click()
        Dim wKeluar     As String
        Dim tKeluar     As String
        Dim jKeluar     As String
        
        wKeluar = Format("13:14:00", "hh:mm:ss")
        tKeluar = Format("13:18:00", "hh:mm:ss")
        
        jKeluar = Format(TimeValue(wKeluar) - TimeValue(tKeluar), "hh:mm:ss")
        Debug.Print "jKeluar : " & jKeluar 'output = 00:04:00
    End Sub
    

    erikjazzy :

    lagi satu ketinggalan….apakah dengan tipe data date,bisa membandingkan 2 buah waktu mas?apakah sama dengan menggunakan timevalue?trims lagi sekali mas…he

    Ya jelas bisa contohnya ini :

    Private Sub Command1_Click()
        Dim jam1    As Date
        Dim jam2    As Date
        
        jam1 = Format(Now, "hh:mm:ss") 'output = 12:03:16 PM
        jam2 = Format(Now, "hh:mm:ss") 'output = 12:03:16 PM
    End Sub
    

    jika jam1 = jam2 maka hasilnya true

    TimeValue untuk mengkonversi tipe String ke tipe Time agar bisa dilakukan operasi perhitungan :

    Private Sub Command1_Click()
        Dim jam1 As String
        Dim jam2 As String
        
        jam1 = "13:14:00"
        jam2 = "13:18:00"
        
        Debug.Print jam2 - jam1 'klo dikurangkan langsung akan error
        
        'klo udah pake TimeValue enggak error lagi
        'tapi outputnya mengerikan
        Debug.Print TimeValue(jam2) - TimeValue(jam1)  'output = 2.77777777777777E-03
        
        'harus diformat agar outputnya lebih manusiawi
        Debug.Print Format(TimeValue(jam2) - TimeValue(jam1), "hh:mm:ss") 'output = 00:04:00
    End Sub
    

    Bagaimana cara mengurangi waktu jika diketahui a= pukul “00:00:00″ dikurangi 10 menit seharusnya hasilnya 23:50:00…mohon pencerahannya…trims…

    Mungkin bisa dicoba cara ngawur seperti berikut :D

    Private Sub Command1_Click()
        Dim jam1    As String
        Dim jam2    As String
        Dim jam3    As String
        
        jam1 = "00:00:00"
        jam2 = "00:10:00"
        
        If jam1 = "00:00:00" Then
            jam1 = "23:59:59"
            jam3 = TimeValue(jam1) - TimeValue(jam2)
            jam3 = TimeValue(Format(jam3, "hh:mm:ss")) + TimeValue("00:00:01")
            
            Debug.Print Format(jam3, "hh:mm:ss") 'output = 23:50:00
        End If
    End Sub
    

    Selamat mencoba :)

  21. erikjazzy
    April 11, 2010 at 8:30 pm | #28

    makasi mas,saya coba dulu,kalau pake time value bisa dibandingin langsung gak data jamnya?trims banget ya

  22. April 12, 2010 at 1:21 am | #29

    erikjazzy :

    makasi mas,saya coba dulu,kalau pake time value bisa dibandingin langsung gak data jamnya?trims banget ya

    bisa klo variabel pake tipe String langsung bisa dibandingkan

    Private Sub Command1_Click()
        Dim x As String
        Dim y As String
        
        x = "10:30:03"
        y = "10:30:02"
        
        Debug.Print (x > y)
        Debug.Print (TimeValue(x) > TimeValue(y))
    End Sub
    

    Hasilnya sama = True
    BTW kita stop aja ya bincang2x source codenya, soalnya udah jauh dari pembahasan artikelnya ngGax enax diliat orang :D

  23. erikjazzy
    April 13, 2010 at 3:00 am | #30

    ok2….mas terima kasih banyak sudah saya coba n hasilnya memang sesuai dengan keinginan…..trims……

  24. April 13, 2010 at 7:00 am | #31

    erikjazzy :

    ok2….mas terima kasih banyak sudah saya coba n hasilnya memang sesuai dengan keinginan…..trims……

    Oke sama2

  25. kacebaza
    April 30, 2010 at 7:38 am | #32

    Bos, gua udah install mysql tapi kok gak ada folder data di mysqlnya ya? bermasalah ga bos?? Thanks.

  26. April 30, 2010 at 8:31 am | #33

    kacebaza :

    Bos, gua udah install mysql tapi kok gak ada folder data di mysqlnya ya? bermasalah ga bos?? Thanks.

    coba aja login ke mysqlnya om, bisa enggak ? klo enggak bisa berarti bermasalah :D
    soalnya setau sy di folder data itu ada folder mysql untuk menyimpan user dan setting lainnya.

  27. kacebaza
    May 5, 2010 at 8:02 am | #34

    oke bos bisa sorry… oiya mau nanya lagi nih, runtime untuk crystal report 2005 gimana ya

  28. May 6, 2010 at 4:07 am | #35

    kacebaza :

    oke bos bisa sorry… oiya mau nanya lagi nih, runtime untuk crystal report 2005 gimana ya

    Sy belum pernah coba crystal report di vb.net 2005, biasanya file2x librarnya kan semuanya ngumpul di folder Debug atw Release

  29. kacebaza
    May 11, 2010 at 7:32 am | #36

    nanya lagi bos, code untuk delete registry saat unistall gimana ya bos? thnks

  30. May 12, 2010 at 1:33 am | #37

    kacebaza :

    nanya lagi bos, code untuk delete registry saat unistall gimana ya bos? thnks

    Tinggal tambah aja flag uninsdeletekey
    Ex :

    [Registry]
    ;mencatat lokasi instalasi program, ini dibutuhkan jika kita ingin membuat paket instalasi update
    Root: HKCU; Subkey: "Software\PT ALBASI\SPBB"; ValueName: "installDir"; ValueType: String; ValueData: {app}; Flags: uninsdeletekey
    

    Selamat mencoba :)

  31. May 15, 2010 at 3:31 pm | #38

    bagus.. senang sekali artikel ini.. sesuai yang saya cari dan butuhkan ..trimakasih

  32. May 17, 2010 at 1:03 am | #39

    Sama2x :D

  33. Agung Stiawan
    June 5, 2010 at 3:21 pm | #40

    Pak mohon bantuannya lagi.. untuk mendaftarkan DSN yang menggunakan Firebird. Jadi kalau dari vb, saat program kira run maka cek FileDSN kalau belum ada maka create DSN. Atau mungkin bisa langsung dimasukan pada saat pertama kali proses instalasi program? Soalnya saya cari di google gak ketemu, yang ada cuma untuk Access, SQL Server dan MySQL. Trims..

  34. June 6, 2010 at 7:58 am | #41

    Saya kadang2x bingung sendiri, pada hal ada cara yg lebih mudah untuk melakukan koneksi ke database firebird tanpa harus melalui ODBC DSN dan sy rasa Anda sudah tau caranya.

    Private Sub cmdTesKoneksi_Click()
        Dim conn As ADODB.Connection
        
        strCon = "DRIVER=Firebird/Interbase(r) Driver;UID=NAMA_USER;PWD=PASSWORD;DBNAME=LOKASI_DATABASE"
        Set conn = New ADODB.Connection
        conn.ConnectionString = strCon
        conn.Open
    End Sub
    

    Tapi jika ingin tetap membuat ODBC DSN untuk firebird via program berikut langkah-langkahnya :
    1. Tambahkan entri berikut di file ODBC.ini, dg asumsi kita akan menambahkan ODBC DSN dengan nama fb-odbc

    [ODBC 32 bit Data Sources]
    fb-odbc=Firebird/InterBase(r) driver (32 bit)
    
    [fb-odbc]
    Driver32=C:\WINDOWS\system32\OdbcFb32.dll
    

    File ODBC.ini ada di folder windows

    2. Tambahkan entri berikut di registry windows

    [HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources]
    "fb-odbc"="Firebird/InterBase(r) driver"
    
    [HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\fb-odbc]
    "Driver"="C:\WINDOWS\system32\OdbcFb32.dll"
    "Description"=""
    "Dbname"="LOKASI_DATABASE\NAMA_DATABASE.FDB"
    "Client"=""
    "User"="USER_FIREBIRD"
    "Role"=""
    "CharacterSet"="NONE"
    "JdbcDriver"="IscDbc"
    "ReadOnly"="N"
    "NoWait"="N"
    "LockTimeoutWaitTransactions"=""
    "Dialect"="3"
    "QuotedIdentifier"="Y"
    "SensitiveIdentifier"="N"
    "AutoQuotedIdentifier"="N"
    "UseSchemaIdentifier"="0"
    "SafeThread"="Y"
    "Password"="PASSWORD_FIREBIRD"
    

    Selamat mencoba :)

  35. Agung Stiawan
    June 6, 2010 at 8:33 pm | #42

    oke pak admin, trims.. ya kebetulan saja saya mau buat aplikasi yang berdiri sendiri terpisah dari aplikasi utama, jadi untuk koneksinya menurut saya lebih enak langsung ambil nama DSN saja, makanya waktu proses instal Aplikasi utama, sekalian mendaftarkan DSN nya. Gitu pak admin.

  36. June 7, 2010 at 1:19 am | #43

    Oke deh, apa pun caranya yg penting bisa konek :D

  37. June 9, 2010 at 2:33 pm | #44

    yuli :

    Wah wah hebat dah saya coba mas, berhasil…. siip, terimakasih sekali ya. Tapi datanya yang sy gunakan databasenya acces jadi sy g perlu sertakan bagian installasi mysql dan connectornya.
    Giliran sekarang sy pake MySQL saya bingung, tolongin lagi donk mas maksud mas MySQL non install tuh gimana? Apa yang telah terpasang dikomputer atau installernya? Terima kasih sebelumnya.

    Ada 2 jenis file distribusi MySQL utk Windows
    1. Berupa paket installer (berekstensi .msi), ini yg biasa di pakai karena bisa langsung dijalankan layaknya paket installer yang berekstensi .exe
    2. Berupa file arsip (berekstensi .zip yg biasa disebut MySQL non install), nah ini dikhususkan bagi yang ingin menginstall MySQL secara manual

    Klo paket installer mysql yg berekstensi .msi ini kita sertakan dalam pembuatan paket aplikasi kita tentu akan sedikit merepotkan karena akan butuh interaksi dari user pada saat instalasi mysqlnya, inilah bedanya kalo menggunakan MySQL non install semua prosesnya bisa kita atur via skrip dalam hal ini skrip inno setup.

    Mungkin itu saja penjelasan tambahannya, dan mudah-mudahan tambah bingung :D

    • yuli
      June 14, 2010 at 9:29 am | #45

      Terima kasih sekali lagi mas, dah gamblang alias sangat jelas alias g bingung lagi. He… he. Dah ketemu kok mas yg MySQL non install. Uenaaaak tenan. Matur Thank You buanget.

  38. June 9, 2010 at 3:54 pm | #46

    bagaimana membuat paket aplikasi vb.net 2005 + sql server 2005 + ada serial numbernya dan juga ada versi trial dan full. . .
    mohon penjelasannya

    terima kasih

  39. June 10, 2010 at 1:37 am | #47

    1. jangan lupa ditambahkan .net frameworknya :D
    2. saya belum pernah kepikiran untuk mempaketkan sql server dalam 1 paket aplikasi, ini bakalan ribet
    3. ada serial numbernya? maksudnya menambahkan serial number pada saat instalasi? kalo iya coba baca artikel INI
    4. dan juga ada versi trial dan full? klo ini langsung dihandle dari aplikasinya aja mas

  40. June 15, 2010 at 1:18 am | #48

    yuli :

    Terima kasih sekali lagi mas, dah gamblang alias sangat jelas alias g bingung lagi. He… he. Dah ketemu kok mas yg MySQL non install. Uenaaaak tenan. Matur Thank You buanget.

    Oke sama2x, berarti udah case closed ya.

    • yuli
      June 22, 2010 at 8:19 am | #49

      Enggak juga he he, ada case lagi nih, mohon pencerahannya sekali lagi. Saya pake MySQL 5.1.47 versi non-install, perubahan yang saya lakukan untuk script di atas adalah :
      1. tidak melakukan dump database, tetapi database sy include di direktori data MySQL, perlu diketahui saya pake MyIsam untuk enginenya.
      2. menghilangkan bagian [Run] baris 116 s.d. 135, karena database saya tidak ber password.
      Pernyataannya :
      1. Setelah sy coba pasang di komp lain service mySQL nya g mau jalan, kenapa ya mas?
      2. Sy pernah nyoba membuat file exec.cmd langsung sy coba jalankan direktori root mySQL selalu gagal, pesannya “tidak ditemukan database (nama file sql dihilangkan huruf pertamanya)”, why brother?
      Sebelumya terima kasih 1000 kali.

  41. June 23, 2010 at 4:25 am | #50

    yuli :
    1. tidak melakukan dump database, tetapi database sy include di direktori data MySQL, perlu diketahui saya pake MyIsam untuk enginenya.

    Oke klo ini enggak masalah

    2. menghilangkan bagian [Run] baris 116 s.d. 135, karena database saya tidak ber password.

    1. baris 117, 132, 135 dihapus
    2. baris 120 s.d 129 hanya parameter -pmasterkey nya aja yg dihapus

    1. Setelah sy coba pasang di komp lain service mySQL nya g mau jalan, kenapa ya mas?

    Makanya jangan main hapus sembarangan

    2. Sy pernah nyoba membuat file exec.cmd langsung sy coba jalankan direktori root mySQL selalu gagal, pesannya “tidak ditemukan database (nama file sql dihilangkan huruf pertamanya)”, why brother?
    Sebelumya terima kasih 1000 kali.

    Sample file exec.cmd yg sy buat diatas dengan asumsi file exec.cmd dan file backup/dump dicopykan ke folder MySQL\Bin dan nama database harus sudah ada.

  42. hydays
    June 23, 2010 at 7:29 am | #51

    mas bantu dong.
    saya membuat Sistem Informasi perhitungan Nilai Rapot berbasis Client Server denga Vb6 dan SQL Server 2000.
    gimana cara bikin instalasinya.Kalau kalo dah jadi kita gak perlu lagi instal SQL Server 2000nya bisa gak Ya????

    • June 24, 2010 at 1:26 am | #52

      Klo utk masalah ini saya belum bisa bantu, soalnya sy sudah coba googling paket non-installernya enggak ketemu.

  43. hydays
    June 23, 2010 at 7:33 am | #53

    oya lupa koneksinya yang saya gunakan ADODB

  44. June 29, 2010 at 12:05 pm | #54

    Tanya dikit aja om,,, runtime C 8.5

    • June 29, 2010 at 12:30 pm | #55

      Sory om untuk saat ini sy belum punya installer CR 8.5, jd blm bisa bantu :(

      Tapi cara ngecexnya kan gampang om, tinggal buat dulu paketnya menggunakan Package & Deployment Wizard, trus tinggal cari file setup.lst yg di hasilkan dari proses Package & Deployment Wizard.

      File setup.lst ini berisi semua daftar file yg dibutuhkan aplikasi kita, termasuk runtimenya CR 8.5

      Selamat mencoba :)

  45. ratihbingung
    July 26, 2010 at 11:06 pm | #56

    mas, lg bingung bgt nih..
    Tugas akhir saya pake vb 6 trus crystal report 8.5 tp klo sy compile ko ga bs ya? Trus sy pake inno setup ttp ga bs klo di komputer org lain. Mohon bantuannya mas. Tlg bgt ya, trims

  46. July 27, 2010 at 3:11 am | #57

    ratihbingung :

    mas, lg bingung bgt nih..

    Masa2x tugas akhir memang sering bikin bingung :D

    ratihbingung :
    Tugas akhir saya pake vb 6 trus crystal report 8.5 tp klo sy compile ko ga bs ya?

    Kemungkinan masih ada kode programmnya yg error, coba sebelum compile tekan dulu CTRL+F5

    ratihbingung :
    Trus sy pake inno setup ttp ga bs klo di komputer org lain. Mohon bantuannya mas. Tlg bgt ya, trims

    Enggak bisanya karena apa? Apakah karena inno setupnya atw jangan2x sudah berhasil diinstall tapi setelah dijalankan aplikasinya yg enggak bisa, klo ini mungkin waktu membuat paket instalasinya ada komponen/libraray belum diikut sertakan.

  47. junk
    July 28, 2010 at 6:39 am | #58

    siang… mohon bantuannya gan…
    saya pake vb6 dan inno untuk buat instalernya… dan berhasil

    kendala yg saya dapet sekarang, pada saat client menginstal akan muncul pc client di registrinya…
    nah yg saya mau tanyakan, bagaimana membuat instaler agar pada saat client meng uninstal program, di registri client tersebut reg PCclientnya terhapus juga pada sat uninstal….

    thank’s before….

  48. July 28, 2010 at 1:42 pm | #59

    Pertanyaannya sama dg komentar om “kacebaza” sebelumnya dan udah sy jawab, silahkan dicek om :smile:

  49. August 4, 2010 at 10:54 am | #60

    mas. file dll dan ocx yang kita butuhin itu bisa kita lihat dimana, terus apakah innodb bisa buat bikin instalasi java ?
    thanks before :)

  50. August 4, 2010 at 1:39 pm | #61

    udzi :

    mas. file dll dan ocx yang kita butuhin itu bisa kita lihat dimana

    Gampang jalankan dulu tools Package & Deployment Wizard, cek file setup.lst (cukup pake notepad) yg dihasilkan dari proses ini. File setup.lst berisi informasi file2x yg berhubungan dg aplikasi yg kita buat.

    Artikel ttg Package & Deployment Wizard sudah banyak diinternet.

    udzi :
    terus apakah innodb bisa buat bikin instalasi java ?
    thanks before

    Sy ralat dulu bukan innodb tapi inno setup, bisa aja asalkan om sudah bisa menginstall JRE secara manual, setting class path dan lain2x sehingga JREnya bisa dikenali aplikasi javanya.

  51. August 5, 2010 at 4:33 pm | #62

    iyaa maas, inno setup, heehehe.
    install jre lewat inno setup bisa tidak ?

    • August 6, 2010 at 1:46 am | #63

      Yg jelas bisa, tapi sy sendiri belum pernah coba :-D
      Ini sy kasih gambaran skripnya silahkan dicoba sendiri :-D

      [Files]
      ;disesuaikan dg lokasi jre yg terinstall di komputer Anda
      Source: "C:\Program Files\Java\jre6\*"; DestDir: {app}\jre6; Flags: ignoreversion recursesubdirs
      
      [Registry]
      ;mendaftarkan jre ke Environment variabel
      Root: HKLM; Subkey: "SYSTEM\CurrentControlSet\Control\Session Manager\Environment"; ValueName: "Path"; ValueType: String; ValueData: {code:GetEnvironmentPath}{app}\jre6\bin; MinVersion: 4.1.1998,4.0.1381
      
      [Code]
      var
        EnvironmentPath : string;
        
      function InitializeSetup(): Boolean;
      begin
        // mendapatkan nilai Environment variabel yg sudah ada
        RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SYSTEM\CurrentControlSet\Control\Session Manager\Environment', 'Path', EnvironmentPath);
        Result := True;
      end;
      
      function GetEnvironmentPath(Param: string): string;
      begin
        Result := EnvironmentPath + ';';
      end;
      

      Selamat mencoba :)

  52. August 6, 2010 at 12:42 am | #64

    oiya mas, satu lagi. project vb yang sudah kita buat itu harus di bikin exe-nya dulu yaaa lewat Package & Deployment Wizard atau gimana ?
    soalnya saya liat di coding mas itu programnya udah jadi .exe !

    Source: main\Albasi.exe.manifest; DestDir: {app}; Flags: ignoreversion
    Source: main\Albasi.exe; DestDir: {app}; Flags: ignoreversion
    Source: main\albasi.sql; DestDir: {app}\mysql\bin; Flags: ignoreversion
    Source: main\exec.cmd; DestDir: {app}\mysql\bin; Flags: ignoreversion

    mohon pencerahannya ? !
    terimakasih

    • August 6, 2010 at 1:55 am | #65

      Klo cuma untuk menjadikan Exe kan cukup dari menu File -> Make NamaProject, nah klo Package & Deployment Wizard kan sama seperti Inno Setup tool untuk membuat paket instalasi.

  53. August 6, 2010 at 1:31 am | #66

    nanya lagi nih mas, kalo program kita client-server bagaimana ?
    maksudnya apakah database itu masih bisa di akses oleh komputer lain ?

  54. August 6, 2010 at 3:00 am | #68

    dengan kata lain semua tutorial diatas membuat kita bisa meninstall program yang kita buat di komputer manapun yang masih kosong, (belum ada mysql atau database) dan tanpa harus repot setting odbc secara manual melalui control panel yaaa mass ?

    terima kasih banyakk mas atas pencerahannya, semoga ilmunya bermanfaat dunia akhirat . .
    heheheeh (amiin)

  55. August 6, 2010 at 4:03 am | #69

    udzi :

    dengan kata lain semua tutorial diatas membuat kita bisa meninstall program yang kita buat di komputer manapun yang masih kosong, (belum ada mysql atau database) dan tanpa harus repot setting odbc secara manual melalui control panel yaaa mass ?

    Yaph benar sekali

    udzi :

    terima kasih banyakk mas atas pencerahannya, semoga ilmunya bermanfaat dunia akhirat . .
    heheheeh (amiin)

    Sama2x :smile:

  56. Kacebaza
    September 1, 2010 at 7:07 am | #70

    Bos, ane ada kendala nih, ane udah selesai buat installernya tapi filenya jadi gede banget bos 72 MB, karena ane masukin installer yang ane buat dari Vb.net 2005 biar sekalian instal .net framework and CR nya maksud ane. Tapi jadinya gede banget filenya, bos bisa kasih solusi nggak?? Need help bos.

    • September 1, 2010 at 1:32 pm | #71

      Kayaxnya enggak ada yg aneh dan wajar saja hasil paketnya segede itu, klo dalam paket instalasinya mengikutsertakan .net framework dan cr.

      Coba aja deh diakumulasi secara manual semua ukuran filenya sebesar apa, yang aneh itu klo ukuran file aslinya misal cuma 30 mb setelah di pakcage menjadi 72 mb itu baru aneh :D.

      • September 4, 2010 at 3:52 am | #72

        Ada Solusi lain nggak bos? Gimana cara ngakalinnya? Maksudnya Runtimenya Vb.net sama Crystal Report .

  57. September 4, 2010 at 4:13 am | #73

    1. Install dot net framework sesuai versinya untuk referensi bisa cek disini dan sini.
    2. Copy semua file aplikasi kita (biasanya ada difolder bin\release)
    3. Install runtime crystal report (CRRedist200x_x86.msi) sudah tersedia di cd .NETnya untuk referensi cek disini

  58. ujang
    October 6, 2010 at 5:17 am | #74

    Kang, pas di compile ga ada masalah, tetapi pas mau di Run ada masalah malah keluar pesan “not valid win32 application gitu”???apa yang menyebabkan permasalahan tersebut???

    terus intaller inno setup nya juga ga bisa di klik 2 kali, tadinya saya mau ngeinstal ulang tools installer tersebut, kantanya file coruppt, obtain apa gitu pesannya…

    • October 6, 2010 at 5:56 am | #75

      Wah kemungkinan komputer om kena virus tuh :D

  59. ujang
    October 6, 2010 at 8:02 am | #76

    owh gitu yach….

    kirain innosetup nya error….

  60. ujang
    October 6, 2010 at 8:03 am | #77

    kang, coba donk share tentang runtime CR 8.5???

    klo gak ya,, komponen apa aja yang berhubungan gitu..

  61. ujang
    October 6, 2010 at 8:05 am | #78

    kang kalo tulisan “193 %1″ apa maksudnya???
    itu terjadi pada pesan error tadi,saat mu nge-run pada inno setup.

  62. October 7, 2010 at 12:27 am | #79

    ujang :

    kang, coba donk share tentang runtime CR 8.5???

    klo gak ya,, komponen apa aja yang berhubungan gitu..

    Sory sy enggak punya CR 8.5

    ujang :

    kang kalo tulisan “193 %1″ apa maksudnya???
    itu terjadi pada pesan error tadi,saat mu nge-run pada inno setup.

    Klo cuma error “193 %1″ ya sy juga enggak ngerti, biasanya juga kan ada pesan error lainnya.

  63. Budi Raharjo
    October 7, 2010 at 11:03 am | #80

    lah kalau delphi apa saja yang harus di include kan ( Delphi Runtime )

    • October 8, 2010 at 6:00 am | #81

      Berhubung sy bukan programmer delphi, masnya mungkin bisa nanya2x disini.

  64. udzi
    November 5, 2010 at 6:25 pm | #82

    mas, kalo kita pakenya file dsn gimana ?
    soalnya di contoh diatas kan database yang dibuat adalah user dsn,
    oiya, mungkin gga sih kalo databse kita itu dibikin tidak berpassword

    • November 6, 2010 at 3:16 am | #83

      Kayaxnya tinggal diikutkan dalam paket instalasi trus dicopykan ke folder yg seharusnya (masnya yg lebih taukan) karena sy belum pernah pake file dsn.

  65. udzi
    November 5, 2010 at 7:19 pm | #84

    tanya lagi, kalo ada error “either BOF or EOF is true, or database has been deleted …..
    itu kenapa mas,
    sedangakan sebelum dibuat exe normal2 aja

    • November 6, 2010 at 3:20 am | #85

      Ini ada hubungannya dengan kode navigasi ya (MoveFirst, MovePrevious, MoveNext, MoveLast) klo iya divalidasi aja dengan mengecek nilai properties BOF dan EOF nya, sebelum memanggil ke empat methode diatas.

  66. udzi
    November 7, 2010 at 6:53 pm | #86

    udah bisa, tapi satu masalah lagi, begitu mau buka report ada error message. katanya phusical database not found !
    kenpaa yaa ?

    • November 8, 2010 at 1:00 am | #87

      Kayaxnya sih salah nyebutin lokasi databasenya om

  67. Abdul Gafar
    November 19, 2010 at 7:15 am | #88

    Assalamu’alaikum, salam kenal Mas. Saya masih pemula neh.
    Mas, saya pake beberapa file dlm vb6, gak tahu cara bikin file setupnya pake inno setup.

    Mohon penjelasan untuk masing2 file berikut supaya bisa jadi paket instalasi, saya copy dari file Project.vbp sebagai berikut:

    Reference=*\G{00000200-0000-0010-8000-00AA006D2EA4}#2.0#0#C:\Program Files\Common Files\system\ado\msado20.tlb#Microsoft ActiveX Data Objects 2.0 Library
    Reference=*\G{420B2830-E718-11CF-893D-00A0C9054228}#1.0#0#C:\WINDOWS\system32\scrrun.dll#Microsoft Scripting Runtime
    Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation
    Reference=*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\Program Files\Common Files\Microsoft Shared\DAO\dao350.dll#Microsoft DAO 3.51 Object Library
    Reference=*\G{56BF9020-7A2F-11D0-9482-00A0C91110ED}#1.0#0#C:\WINDOWS\system32\MSBIND.DLL#Microsoft Data Binding Collection
    Object={C368D713-CC5F-40ED-9F53-F84FE197B96A}#4.7#0; MapWinGIS.ocx
    Object={CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0; MSDATGRD.OCX
    Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0; MSCOMCTL.OCX
    Object={0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0; MSHFLXGD.OCX
    Object={BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0; TABCTL32.OCX
    Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0; COMDLG32.OCX
    Object={67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0; MSADODC.OCX

    • November 19, 2010 at 7:44 am | #89

      Waalaikumsalam warahmatullahi wabarakatuh
      Pake ISTool aja akh untuk konversi dari file lst yang dihasilkan dari proses Package & Deployment Wizard ke skrip inno setup.

      Selamat mencoba :)

      • Abdul Gafar
        December 3, 2010 at 3:16 am | #90

        Makasih mas. Alhamdulillah udah berhasil, ternyata MapWinGIS OCX nya yg bermasalah, udah lihat d webnya Mapwindow.

        • December 3, 2010 at 3:19 am | #91

          Oke om, wah kren udah bisa buat aplikasi GIS ya?

  68. Rafiz
    November 26, 2010 at 2:52 am | #92

    Tidak ada komentar yg ingin saya ucapkan selain ” Terima Kasih ”
    saya baca komentar dari atas ampe akhir… dan Admin selalu menjawab semua pertanyaan dari pembaca… Jarang sekali ada Admin blog seperti Anda… sekali lagi saya ucapkan ” Jazakumullah khoiron katsiron ”
    tanpa perlu saya bertanya.. semua permasalahan saya terjawab :D

  69. syarif
    November 27, 2010 at 3:54 am | #94

    Name: ina; MessagesFile: compiler:Indonesia.isl doesn’t exist, gimana solusinya mas..

    • November 27, 2010 at 4:37 am | #95

      File Indonesia.isl bisa didownload disini disesuaikan dengan versi inno setupnya, trus dicopykan ke folder “C:\Program Files\Inno Setup 5″

  70. syarif
    November 27, 2010 at 4:01 am | #96

    proses packaging selesai dengan selamat, tapi pas diinstall program error, gmn tuh?
    apanya kira2 yang salah

    • November 27, 2010 at 4:38 am | #97

      Pesan errornya di posting ke sini om, karna sy bukan paranormal ;)

  71. syarif
    November 28, 2010 at 12:01 am | #98

    Registration failed :
    Register TypeLib failed ; code 0x8002801c

    Trus, sy trus install aja, pas mau dijalankan ada pesan error :
    The size of manifest exceeds the maximum allowed

    .manifest itu tipe file untuk apa?
    Gimana bikinnya?
    Soalnya waktu saya bikin, caranya file.exe ditambah .manifest aja.
    Betul gak y? Maklum pemula :-P

    Mas maaf y bnyk tanya, pengen blajar vb. Trus lg kerja praktek juga..
    Mdh2an ilmunya manfaat dunia akhirat..
    Thx b4

    Salam kenal,
    Syarif, Tasikmalaya :-)

  72. November 28, 2010 at 1:41 am | #99

    syarif :

    Registration failed :
    Register TypeLib failed ; code 0x8002801c

    Mungkin pengesetan nilai flagnya kurang tepat om, terutama untuk file-file yang berekstensi dll, ocx, tlb
    1. File DLL
    kombinasi nilai flag yang biasa digunakan :

    uninsneveruninstall sharedfile regserver onlyifdoesntexist
    

    Nah masalahnya ada beberapa file dll yang malah error klo menggunakan flag regserver jadi otomatis kombinasi nilai flagnya cukup :

    uninsneveruninstall sharedfile onlyifdoesntexist
    

    Trus bagaimana cara mengetahui file dll yang bakalan error klo menggunakan flag regserver, berikut caranya :
    1. copykan file dll tersebut ke folder windows\system32
    2. kemudian dari start -> run : ketik regsvr32 nama_file_dll.dll :

    jika muncul warning “NAMA_FILE.DLL was loaded, but the DLLRegisterServer entry point wast not found.” berarti tidak perlu menggunakan flag regserver

    2. File OCX
    kombinasi nilai flag yang biasa digunakan :

    uninsneveruninstall sharedfile regserver onlyifdoesntexist
    

    3. File TLB
    kombinasi nilai flag yang biasa digunakan :

    uninsneveruninstall sharedfile regtypelib
    

    Nah sekarang terlihat perbedaan penting cara mendaftarkan ke 3 file sistem diatas untuk file DLL dan OCX menggunakan flag regserver sedangkan file TLB menggunakan flag regtypelib.

    Jadi coba di cek lagi kombinasi nilai flagnya, untuk informasi lengkap tentang nilai flagnya bisa dilihat disini.

    syarif :

    Trus, sy trus install aja, pas mau dijalankan ada pesan error :
    The size of manifest exceeds the maximum allowed

    .manifest itu tipe file untuk apa?
    Gimana bikinnya?

    Kegunaan file manifest agar komponen2x standar aplikasi kita menggunakan style XP, hasilnya juga hanya akan terlihat jika aplikasi sudah dicompile (klo masih dirunning via project belum keliatan).

    Informasinya bisa dilihat disini.

    Selamat mencoba :)

  73. syarif
    November 29, 2010 at 4:32 am | #100

    Selama sy pk kepala yg ini sampe skrng, br kali ini nemuian admin blog se-responsif Mas Admin ini :-)
    Top markotop..
    Mas, masalah sudah yg kmr dah ada jalan keluarnya, cm ada 1 pertanyaan lagi.
    Kalo script agar mysql selalu aktif dan konek ke database saat saat startup windows..
    Gimana tuh?

    Thx brother..;-)

    • November 29, 2010 at 5:57 am | #101

      syarif :
      Kalo script agar mysql selalu aktif dan konek ke database saat saat startup windows..

      Ada 2 cara yang biasa digunakan agar aplikasi otomatis aktif :
      1. Dijadikan service, saya sudah bahas pembuatannya disini.
      2. Daftarkan diregistry windows, ada beberapa key yang bisa dicoba :

      HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run
      HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
      HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon
      HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\Run
      

      Saran saya pake yang terakhir, karena loadnya lebih cepat.

      Untuk menulisnya dari aplikasi bisa menggunakan fungsi API atau pada saat instalasi program (lihat skrip inno diatas dibagian [Registry])

      Selamat mencoba :)

  74. syarif
    November 29, 2010 at 4:48 am | #102

    Oh iya lupa,
    Mas, yg exe.manifest bole minta penjelasan pk bhs mas g?
    Kalo bisa script-nya jg. Soalny wkt kmrn sy pk script yg d sana. Error mas.
    Tolng dibantu ya.. ;-)

    • November 29, 2010 at 6:02 am | #103

      Untuk menggunakan XP Stype ada 2 cara
      1. Menggunakan file manifest
      File ini bisa ditulis dengan editor biasa, trus isinya apa bisa dilihat disini, selain itu penamaan file manifestnya harus menggunakan format : nama_file.exe.manifest.

      Penggunaan file manifest sedikit merepotkan karena harus diikut sertakan dalam distribusi aplikasi, belom lagi klo ada yg iseng menghapus file manifestnya :D, jadi sebaiknya menggunakan cara yang ke dua aja.

      2. Menggunakan file Resource

      Ini ada source memanfaatkan XP Style menggunakan file resource, dan jangan lupa untuk melihat hasilnya project harus di complile terlebih dulu.

      Selamat mencoba :)

  75. syarif
    November 29, 2010 at 10:51 am | #104

    Untuk menulisnya dari aplikasi bisa menggunakan fungsi API atau pada saat instalasi program (lihat skrip inno diatas dibagian [Registry])

    maksudnya syntax yang mana mas.???

  76. syarif
    November 29, 2010 at 10:52 am | #105

    maksud saya skrip inno yang mana yang menunjukkan yang saya maksud?

    • November 29, 2010 at 12:02 pm | #106

      Yang ini :

      [Registry]
      ;mencatat lokasi instalasi program, ini dibutuhkan jika kita ingin membuat paket instalasi update
      Root: HKCU; Subkey: "Software\PT ALBASI\SPBB"; ValueName: "installDir"; ValueType: String; ValueData: {app}; Flags: uninsdeletevalue
      

      diganti menjadi

      [Registry]
      ;SET AUTO RUN
      Root: HKLM; Subkey: "SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\Run"; ValueName: "Aplikasi Presensi"; ValueType: String; ValueData: {app}\Presensi.exe; Flags: uninsdeletevalue
      

      Nilai ValueName dan ValueData menyesuaikan.

      Klo kita cek di registry windows hasilnya lebih kurang seperti ini.

      Selamat mencoba :)

  77. syarif
    November 29, 2010 at 12:22 pm | #107

    afwan berat mas.. saya coba ya..

  78. syarif
    November 30, 2010 at 12:22 pm | #109

    Alhamdulillah proses install berhasil. Tp p’tanyaan msh ada..:-P
    1. Biar ibd-nya dibuat per tabel, biasa pada file my.ini saya tambah innodb_file_per_table. Srcipt innosetupnya gmn, soalnya pas sy cari file my.ini g ada d folder aplikasi yg sdh t’install atau mysql noninstall-nya
    2. Cara biar icon uninstall dan setup beda (sy pk innosetup 5.4)?

    3. Kalo Cara bikin file cmd buat restore database, gmn y?

    Thx b4 :-)

    • November 30, 2010 at 1:38 pm | #110

      syarif :
      1. Biar ibd-nya dibuat per tabel, biasa pada file my.ini saya tambah innodb_file_per_table. Srcipt innosetupnya gmn, soalnya pas sy cari file my.ini g ada d folder aplikasi yg sdh t’install atau mysql noninstall-nya

      File my.ini nya kan bisa dibuat pada saat instalasi, coba perhatikan lagi DENGAN TELITI contoh skrip diatas terutama dibagian/section [INI].

      syarif :
      2. Cara biar icon uninstall dan setup beda (sy pk innosetup 5.4)?

      Ya tinggal bedakan aja nilai icon untuk SetupIconFile dan UninstallDisplayIcon lihat lagi di section [Setup]

      syarif :

      3. Kalo Cara bikin file cmd buat restore database, gmn y?

      Udah ada yang nanya disini, cek dibagian komentar.

  79. Pemula
    November 30, 2010 at 5:58 pm | #111

    Mau tanya bang admin :”>

    apa bisa membuat user admin lain mysql tanpa melalui user root

    karna di komputer tersebut sudah ada mysql untuk program lain dan tidak tahu password rootnya :”>

    thx b4

  80. syarif
    December 1, 2010 at 6:00 am | #113

    mas, untuk no 1. sebetulnya saya juga lihat section [ini], tapi saya belum tahu cara menambahkan script yang saya maksud ke file my.ini. yang saya tahu biasanya file my.ini itu adanya di folder (kalo di komputer saya : xampp/mysql/bin). pas saya masukkkan script tadi jadilah ibd-nya pertable. maaf mas saya masih sangat awam.. ^_^

    untuk no 2, dah saya coba g berhasil. apa saya yang salah y?. sy tulisnya : uninstalldisplayicon:uninstall.ico.. bgitu, atau salah?? ^_^

    untuk yang no 3, Alhamdulillah berhasil. cuma rencananya file backup dan restore itu sy simpan di bawah folder program saya yang ada di start menu. kalo saya mau ganti iconnya gimana? ^_^

    Mas Admin, maaf ya saya banyak tanya.. maklum saya salah satu manusia bodoh yang dimiliki indonesia.. hehe..

    • December 1, 2010 at 2:58 pm | #114

      syarif :

      mas, untuk no 1. sebetulnya saya juga lihat section [ini], tapi saya belum tahu cara menambahkan script yang saya maksud ke file my.ini. yang saya tahu biasanya file my.ini itu adanya di folder (kalo di komputer saya : xampp/mysql/bin). pas saya masukkkan script tadi jadilah ibd-nya pertable. maaf mas saya masih sangat awam.. ^_^

      Coba skrip yang mau ditambahkan di file my.ini nya seperti apa sih ?
      Contoh :

      [mysqld]
      port=3306
      basedir="C:/Program Files/MySQL/MySQL Server 5.1/"
      datadir="D:/MySQL Server 5.1/Data/"
      

      syarif :

      untuk no 2, dah saya coba g berhasil. apa saya yang salah y?. sy tulisnya : uninstalldisplayicon:uninstall.ico.. bgitu, atau salah?? ^_^

      dibagian section [Files] tambahkan skrip informasi nama file uninstall.iconya

      [Files]
      Source: uninstall.ico; DestDir: {app}; Flags: ignoreversion
      

      trus tinggal sesuaikan di section [Setup]

      [Setup]
      UninstallDisplayIcon={app}\uninstall.ico
      

      syarif :

      untuk yang no 3, Alhamdulillah berhasil. cuma rencananya file backup dan restore itu sy simpan di bawah folder program saya yang ada di start menu. kalo saya mau ganti iconnya gimana? ^_^

      Pengaturannya ada di section [Icons] dengan menambahkan parameter IconFilename

      [Icons]
      Name: {group}\Backup & Restore; Filename: BackupAndRestore.exe; WorkingDir: {app}; IconFilename: {app}\BackupAndRestore.ico
      

      selain itu section [Files] juga harus didaftarkan nama iconnya.

      [Files]
      Source: BackupAndRestore.ico; DestDir: {app}; Flags: ignoreversion
      

      Selamat mencoba :)

  81. syarif
    December 3, 2010 at 5:16 am | #115

    mas, no 2 & 3 Alhamdulillah beres..
    untuk yang no 1, script yang ingin saya tambahkan adalah : innodb_file_per_table. nanti hasilnya adalah file ibdata itu dibuat otomasi pertable tidak satu aja, dimaksudkan untuk antisipasi kerusakan databasase secara keseluruahan..

    saya bingungnya, my.ini di folder saya itu adanya di : mysql/bin bukan di folder mysql/data. mohon penjelasannya mengenai, my.ini ini itu file apa dan untuk apa?

    makasi sebelumnya ya mas..
    anda sangat membantu dalam proses penyelesaian kerja praktekku..
    mudah2an balsannya berlipat-lipat..
    ^_^

    • December 3, 2010 at 7:01 am | #116

      Sory ya om sy belum pernah coba mengaktifkan fitur innodb_file_per_table dan belum sempat juga untuk mencoba fitur tersebut :D.

      Tapi sekilas dari referensi yang saya baca, intinya cuma ada 2 ya ?
      1. Menjalankan service mysql dengan menambahkan option –innodb_file_per_table
      berarti tinggal revisi section [Run], di skrip menjalankan service mysql

      2. Menambahkan entri innodb_file_per_table = 1 di file my.ini, jadi tinggal revisi section [INI]

      [INI]
      Filename: {app}\mysql\my.ini; Section: mysqld; Key: innodb_file_per_table; String: 1; Tasks: installmysql
      Filename: {app}\mysql\my.ini; Section: mysqld; Key: basedir; String: {app}\mysql; Tasks: installmysql
      Filename: {app}\mysql\my.ini; Section: mysqld; Key: datadir; String: {app}\mysql\data; Tasks: installmysql
      
  82. syarif
    December 3, 2010 at 12:43 pm | #117

    thx mas.. saya coba dulu

  83. syarif
    December 4, 2010 at 9:49 am | #119

    Alhamdulillah berhasil mas..
    Tp waktu di-uninstall ko folder aplikasi sy msh ada, d dalamnya ada file dan folder pd folder mysql/data.
    Biar abis smua t’msuk folder app, gmn script-nya?
    Trus ada g, script buat hidden file tertentu yg ada d folder app qt?

    Lagi2..
    makasi y mas..
    mdh2an blm bosan jawabnnya..

    • December 4, 2010 at 10:29 am | #120

      syarif :
      Tp waktu di-uninstall ko folder aplikasi sy msh ada, d dalamnya ada file dan folder pd folder mysql/data.
      Biar abis smua t’msuk folder app, gmn script-nya?

      Ya dihapus manual om satu2x coba liat lagi di section [UninstallDelete] diatas.

      syarif :
      Trus ada g, script buat hidden file tertentu yg ada d folder app qt?

      Manfaatin aja om perintah attrib trus dipanggil di section [Run]. Ex:

      [Run]
      Filename: "{sys}\attrib.exe"; Parameters: "+s +h <nama_file_yg_mau_dihidden>"; Flags: runhidden
      

      Selamat mencoba :)

  84. syarif
    December 4, 2010 at 10:46 am | #121

    Ok mas, saya coba..
    Makasi y infonya..
    sukses selalu :)

  85. Andris
    December 6, 2010 at 11:13 pm | #123

    Mau tanya mas. mysql saya versi 5.0.51b, pas bikin setup nya pake mysql non install versi yang terbaru bisa ga ya? thanks ya..

  86. ridlo
    December 11, 2010 at 3:56 am | #125

    mas,itu kan make inno setup,kalo make setup factory gimana caranya ?
    mohon bantuannya.

    • December 11, 2010 at 4:19 am | #126

      Setup Factory ya? Udah lamaaa banget om sy cobanya, jadi belum bisa bantu nih.

      Bukannya dengan Inno Setup dan NSIS semua kebutuhan pembuatan paket instalasi sudah terpenuhi om ?

  87. roni
    December 12, 2010 at 3:35 am | #127

    om aq udah nyoba kenapa ya tetap ga bisa masuk ke Mysql, permsalahannya adalah service mysql tidak bisa dijalankan,,apabilan dijalankan error terus

    • December 12, 2010 at 1:49 pm | #128

      Coba ke komputer laen om, jangan2x komputer om yg bermasalah :grin:

      • roni
        December 13, 2010 at 2:55 pm | #129

        udah dicoba om admin tetap ga bisa…ne coding inno setp saya

        ;Menginstal Mysql
        Filename: “{pf}\mysql\Mysql Server 5.0\bin\mysqld-nt.exe”; Parameters: “install “”MySQL”””; StatusMsg: “Sedang menginstall service MySQL …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
        ;Filename: “{pf}\mysql\mysql server 5.0\bin\install_service.bat”; Flags: runhidden; MinVersion: 0,5.01.2600sp2
        ;Menjalankan Service Mysql
        Filename: {sys}\net.exe; Parameters: “start “”MySQL”””; StatusMsg: “Sedang menjalankan service MySQL Uey …”; Flags: runhidden; MinVersion: 0.0,4.0.1381; Tasks: installmysql
        ;Mendaftarkan port 3306

        Filename: “{sys}\netsh.exe”; Parameters: “firewall add portopening TCP 3306 “”Port MySQL”””; StatusMsg: “Sedang mendaftarkan port MySQL …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2
        Filename: “{sys}\netsh.exe”; Parameters: “firewall set service type = fileandprint mode = enable”; StatusMsg: “Mengaktifkan File and Printer Sharing …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2

        ;membuat database kosong
        Filename: “{pf}\mysql\Mysql Server 5.0\bin\mysql.exe”; Parameters: “-uroot -e “”CREATE DATABASE coba”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2

        Filename: “{app}\sispendik.exe”; Description: “{cm:LaunchProgram,Sispendik Baru}”; Flags: nowait postinstall skipifsilent

        Filename: “{sys}\myodbc3i.exe”; Parameters: “-a -d -t””MySQL ODBC 3.51 Driver;DRIVER={sys}\myodbc3.dll;SETUP={sys}\myodbc3S.dll”””; StatusMsg: “Tunggu sedang mendaftarkan driver MySQL Connector ODBC 3.51″; Flags: runhidden
        Filename: “{sys}\myodbc3i.exe”; Parameters: “-a -su -t””DSN=dsn-coba;DRIVER=MySQL ODBC 3.51 Driver;SERVER=127.0.0.1;DATABASE=coba;UID=root;PWD=”” -w”; Flags: runhidden; StatusMsg: “Tunggu sedang membuat DSN-ALBASI”

        Filename: “{pf}\mysql\mysql server 5.0\bin\cek.bat”; Flags: runhidden; MinVersion: 0,5.01.2600sp2

        [UninstallRun]
        ;uninstall driver myodbc
        Filename: “{sys}\myodbc3i.exe”; Parameters: “-s -r -su -n””dsn-albasi”””; StatusMsg: “Tunggu sedang menghapus DSN-ALBASI”; Flags: runhidden

        ;hapus dsn-albasi
        Filename: “{sys}\myodbc3i.exe”; Parameters: “-d -r -n””MySQL ODBC 3.51 Driver”””; StatusMsg: “Tunggu sedang menghapus driver MySQL Connector ODBC 3.51″; Flags: runhidden

  88. roni
    December 13, 2010 at 3:07 pm | #130

    kalo dibuka melalui services.msc untuk path di komputer asal adalah sebagai berikut :
    “C:\Program Files\MySQL\MySQL Server 5.0\bin\mysqld-nt” –defaults-file=”C:\Program Files\MySQL\MySQL Server 5.0\my.ini” MySQL

    kalo sewaktu diinstal dikomputer lain seperti ini :

    “C:\Program Files\MySQL\MySQL Server 5.0\bin\mysqld-nt.exe” MySQL

    distart juga ga bisa running untuk komputer yang lain…

    terima kasih

  89. December 13, 2010 at 11:43 pm | #131

    roni :

    om aq udah nyoba kenapa ya tetap ga bisa masuk ke Mysql, permsalahannya adalah service mysql tidak bisa dijalankan,,apabilan dijalankan error terus

    Coba om di copas juga skrip di section [Files] yang berhubungan dengan file-file MySQLnya, trus sekalian info lengkap versi MySQLnya.
    Contoh : mysql-5.0.xx

  90. roni
    December 15, 2010 at 3:30 am | #132

    [Files]
    ;MySQL version 5.0.85
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\bin\*”; DestDir: {pf}\Mysql\mysql server 5.0\bin; Flags: ignoreversion; Tasks: installmysql
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\share\*”; DestDir: {pf}\Mysql\mysql server 5.0\share; Flags: ignoreversion recursesubdirs; Tasks: installmysql
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\data\*”; DestDir: {pf}\Mysql\mysql server 5.0\data; Flags: ignoreversion recursesubdirs uninsneveruninstall; Tasks: installmysql
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\*”; DestDir: {pf}\mysql\Mysql Server 5.0\; Flags: ignoreversion; Tasks: installmysql

    ;File MyODBC Connector 3.51
    Source: “D:\Sispendik\msvcr71.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3i.exe”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3.lib”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3S.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3S.lib”; DestDir: {sys}; Flags: onlyifdoesntexist

    MySQL Versi 5.0.85

    • December 16, 2010 at 2:49 am | #133

      Coba seperti ini om :

      [Files]
      ;file-file MySQL
      Source: "C:\Program Files\MySQL\MySQL Server 5.0\bin\*"; DestDir: "{pf}\MySQL\MySQL Server 5.0\bin"; Flags: ignoreversion; Tasks: installmysql
      Source: "C:\Program Files\MySQL\MySQL Server 5.0\share\*"; DestDir: "{pf}\MySQL\MySQL Server 5.0\share"; Flags: ignoreversion recursesubdirs; Tasks: installmysql
      Source: "C:\Program Files\MySQL\MySQL Server 5.0\data\*"; DestDir: "{pf}\MySQL\MySQL Server 5.0\data"; Flags: ignoreversion recursesubdirs uninsneveruninstall; Tasks: installmysql
      Source: "C:\Program Files\MySQL\MySQL Server 5.0\*"; DestDir: "{pf}\MySQL\MySQL Server 5.0"; Flags: ignoreversion; Tasks: installmysql
      
      [INI]
      Filename: "{pf}\MySQL\MySQL Server 5.0\my.ini"; Section: mysqld; Key: basedir; String: "{pf}\MySQL\MySQL Server 5.0"; Tasks: installmysql
      Filename: "{pf}\MySQL\MySQL Server 5.0\my.ini"; Section: mysqld; Key: datadir; String: "{pf}\MySQL\MySQL Server 5.0\data"; Tasks: installmysql
      
      [Run]
      ;install service MySQL
      Filename: "{pf}\MySQL\MySQL Server 5.0\bin\mysqld-nt.exe"; Parameters: "install ""MySQL"""; StatusMsg: "Sedang menginstall service MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
      
      ;jalankan service MySQL
      Filename: {sys}\net.exe; Parameters: "start ""MySQL"""; StatusMsg: "Sedang menjalankan service MySQL ..."; Flags: runhidden; MinVersion: 0.0,4.0.1381; Tasks: installmysql
      
      ;mendaftarkan port default mysql (3306) ke firewall
      Filename: "{sys}\netsh.exe"; Parameters: "firewall add portopening TCP 3306 ""Port MySQL"""; StatusMsg: "Sedang mendaftarkan port MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2
      Filename: "{sys}\netsh.exe"; Parameters: "firewall set service type = fileandprint mode = enable"; StatusMsg: "Mengaktifkan File and Printer Sharing ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2
      
      ;membuat database kosong
      Filename: "{pf}\MySQL\MySQL Server 5.0\bin\mysql.exe"; Parameters: "-uroot -e ""CREATE DATABASE coba"""; Flags: runhidden; MinVersion: 0,5.01.2600sp2
      
      [UninstallRun]
      Filename: {sys}\net.exe; Parameters: "stop ""MySQL"""; StatusMsg: "Menghentikan Service MySQL ..."; Flags: runhidden; MinVersion: 0.0,4.0.1381
      Filename: "{pf}\MySQL\MySQL Server 5.0\bin\mysqld-nt.exe"; Parameters: "remove ""MySQL"""; StatusMsg: "Sedang menghapus service MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2
      

      Jangan lupa sebelum membuild setupnya, service mysqlnya di stop dulu.

      Selamat mencoba :)

  91. roni
    December 23, 2010 at 3:30 am | #134

    bos tetap ga mau jalan service mysqlnya,,dijalankan erornya yang muncul malah kaya gini
    Could not start the MySql service on Local Computer

    Error 1067 : The Process terminated unexpectedly

    boleh bos saya kirimkan file inno setupnya yang sudah saya build ke email bos,untuk nyoba filenya..jadi penasaran padahal mau dipakai client saya untuk menginstalke komputernya

    terima kasih

    • December 23, 2010 at 3:53 am | #135

      Wah klo file setupnya keGEDEan om, mendingan skrip inno setupnya aja trus di SENSOR skrip2x yang enggak dibutuhkan.

  92. roni
    December 24, 2010 at 2:25 am | #136

    ini bos skrip inno setupnya mohon dicek kali aja ada yg salah

    [Setup]
    ; NOTE: The value of AppId uniquely identifies this application.
    ; Do not use the same AppId value in installers for other applications.
    ; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
    AppId={{E9CC053D-758B-4DB6-90E9-0E4D956B15AA}
    AppName=Sispendik Baru
    AppVerName=Sispendik Versi 2.0
    AppPublisher=Erwan Production
    AppPublisherURL=http://www.example.com/
    AppSupportURL=http://www.example.com/
    AppUpdatesURL=http://www.example.com/
    DefaultDirName={pf}\Sispendik Baru
    DefaultGroupName=Sispendik Baru
    OutputDir=D:\contoh
    OutputBaseFilename=setup
    SetupIconFile=D:\Projectku\Iril\_gambar\1253369983_HP-Blank-Folder-Dock-512.ico
    Compression=lzma
    SolidCompression=yes

    [Languages]

    Name: en; MessagesFile: compiler:Default.isl

    [Tasks]
    ;Name: “desktopicon”; Description: “{cm:CreateDesktopIcon}”; GroupDescription: “{cm:AdditionalIcons}”; Flags: unchecked
    Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
    Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
    Name: installmysql; Description: “Install MySQL”; GroupDescription: “Proses tambahan:”; Flags: checkedonce

    [Files]
    Source: “D:\NPSN\sispendik.exe”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\BACKUP_REPORT\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs createallsubdirs
    Source: “D:\NPSN\_REPORT\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs createallsubdirs
    Source: “D:\NPSN\foxhhelp9.exe”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\TestEqeus.pfx”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\zlib.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\vfp9t.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\VFP9RENU.DLL”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\VFP9rdeu.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\vfp9r.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\msvcr71.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\hndlib.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\GdiPlus.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\NPSN\foxhhelpps9.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\Contoh\harat.sql”; DestDir: {pf}\mysql\mysql server 5.0\bin; Flags: ignoreversion
    Source: “D:\Contoh\cek.bat”; DestDir: {pf}\mysql\mysql server 5.0\bin; Flags: ignoreversion
    ;Source: “D:\CONTOH\install_service.bat”; DestDir: {pf}\mysql\mysql server 5.0\bin; Flags: ignoreversion

    ;file-file MySQL
    Source: “C:\Program Files\MySQL\MySQL Server 5.0\bin\*”; DestDir: “{pf}\MySQL\MySQL Server 5.0\bin”; Flags: ignoreversion; Tasks: installmysql
    Source: “C:\Program Files\MySQL\MySQL Server 5.0\share\*”; DestDir: “{pf}\MySQL\MySQL Server 5.0\share”; Flags: ignoreversion recursesubdirs; Tasks: installmysql
    Source: “C:\Program Files\MySQL\MySQL Server 5.0\data\*”; DestDir: “{pf}\MySQL\MySQL Server 5.0\data”; Flags: ignoreversion recursesubdirs uninsneveruninstall; Tasks: installmysql
    Source: “C:\Program Files\MySQL\MySQL Server 5.0\*”; DestDir: “{pf}\MySQL\MySQL Server 5.0″; Flags: ignoreversion; Tasks: installmysql

    Source: “D:\Sispendik\msvcr71.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3i.exe”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3.lib”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3S.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “D:\Sispendik\myodbc3S.lib”; DestDir: {sys}; Flags: onlyifdoesntexist
    ; NOTE: Don’t use “Flags: ignoreversion” on any shared system files

    [Icons]
    Name: “{group}\Sispendik Baru”; Filename: “{app}\sispendik.exe”
    Name: “{group}\{cm:ProgramOnTheWeb,Sispendik Baru}”; Filename: “http://www.example.com/”
    Name: “{commondesktop}\Sispendik Baru”; Filename: “{app}\sispendik.exe”; Tasks: desktopicon

    [INI]
    Filename: “{pf}\mysql\Mysql Server 5.0\my.ini”; Section: mysql; Key: basedir; String: {pf}\mysql\Mysql Server 5.0; Tasks: installmysql
    Filename: “{pf}\mysql\Mysql Server 5.0\my.ini”; Section: mysql; Key: datadir; String: {pf}\mysql\Mysql Server 5.0\data; Tasks: installmysql

    [Run]
    ;Menginstal Mysql
    ;install service MySQL
    Filename: “{pf}\MySQL\MySQL Server 5.0\bin\mysqld-nt.exe”; Parameters: “install “”MySQL”””; StatusMsg: “Sedang menginstall service MySQL …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2; Tasks: installmysql

    ;jalankan service MySQL
    Filename: {sys}\net.exe; Parameters: “start “”MySQL”””; StatusMsg: “Sedang menjalankan service MySQL …”; Flags: runhidden; MinVersion: 0.0,4.0.1381; Tasks: installmysql

    ;mendaftarkan port default mysql (3306) ke firewall
    Filename: “{sys}\netsh.exe”; Parameters: “firewall add portopening TCP 3306 “”Port MySQL”””; StatusMsg: “Sedang mendaftarkan port MySQL …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    Filename: “{sys}\netsh.exe”; Parameters: “firewall set service type = fileandprint mode = enable”; StatusMsg: “Mengaktifkan File and Printer Sharing …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    ;membuat database kosong
    Filename: “{pf}\MySQL\MySQL Server 5.0\bin\mysql.exe”; Parameters: “-uroot -e “”CREATE DATABASE coba”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    ;Filename: “{sys}\netsh.exe”; Parameters: “firewall add portopening TCP 3306 “”Port MySQL”””; StatusMsg: “Sedang mendaftarkan port MySQL …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    ;Filename: “{sys}\netsh.exe”; Parameters: “firewall set service type = fileandprint mode = enable”; StatusMsg: “Mengaktifkan File and Printer Sharing …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    ;membuat database kosong
    ;Filename: “{pf}\mysql\Mysql Server 5.0\bin\mysql.exe”; Parameters: “-uroot -e “”CREATE DATABASE coba”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    Filename: “{app}\sispendik.exe”; Description: “{cm:LaunchProgram,Sispendik Baru}”; Flags: nowait postinstall skipifsilent

    Filename: “{sys}\myodbc3i.exe”; Parameters: “-a -d -t””MySQL ODBC 3.51 Driver;DRIVER={sys}\myodbc3.dll;SETUP={sys}\myodbc3S.dll”””; StatusMsg: “Tunggu sedang mendaftarkan driver MySQL Connector ODBC 3.51″; Flags: runhidden
    Filename: “{sys}\myodbc3i.exe”; Parameters: “-a -su -t””DSN=dsn-coba;DRIVER=MySQL ODBC 3.51 Driver;SERVER=127.0.0.1;DATABASE=coba;UID=root;PWD=”” -w”; Flags: runhidden; StatusMsg: “Tunggu sedang membuat DSN-ALBASI”

    Filename: “{pf}\mysql\mysql server 5.0\bin\cek.bat”; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    [UninstallRun]
    ;uninstall driver myodbc
    Filename: “{sys}\myodbc3i.exe”; Parameters: “-s -r -su -n””dsn-albasi”””; StatusMsg: “Tunggu sedang menghapus DSN-ALBASI”; Flags: runhidden

    ;hapus dsn-albasi
    Filename: “{sys}\myodbc3i.exe”; Parameters: “-d -r -n””MySQL ODBC 3.51 Driver”””; StatusMsg: “Tunggu sedang menghapus driver MySQL Connector ODBC 3.51″; Flags: runhidden

  93. roni
    December 24, 2010 at 7:12 am | #137

    Om Sorry td saya uprek2 sendiri akhirnya ketemu permasalahannya,,,ada pada File My.INI dikomputer saya kalo my.ini untuk basedir dan databasedir saya defaultkan ke lokasi D:/Mysql/MySql Server 5.0/ ,,sedangkan service nya menjalankan yg ada dilokasi C:/Program Files/Mysql/Mysql Server 5.0 akhirnya servicenya ga bisa RUN,,terus saya rubah dari LOKASI D ke C start lagi akhirnya jalan om…

    makasih ya om atas ilmunya, sangat bermanfaat sekali dan sangat membantu pekerjaan saya

  94. roni
    December 30, 2010 at 8:15 am | #139

    Om mau nanya ada ga caranya agar user tidak menginstal file installer 2x…kecuali apabila user melakukan uninstall baru bisa diinstal lagi file installernya

    misal aplikasi sudah terinstal pada waktu user ingin menginstall lagi tidak bisa.. sehingga muncul pesan error aplikasi sudah terinstall dikomputer mohon agar di uninstall dulu

    terima kasih

    • December 30, 2010 at 8:43 am | #140

      Ya jelas ada om, cukup 2 langkah :

      1. Daftarkan aplikasi pada saat instalasi, misal dengan mencatat lokasi instalasi di section [Registry]

      [Registry]
      ;INSTALL DIR
      Root: HKCU; Subkey: "Software\PT. ALBASI\AplikasiKasir"; ValueName: "installDir"; ValueType: String; ValueData: {app}; Flags: uninsdeletevalue
      

      Jangan lupa flags uninsdeletevaluenya

      2. Pengecekan sudah terinstall atw belum dilakukan di prosedur InitializeSetup (section [Code])

      [Code]
      var
        installDir : string;
      
      function InitializeSetup(): Boolean;
      begin
        Result := True;
        
        // ambil informasi instalasi program
        RegQueryStringValue(HKEY_CURRENT_USER, 'Software\PT. ALBASI\AplikasiKasir', 'installDir', installDir);
        if installDir <> '' then // berarti belum diuninstall
        begin
            MsgBox('Maaf aplikasi bla.. bla.. bla.., sudah terinstall.'#10'Silahkan uninstall terlebih dulu', mbCriticalError, MB_OK);
            Result := False;
        end
      end;
      

      Selamat mencoba :)

  95. lelo chrismanto
    January 8, 2011 at 10:57 am | #141

    waaah mas ini admin yg plng mantap di jagad dunia maya,sangat aktif menjawab semua pertanyaan.

    Saya mau tanya ne mas,

    Klu saya develop pake vb.net 2005, inno setup versiberapa yg mendukung?.
    apakah carnya sama percis seperti yg mas ajarin sekarang ne?

    tolong pencerahannya mas.
    Thx

  96. mers
    January 13, 2011 at 4:33 am | #143

    Saya mau tanya mas
    Bagaimana kalo di aplikasi yg kta buat ada program tambahan
    misalnya OsenXPSuite yg memerlukan kode lisensi
    bagaimana scrip di Inno nya
    Trims….

    • January 13, 2011 at 5:25 am | #144

      Setau sy komponen2x yg butuh lisensi hanya dibutuhkan pada saat proses devlop, pada saat pendistribusikan sudah tidak dibutuhkan lagi.

      Jadi yg butuh lisensi itu hanya komputer devlopernya aja.

      CMIIW :D

  97. January 19, 2011 at 8:03 am | #145

    Mas Admin,kalau pakai Active Report untuk laporan, cara buat setupnya gmn ya…??? dl saya pernah pakai CreateInstallFree,untuk buat file setup, trus file2 dari active report aku masukin, tp tetep ga bisa, kalau pakai Inno Setup gmn ya solusinya..?? terima kasih atas pencerahannya…

    • January 19, 2011 at 9:10 am | #146

      Klo reportnya langsung dipanggil (enggak diembed ke form) cukup ditambahkan file arpro2.dll dan klo diembed tinggal tambahkan file ARVIEW2.OCX.

      Selamat mencoba :)

  98. January 19, 2011 at 10:25 am | #147

    Admin :
    Klo reportnya langsung dipanggil (enggak diembed ke form) cukup ditambahkan file arpro2.dll dan klo diembed tinggal tambahkan file ARVIEW2.OCX.
    Selamat mencoba

    sudah mas admin, kedua cara sudah dijalankan tapi pas dirun di komputer yang tidak ada active report nya, ada pesan error:

    Run-time error ’429′:

    ActiveX component can’t create object

    thx,

    • January 19, 2011 at 1:16 pm | #148

      Emang om ngetik skrip di innonya kayax apa sih ?

      • June 1, 2012 at 11:13 am | #149

        Run-time error ’429′:

        ActiveX component can’t create object

        thx,
        (pada Komponen osenxpsuite2006.ocx)

        Bagaimana mas solusinya

  99. imon
    March 17, 2011 at 12:23 pm | #150

    gan, mau nanya kok,setelah sukses instal -> finish setup[dari inno] nya, kok yang tertulis malah : “can’t connect mysql serverl on ‘localhost’ (10061)”

    tolong bantuannya gan, x_x s udah ulang beberapa kali dan hasilnya tetap sama… thanks b4 :)

    • March 17, 2011 at 1:13 pm | #151

      Coba install mysqlnya secara manual dulu om, setelah itu coba login jika gagal berarti permasalahannya ada di windows om, jadi stop dulu membuat packagenya :D
      sampai permasalahannya ketemu.

      • imon
        March 17, 2011 at 4:47 pm | #152

        jika instal manual, Mysql nya jalan,:) tapi jika diinstall melalui inno, kok muncul error “can’t connect mysql serverl on ‘localhost’ (10061)” x_x mysql nya gak terbaca setelah s install setup [hasil dari inno]. kira2 permasalahan nya apa itu gan? :)

  100. imon
    March 17, 2011 at 5:05 pm | #153

    gan, ini lebih rincinya:
    gan, pd saat s jalankan mysql di services [control panel]
    errornya :

    windows could not start the MySQL service on local computer
    error 1067: the process terminated unexpectedly

    ini kira2 solusinya gimana gan?
    jika s install ulang Mysql nya dan atur ulang konfignya, mysql nya jalan kembali..
    s pake MySQL 5.1

  101. imon
    March 18, 2011 at 2:18 am | #154

    gan, udah s dapat, ternyata permasalahan ada pada my.ini datadir. thanks ya gan :)

  102. Andri
    March 19, 2011 at 1:02 pm | #156

    Mau, Tanya gini :
    Saya membuat database “Data Barang” udah berhasil menggunakan Sql Server 200 dengan Adodc.
    pertanyaan saya :
    gimana pembuatan searching untuk pencarian data barang “untuk mempermudah pencarian secara simple” contoh ; yang mau di cari “Komik”
    padahal buku komiknya banyak dan juga data barang lainya “Komik A” , “Komik B” , “Komik C”, “Buku Gambar”, Dll
    Tolong Dong Code VBnya, menggunakan Database SQL Server dengan AdoDc? Di tunggu tank

    • March 19, 2011 at 3:24 pm | #157

      Pake klausa LIKE om, contoh :

      SELECT * FROM barang WHERE nama_barang LIKE '%komik%'
      

      Jadi perbedaannya hanya diquerynya saja, untuk kode VBnya tetap sama.

      Selamat mencoba :)

  103. Andri
    March 20, 2011 at 6:46 am | #158

    Aku coba :
    di Tabel datanya gini “pakai ListView1″

    KODE NAMA BARANG ST HARGA JUAL
    3000563000 Komik A BUAH 20000
    3000563050 Komik B BUAH 21000
    3000563040 Komik C BUAH 21500
    3000563040 Komik d BUAH 21500
    3000563041 Buku Tulis BUAH 10000
    3000563039 Buku Gambar BUAH 5000
    3000563039 Pulpen BUAH 4000
    3000563020 kapus tulis BUAH 2000

    Pada waktu “TextCari.Text” Entry “Komik” jadi yang pingin muncul …adalah

    KODE NAMA BARANG ST HARGA JUAL
    3000563000 Komik A BUAH 20000
    3000563050 Komik B BUAH 21000
    3000563040 Komik C BUAH 21500
    3000563040 Komik d BUAH 21500

    Kami Udah coba caranya seperti ini pakai “Like” tp Ga bisa
    ‘—–
    Dim dbDatabase As New ADODB.Connection
    Dim rsRecodset As ADODB.Recordset
    dbDatabase.Open “Provider=MSDASQL.1;Persist Security Info=False;Data
    Source=DataProgram;Initial Catalog=Toko”

    Set rsRecodset = dbDatabase.Execute(“select * from TabelBarang where Nama_Barang like ‘ & TextCari.Text & ‘ “)

    If Not rsRecodset.EOF Then
    ListView1.ListItems.Clear
    Do Until rsRecodset.EOF
    With ListView1
    ‘ .ListItems.Clear
    .ListItems.Add , , rsRecodset!Kode
    .ListItems(.ListItems.Count).SubItems(1) = rsRecodset!Nama_Barang
    .ListItems(.ListItems.Count).SubItems(2) = rsRecodset!Kategori
    .ListItems(.ListItems.Count).SubItems(3) = rsRecodset!Jenis
    .ListItems(.ListItems.Count).SubItems(4) = rsRecodset!Satuan
    .ListItems(.ListItems.Count).SubItems(5) = rsRecodset!ppn_Beli
    .ListItems(.ListItems.Count).SubItems(6) = rsRecodset!Harga_Beli
    .ListItems(.ListItems.Count).SubItems(7) = rsRecodset!ppn_Jual
    .ListItems(.ListItems.Count).SubItems(8) = rsRecodset!Harga_Jual

    End With
    rsRecodset.MoveNext
    Loop

    Else
    TextCari.Text = “”
    End If

    ‘——–
    hasilnya : masih tetap….. gimana yah..!!! please Tenk

    • March 20, 2011 at 7:39 am | #159

      Set rsRecodset = dbDatabase.Execute(“select * from TabelBarang where Nama_Barang like ‘ & TextCari.Text & ‘“)

      Kurang karakter % om, harusnya :

      Set rsRecodset = dbDatabase.Execute("SELECT * FROM TabelBarang WHERE Nama_Barang LIKE '%" & TextCari.Text & "%'") ' diapit karakter %
      

      Selamat mencoba :)

  104. Andri
    March 20, 2011 at 10:53 am | #160

    Sip… Bagus. Thank Teman.

  105. Andri
    March 20, 2011 at 11:11 am | #161

    Mas … Kalau bikiin Icon Buat Program VB, pakai apa yah.. Di Adobe Photoshop bisa ga yah, atau corell. Caranya gimana yah.. Thenk

  106. Andri
    March 20, 2011 at 12:09 pm | #163

    Lagi Nanya melulu ni… Hehe..
    Gini ”
    Mas, Kalau Listing Searcing Tadi saya pakai “textbook” tampil ke listviw.
    kalau menggunakan “tekan Tab” gimna mas ….untuk menampilkan Database tamoil ke “textbokk”

    Perintahnya gini …. :

    Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 9 Then
    Dim dbDatabase As New ADODB.Connection
    Dim rsRecodset As ADODB.Recordset
    dbDatabase.Open “Provider=MSDASQL.1;Persist Security Info=False;Data Source=DataProgram;Initial Catalog=Toko”
    Set rsRecodset = dbDatabase.Execute(“select * from TabelBarang where kode = ‘” & Trim(Text1.Text) & “‘”)
    If Not rsRecodset.EOF Then
    Text1.Text = rsRecodset!Kode
    Text2.Text = rsRecodset!Nama_Barang
    Text3.Text = rsRecodset!Kategori
    Text4.Text = rsRecodset!Jenis
    Text5.Text = rsRecodset!Satuan
    Text6.Text = rsRecodset!ppn_Beli
    Text7.Text = rsRecodset!Harga_Beli
    Text8.Text = rsRecodset!ppn_Jual
    Text9.Text = rsRecodset!Harga_Jual
    Text2.SetFocus
    Else
    Text2.SetFocus
    End If
    End If

    hasilnya : masih tetap….. gimana yah..!!! please Tenk

    • March 21, 2011 at 3:21 pm | #164

      Wah enggak ngerti sy pertanyaannya :D
      Atw coba aja perintah diatas dipindah ke event LostFocus

      Private Sub Text1_LostFocus()
          ' TODO : PERINTAH DIATAS DIPINDAH KESINI
      End Sub
      
  107. March 21, 2011 at 10:55 pm | #165

    Bagus bGt artikelnya….

    kLw ke C++ Builder caranya sama y, mas??

    • March 22, 2011 at 1:55 am | #166

      Sama kok om, yang penting daftarin runtime aplikasinya yg lengkap.

  108. Andri
    March 22, 2011 at 11:51 am | #167

    Mau nanya lagi .. hehehe
    Data ini :

    DATA BARANG ————–> Judulnya

    KODE, NAMA BARANG, ST, HARGA JUAL ——– > Tabel Recordsetnya.

    3000563000 Komik A BUAH 20000
    3000563050 Komik B BUAH 21000
    3000563040 Komik C BUAH 21500
    3000563040 Komik d BUAH 21500
    3000563041 Buku Tulis BUAH 10000
    3000563039 Buku Gambar BUAH 5000
    3000563039 Pulpen BUAH 4000
    3000563020 kapus tulis BUAH 2000

    jumlah : ? —–> Jumlahnya

    kode program untuk mencetak laporannya gimana ya mas .. !!!
    kalau pake cristalrefort tuh gampang dah jalan.
    Error ga bisa jalan .

    di tunggu. blsannya Thank..

  109. Andri
    March 23, 2011 at 10:11 am | #169

    MAS GINI PERINTAHNYA…!!!! Kok Ga Jalan Yah.
    ——————————————————————————–
    Dim SW, NO As String
    Private Sub Label6_Click()
    NO = 1
    SW = 1
    Form6.Show 1
    Cetak
    End Sub
    ——————————————————————————-
    Private Sub Cetak()
    With Adodc1.Recordset
    .MoveFirst
    Do While Not .EOF
    If SW = 1 Then
    Form5.FontBold = True
    Form5.FontSize = 14
    Form5.Print “LAPORAN DATA BARANG”
    Form5.Print “===================”
    Form5.FontBold = False
    Form5.FontSize = 10
    Form5.Print
    Form5.Print “————————————————————————–”
    Form5.FontBold = True
    Form5.Print Tab(3); “NO”
    Form5.Print Tab(9); “KODE”
    Form5.Print Tab(15); “NAMA BARANG”
    Form5.Print Tab(28); “KATEGORI”
    Form5.Print Tab(36); “JENIS”
    Form5.Print Tab(42); “SATUAN”
    Form5.FontBold = False
    SW = 0
    End If
    Form5.Print Tab(3); Format(NO, “####”);
    Form5.Print Tab(9); !Kode
    Form5.Print Tab(15); !Nama_Barang
    Form5.Print Tab(28); !Kategori
    Form5.Print Tab(36); !Jenis
    Form5.Print Tab(42); !Satuan
    .MoveNext
    Loop
    Form5.Print “————————————————————————–”
    End With
    End Sub
    ———————————————————————————
    Private Sub Form_Load()
    Adodc1.ConnectionString = “Provider=MSDASQL.1;Persist Security Info=False;” + _
    “Data Source=DataProgram;Initial Catalog=Toko”
    Adodc1.RecordSource = “TabelBarang”
    Adodc1.CommandType = adCmdTable
    End Sub
    ———————————————————————————

    Di Tunggu bls-nya…!!!

    • March 23, 2011 at 12:08 pm | #170

      Tambahkan perintah “NO = NO + 1″ diatas .MoveNext
      dan jangan lupa tipe data NO diganti Integer atw Long

  110. Andri
    March 24, 2011 at 8:13 am | #171

    Mas Cristal Report ver.8 Full Versi..download gratis di situs apa ya…

    • March 24, 2011 at 8:33 am | #172

      Coba googling aja om, itu merupakan salah satu proses pembelajaran :D

      Yg jelas di rental2x cd banyak om

  111. hanif
    March 24, 2011 at 8:44 am | #173

    Assalamuaikum. salam kenal mas. begini saya agak bingung klo instal dengan inno setup. kan klo pake bawaan vb sendiri ada mdac_typ.exe. itu file sebenarnya buat apa?. klo pke inno setup ditaruh dimana?. pengaruh ga klo mdac_typ.exe di hilangkan. karena kemarin sempat nyoba. ternyata di komputer lain mlh ga jln. sempat juga instal dengan silent instal dengan kode begini
    Filename: “msiexec.exe”; Parameters: “/i “”{tmp}\mysql-essential-5.1.54-win32.msi”” /qn”
    memang begitu selesai instalasi mysql udah langsung terinstal di PC. tapi konfigurasinya tetap manual.bisa tidak ya dari silent install agar konfigurasinya bisa otomatis. soalnya klo model masuk masukin begini
    ;MySQL version 5.0.85
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\bin\*”; DestDir: {pf}\Mysql\mysql server 5.0\bin; Flags: ignoreversion; Tasks: installmysql
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\share\*”; DestDir: {pf}\Mysql\mysql server 5.0\share; Flags: ignoreversion recursesubdirs; Tasks: installmysql
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\data\*”; DestDir: {pf}\Mysql\mysql server 5.0\data; Flags: ignoreversion recursesubdirs uninsneveruninstall; Tasks: installmysql
    Source: “C:\Program Files\Mysql\Mysql Server 5.0\*”; DestDir: {pf}\mysql\Mysql Server 5.0\; Flags: ignoreversion; Tasks: installmysql

    disamping ribet saya gagal mulu. saya juga bingung dengan versi non install di masukinnya dimana?
    untuk driver udah sukses bisa terpasang dengan baik. mohon penjelasannya.

    • March 24, 2011 at 12:07 pm | #174

      Waalaikumussalam

      1. Jika databasenya menggunakan MySQL tidak memerlukan Microsoft Data Access Components (mdac_typ.exe). MDAC biasanya digunakan jika databasenya menggunakan SQL Server itupun klo OSnya masih menggunakan windows 9x, mulai windows xp sudah tidak memerlukan MDAC lagi (CMIIW).

      Jadi intinya untuk MySQL cukup mengikutsertakan driver MySQL ODBC.

      2. Nah itulah kelebihan distribusi MySQL dalam versi non install dibandingkan dengan versi installer (.msi) karena dengan versi non install, proses instalasi bisa kita atur via skrip jadi tanpa perlu campur tangan user.

      3. Intinya om coba download aja MySQL versi non install disini, kemudian pilih yang “mysql-noinstall-5.1.56-win32.zip”, lihat gambar.

      Terakhir coba dibaca ulang lagi artikel diatas, karna sebelum sy publish sudah melalui tahap uji coba :D.

      Walaupun sedikit ribet, insya Allah sesuai dengan hasil yang didapat :)

  112. Catur Sigit Nugroho
    March 25, 2011 at 7:45 am | #175

    Makasih mas, dah sukses, cuma saya nyoba dengan wizardnya dulu kemudian baru mengeditnya lagi. klo dengan wizard kan di belakang flag ada tambahan begini
    Flags: ignoreversion
    dan dalam vb kan ada komponen aktif ky dll ocx itu. agar flag nya jadi begini :

    Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    secara otomatis bisa tidak ya?. atau memang harus manual di editnya.?

    • March 25, 2011 at 8:33 am | #176

      Klo pake wizard bawaan Inno memang harus manual om ngedit flagnya, klo mau yg lebih mudah coba pake ISTool atau InnoIDE jadi ada GUInya gitu.

      Selamat mencoba :)

  113. Andri
    March 31, 2011 at 1:16 pm | #177

    Mas Mau Tanya :
    Aku Kan Bikin Database Penjualan pakai SQLServer,pakai ADODC Tabelnya gini :

    Nama Tabel ;Penjualan

    Column Nime ; Type
    ___________________________________
    Nomor;varchar
    Tanggal;datetime
    Waktu;datetime
    Kode_Barang;varchar
    Nama_Barang;varchar
    Satuan;varchar
    Quantity;float
    Harga;float
    Jumlah;float

    ——————————

    Private Sub Simpan()
    Dim dbDatabase As New ADODB.Connection
    Dim rsRecodset As ADODB.Recordset
    dbDatabase.Open “Provider=MSDASQL.1;Persist Security Info=False;Data Source=DataProgram;Initial Catalog=Toko”
    Set rsRecodset = dbDatabase.Execute(“select *from Penjualan where Nomor =’” & Text1.Text & “‘”)
    If rsRecodset.EOF Then
    dbDatabase.Execute (“insert into Penjualan(Nomor,Tanggal,Waktu,Kode_Barang,Nama_Barang,Satuan,Quantity,Harga,Jumlah) values (‘” & Text1.Text & “‘,’” & Text2.Text & “‘,’” & Text3.Text & “‘,’” & Text4.Text & “‘,’” & Text5.Text & “‘,’” & Text6.Text & “‘,’” & Text7.Text & “‘,’” & Text8.Text & “‘,’” & Text9.Text & “‘)”)
    Bersih
    MsgBox “Data Selesai Tersimpan ……”, vbQuestion + vbOKOnly, “Konfirmasi”
    End If
    End Sub

    Private Sub Bersih()
    Text1.Text = “”
    Text2.Text = “”
    Text3.Text = “”
    Text4.Text = “”
    Text5.Text = “”
    Text6.Text = “”
    Text7.Text = “”
    Text8.Text = “”
    Text9.Text = “”
    Text1.SetFocus
    End Sub

    Pada Waktu Mau Di Simpan Kenapayah Kok Jadinya !!!(TAMPIL informasi error dibawah ini)) Pada TabelTanggal & Waktu,

    —–

    Run-time error ‘-2147217913(80040e07)’:
    [Microsft][ODBC SQL Server Drive][SQL Server The converiso of cha data type to a datetime data type sesulted in an out-of-rangedatetime value

    -----

    Tp Kalau tidak di isi "Tanggal & Waktu", bisa Tersimpan tapi isinya di tabel :
    Tanggal = 01-01-2000
    Waktu=01-01-2000

    Begituuuuuu.....

    Balas Tolong Dong Mas....CODING- nya

    • April 1, 2011 at 1:22 pm | #178

      Coba di debug dulu perintah insertnya :

      Private Sub Command1_Click()
          Dim strSql As String
          
          strSql = "insert into Penjualan(Nomor,Tanggal,Waktu,Kode_Barang,Nama_Barang,Satuan,Quantity,Harga,Jumlah) values ('" & Text1.Text & "',’" & Text2.Text & "',’" & Text3.Text & "',’" & Text4.Text & "',’" & Text5.Text & "',’" & Text6.Text & "',’" & Text7.Text & "',’" & Text8.Text & "',’" & Text9.Text & "')"
          Debug.Print strSql
      End Sub
      

      Hasilnya langsung dijalankan di Query Analyzer biar lebih gampang untuk mengecek kesalahannya.

  114. Andri
    April 1, 2011 at 1:04 pm | #179

    Sama ini Mas Kalau, ingin mengetahui “NOMOR” terakhir Giamana Mas…, Code Vb-nya?
    Pada waktu Klick Command “BARU”

    Tank di tunggu balasannya……..

    • April 1, 2011 at 1:25 pm | #180

      Emang format nomor fakturnya gimana om? Apakah urut ? klo urut bisa pake query berikut :

      SELECT TOP 1 nomor FROM Penjualan ORDER BY nomor DESC
      
  115. arief
    April 7, 2011 at 4:09 am | #181

    Halo juragan,
    Biasanya aku bikin setup dari visual studionya nah kalo scrip ini aku agak gak mudeng deh ( maaf pemula ) pertanyaanya :
    1. itu script di ketik manual ? atau hasil compile dari inno nya ?
    2. ambil sumber file yang mau di bikin setup itu di tulis di scripnya ?
    3. buat folder untuk file setup itu harus di dalem sumber filenya ada bisa sembarang?
    4. ini bisa untuk bikin setup di vb.net yang di develop pakai vs 2005 keatas engak?

    thanks ya juragan

    • April 7, 2011 at 4:57 am | #182

      itu script di ketik manual ? atau hasil compile dari inno nya ?

      Klo untuk vb 6 biasanya sy buat dulu pake tool Package & Deployment Wizard gunanya untuk mengecek file dll/ocx yg dibutuhkan dibagian [Files], kemudian sy konversi menggunakan ISTool, setelah itu baru dimodif sesuai kebutuhan.

      ambil sumber file yang mau di bikin setup itu di tulis di scripnya ?

      klo file sumber digabung dengan file skripnya cukup menyebutkan nama filenya

      buat folder untuk file setup itu harus di dalem sumber filenya ada bisa sembarang?

      bebas, klo beda lokasi harus menyebutkan lokasi file sumbernya secara absolute, misal “c:\file_sumber\file.ocx”

      ini bisa untuk bikin setup di vb.net yang di develop pakai vs 2005 keatas engak?

      Ya jelas bisa om, sy sendiri sekarang devlop pake VB 2005
      Untuk file sumbernya sy langsung ambil dari folder Release, trus flag skripnya diignoreversion aja.

      Selamat mencoba :)

  116. April 7, 2011 at 8:53 am | #183

    bang admin….
    aku pakai vb6; xampp; mysql connector odbc 5.1 driver; crystal report 8.5…

    aku dah buat aplikasinya… bentuk .exe; nah saya ingin membuat semua (vb6; xampp; mysql connector; crystal report) jadi 1 instaler… nah yang saya bingungkan…
    nanti setting akun untuk databasenya bagaimana? kan harus setting odbc connectornya… apakah bisa otomatis??
    kemudian membuat databasenya bagaimana??? sebab saya sudah ada database menggunakan xampp….

    maaf bang admin saya sudah baca2 post bang admin yang berhubungan dengan installer tapi tetap tidak mengerti soalnya saya masih pemula….

    jika berkenan mohon dikirim email saja cara2nya….

    terima kasih sebelumnya

    • April 7, 2011 at 10:06 am | #184

      Si om ini bercanda kali butuhnya cuma MySQL kok harus menginstall XAMPP segala, klo om developnya aplikasi web ini masih masuk akal, karna XAMPP itukan paket kompilasi beberapa program (Apache Web Server, MySQL, PHP, dan Perl) dengan tujuan mempermudah proses instalasi ke empat aplikasi tersebut.

      Sebenarnya sih enggak masalah om menggunakan XAMPP waktu develop, yang penting waktu distribusi program ke klien mengikutsertakan MySQL.

      Jadi yang wajib itu MySQlnya bukan XAMPPnya.

  117. April 7, 2011 at 10:42 am | #185

    lalu bagaimana bang admin??? apa saya harus Uninstall XAMPP?

    • April 8, 2011 at 4:18 am | #186

      Enggak perlu om, nanti waktu buat skrip inno setupnya lokasi sumber MySQLnya langsung diarahkan ke “C:\xampp\mysql”

  118. April 7, 2011 at 10:57 am | #187

    bang database yang dari XAMPP bisa di export ke MySQL apa tidak?? bagaimana caranya?

    • arief
      April 8, 2011 at 2:17 am | #188

      ariska :
      bang database yang dari XAMPP bisa di export ke MySQL apa tidak?? bagaimana caranya?

      XAMPP itu 1 buah aplikasi yang intinya berisi apache ( web server ) dan Mysql ( databse ) kalau anda develop desktop aplikasi yang di perlukan cuma mysqlnya saja.

      mysql di databse bisa di export buka saja pakai phpmyadmin yang defaultnya sudah terinstall pada saat anda install XAMPP.

    • April 8, 2011 at 4:20 am | #189

      Yg jelas bisa om, seperti kata om Arief pake phpmyadmin aja

  119. arief
    April 8, 2011 at 2:24 am | #190

    Gan,

    Kalo saya baca2 tutorial di int, pada saat kompile pakai inno setup itu di perlukan file .exe, nah file exe sendiri bukanya file jadi yang sudah siap di instal? jadi engak perlu inno setup pun dah bisa kan ? atau saya salah paham ?

    bisa engak misal kita develop pakau vs 2005 belum di jadiin exe kan masih dalam folder biasa dengan beberapa file form terus kita mau buat file instaler pakai inno setup.

    tolong gan kalo dari vs mesti di apain dulu baru bisa di bikin pakai inno setup.

    thanks

    • April 8, 2011 at 4:47 am | #191

      Kalo saya baca2 tutorial di int, pada saat kompile pakai inno setup itu di perlukan file .exe, nah file exe sendiri bukanya file jadi yang sudah siap di instal? jadi engak perlu inno setup pun dah bisa kan ? atau saya salah paham ?

      Iya om sebenarnya inno setup atw tool sejenisnya hanya untuk mempermudah kita melakukan distribusi program. Nah klo om mau melakukan langkah-langkah berikut secara manual berarti enggak perlu tool installer :
      1. membuat folder aplikasi
      2. mengcopy file exe aplikasi
      3. mengcopy file library(ocx/dll) ke windows system trus meregisternya satu2x dg perintah regsvr32
      4. membuat key uninstall di registry
      5. membuat shortcut didesktop/start program

      bisa engak misal kita develop pakau vs 2005 belum di jadiin exe kan masih dalam folder biasa dengan beberapa file form terus kita mau buat file instaler pakai inno setup.

      Enggak om harus dijadikan exe dulu.

      tolong gan kalo dari vs mesti di apain dulu baru bisa di bikin pakai inno setup.

      1. Aktifkan toolbar Show All Files pada Solution Explorer, kemudian expand node References pilih satu2x library yg ingin diikut sertakan pada saat instalasi set properties Copy Local = true. Lihat gambar
      2. Kemudian pada toolbar cari pilihan Solution Configurations, aktifkan pilihan jadi Release. Lihat gambar
      3. Build Solution (menu Build -> Build Solution)
      4. Terakhir cek folder Release di project om, lihat gambar

      Nah pada saat membuat skrip inno setup lokasi instalasi file diarahkan ke folder releasi. ex :

      [Files]
      ;My Application Runtime
      Source: E:\Project IC\my_repo\SmartActivationV2\bin\Release\*"; DestDir: {app}; Flags: ignoreversion
      

      Selamat mencoba :)

  120. arief
    April 8, 2011 at 8:58 am | #192

    Oh begono toh juragan, tengkiu ya gan…

  121. Andri
    April 11, 2011 at 10:39 am | #194

    Mau Tanya Mas Gini….
    Kalau Membuat Pencarian memakai kategori DrTanggal s/d Tgl gimana mas ?

    Aku Udah Bikin Kodenya tapi kok Nggak Jalan Jalan …seperti di bawah ini :
    ——————————————————————-
    Private Sub TextCari_Change()
    NO = 1
    Dim dbDatabase As New ADODB.Connection
    Dim rsRecodset As ADODB.Recordset
    dbDatabase.Open “Provider=MSDASQL.1;Persist Security Info=False;Data Source=DataProgram;Initial Catalog=Toko”
    Set rsRecodset = dbDatabase.Execute(“select *from Penjualan where Tgl_Jual between #” & TglDari.Text & “# and #” & TglSampai.Text & “#, Nama_Barang LIKE ‘%” & Trim(TextCari.Text) & “%’”)

    If Not rsRecodset.EOF Then
    ListView1.ListItems.Clear
    Do Until rsRecodset.EOF
    With ListView1
    .ListItems.Add , , NO
    .ListItems(.ListItems.Count).SubItems(1) = rsRecodset!No_Jual
    .ListItems(.ListItems.Count).SubItems(2) = rsRecodset!Tgl_Jual
    .ListItems(.ListItems.Count).SubItems(3) = rsRecodset!Waktu
    .ListItems(.ListItems.Count).SubItems(4) = rsRecodset!Operator
    .ListItems(.ListItems.Count).SubItems(5) = rsRecodset!Kode_Customer
    .ListItems(.ListItems.Count).SubItems(6) = rsRecodset!Nama_Customer
    .ListItems(.ListItems.Count).SubItems(7) = rsRecodset!Kode_Barang
    .ListItems(.ListItems.Count).SubItems(8) = rsRecodset!Nama_Barang
    .ListItems(.ListItems.Count).SubItems(9) = rsRecodset!Satuan
    .ListItems(.ListItems.Count).SubItems(10) = rsRecodset!Quantity
    .ListItems(.ListItems.Count).SubItems(11) = rsRecodset!Harga_Jual
    .ListItems(.ListItems.Count).SubItems(12) = rsRecodset!Disc
    .ListItems(.ListItems.Count).SubItems(13) = rsRecodset!Jumlah
    .ListItems(.ListItems.Count).SubItems(14) = rsRecodset!Kategori
    .ListItems(.ListItems.Count).SubItems(15) = rsRecodset!Jenis
    .ListItems(.ListItems.Count).SubItems(16) = rsRecodset!Stok
    End With
    rsRecodset.MoveNext
    NO = NO + 1
    Loop
    JumTransaksi.Caption = ListView1.ListItems.Count
    Else
    End If
    End Sub
    —————————————————————-

    Di Tunggu Konfirmasinya… Thank

  122. Andri
    April 11, 2011 at 10:42 am | #195

    Kode Yang ininya gimana mas…gitu aja.

    Set rsRecodset = dbDatabase.Execute(“select *from Penjualan where Tgl_Jual between #” & TglDari.Text & “# and #” & TglSampai.Text & “#, Nama_Barang LIKE ‘%” & Trim(TextCari.Text) & “%’”)

    Tolong mas Yah… Makasih.

    • April 11, 2011 at 11:45 am | #196

      Querynya masih salah om, antar kondisi dipisahkan dengan operator bisa AND, OR atw lainnya :

      query = "select * from Penjualan where Tgl_Jual between #" & TglDari.Text & "# and #" & TglSampai.Text & "# AND Nama_Barang LIKE '%" & Trim(TextCari.Text) & "%'"
      

      Jadi bukan menggunakan koma seperti querynya om.

  123. acenk
    April 12, 2011 at 4:48 am | #197

    Cari ke sana kemari tak taunya di sini baru ketemu artikel yang mantap. Ijin copas semuanya mas.

  124. darmawan
    May 15, 2011 at 1:44 am | #199

    Salam Kenal
    Mas Admin rasanya saya tidak bisa tanpa mengucapkan terimakasih kepada mas Admin karena saya membaca semua artikel dari blog anda sehingga dpt sy manfaatkan dengan program vb yg saya develop, sekalian juga saya mau tanya apakah InnoSetup dapat digabungkan dengan Merge Module dari CrystalReports XI, trims sekali lagi dan semoga ilmu yg anda sebarkan jadi berkah untuk anda Amin…

    • May 15, 2011 at 7:25 am | #200

      Coba link ini om, soalnya sy bukan pengguna Crystall Report jadi belom bisa bantu ngoprex :D

  125. ahmad
    June 4, 2011 at 10:56 am | #201

    assalammualaikum.
    mw nanya om,knp ya setiap install visual basic 6.0 gagal truz.
    selalu ada bacaan’can’t find DA0350.DLL’.
    mohon bantuannya,om.
    terima kasih.

    • Andris
      June 5, 2011 at 5:10 pm | #202

      Mungkin kena di Installer vb 6 nya.

  126. Andris
    June 5, 2011 at 5:16 pm | #203

    Kang mau tanya, gimana cara nulis di file .INI yang langsung nulis stringnya.
    Jadi gini kasusnya, installer saya sudah berhasil install mysql tapi nilai yang ditulis di file my.INI selalu kurang “skip-name-resolve”. Padahal string ini butuh banget biar client bisa konek ke server. Sintak yang aku tulis seperti ini.
    [INI]
    Filename: {app}\mysql\my.ini; Section: mysqld; Key: basedir; String: {app}\mysql; Tasks: installmysql
    Filename: {app}\mysql\my.ini; Section: mysqld; Key: datadir; String: {app}\mysql\data; Tasks: installmysql
    Filename: {app}\mysql\my.ini; Section: mysqld; String: skip-name-resolve; Tasks: installmysql

    Apa ada yang salah ya kang? karena hasil dari sintak ini, 2 baris atas berhasil dijalankan (nilainya keluar). Tapi baris ke 3 tidak tertulis.

    Terima kasih banyak kang.

    • June 6, 2011 at 11:12 am | #204

      Kayaxnya enggak bisa om, soalnya var “skip-name-resolve” tidak ada valuenya

  127. Andris
    June 6, 2011 at 6:15 pm | #205

    Trus ada akal ga untuk memasukkan “skip-name-resolve” ke dalam file my.INI

    Thanks banget kang.

    • June 7, 2011 at 5:53 am | #206

      Coba seperti ini om :

      [Files]
      ; tambahkan skrip berikut pada section [Files], lokasi source mysql disesuaikan
      Source: mysql-5.1.36-win32\my.ini; DestDir: {app}\mysql; Flags: ignoreversion; Tasks: installmysql; AfterInstall: modifMyINI
      
      [INI]
      ; perintah berikut dinonaktifkan
      ;Filename: {app}\mysql\my.ini; Section: mysqld; Key: basedir; String: {app}\mysql; Tasks: installmysql
      ;Filename: {app}\mysql\my.ini; Section: mysqld; Key: datadir; String: {app}\mysql\data; Tasks: installmysql
      
      [Code]
      procedure modifMyINI();
        var DestFile: String;
        var SrcFile: String;
        var SrcContent: String;
        
      begin
        // lokasi file my.ini yg akan diedit
        SrcFile := ExpandConstant('{app}\mysql\my.ini');
        
        // lokasi file temporary dg nama my2.ini
        DestFile := ExpandConstant('{app}\mysql\my2.ini')
        
        // tulis ulang nilai basedir, datadir dan skip-name-resolve disini
        SetIniString('mysqld', 'basedir', ExpandConstant('{app}\mysql'), SrcFile);
        SetIniString('mysqld', 'datadir', ExpandConstant('{app}\mysql\data'), SrcFile);
        SetIniString('mysqld', 'skip-name-resolve', '', SrcFile);
      
        // baca file my.ini
        LoadStringFromFile(SrcFile, SrcContent);
        
        // ganti skip-name-resolve= menjadi skip-name-resolve
        StringChange(SrcContent, 'skip-name-resolve=','skip-name-resolve');
      
        // simpan file temporary my.ini dg nama my2.ini
        SaveStringToFile(DestFile,SrcContent, False);
      
        DeleteFile(SrcFile); // delete file my.ini
      
        // ganti nama file my2.ini menjadi my.ini
        RenameFile(DestFile,ExpandConstant('{app}\mysql\my.ini'));
      end;
      

      Selamat mencoba :)

      • Andris
        June 29, 2011 at 1:43 pm | #207

        Ok kang sudah bisa, tapi pas dicoba di win 7 ga bisa. seperti ga ada perubahan sebelumnya. Kalo dengan sintak diatas maka yang muncul di my.ini nya adalah :
        [mysqld]
        basedir:….
        datadir:…
        skip-name-resolve

        kalo yang muncul di win 7 :
        basedirnya tidak terubah seperti yang diinstall
        datadinya juga tidak berubah seperti yang diinstall
        skip-name-resolve juga tidak ada.

        aku dah coba untuk naruh di tempat lain file my.ini tsb kemudian aku replace-kan ke drive installernya lokasinya di drive sistem win7. tapi ga ada efek. Pas aku coba replace manual muncul pesan access denied. kira2 apa yang salah ya kang? Thx banget.

        • June 29, 2011 at 2:37 pm | #208

          Klo nampil pesan “access denied” ya waktu nginstallnya pake login Admin om

  128. June 7, 2011 at 3:38 am | #209

    permisi mas admin..
    saya programmer support untuk pembuatan aplikasi Payroll…

    aplikasi kami menggunakan vb 6.0 + ActiveReport + SQL Server 2000

    tapi kami ingin mencoba membuat aplikasi Trial yang menggunakan MySQL Server 5.5

    nah yang ingin saya tanyakan adalah, untuk masalah ODBC nya itu bagaimana ya ?
    saya sudah ikuti petunjuk yang mas admin kasih. tapi selalu gagal di ODBC (DSN Not found, Dll)

    apakah komputer harus terinstall ODBC&mySQL terlebih dahulu atau tidak ?

    terima kasih.
    ditunggu jawabanya ya :)

    • June 7, 2011 at 6:07 am | #210

      Ini om ringkasan skrip diatas khusus untuk mendaftarkan MySQL ODBC Connector :

      [Files]
      ;daftar file MySQL ODBC 5.1
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.dll"; DestDir: {sys}; Flags: onlyifdoesntexist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.dll"; DestDir: {sys}; Flags: onlyifdoesntexist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.lib"; DestDir: {sys}; Flags: onlyifdoesntexist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.lib"; DestDir: {sys}; Flags: onlyifdoesntexist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc-installer.exe"; DestDir: {sys}; Flags: onlyifdoesntexist
      
      [Run]
      ;install driver myodbc
      Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -a -n ""MySQL ODBC 5.1 Driver"" -t ""DRIVER=myodbc5.dll;SETUP=myodbc5S.dll"""; StatusMsg: "Tunggu sedang mendaftarkan driver MySQL Connector ODBC 5.1.5"; Flags: runhidden
      
      [UninstallRun]
      ;uninstall driver myodbc
      Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -r -n ""MySQL ODBC 5.1 Driver"""; StatusMsg: "Tunggu sedang menghapus driver MySQL Connector ODBC 5.1.5"; Flags: runhidden
      

      Jangan lupa dicek versi MySQL ODBC Connector yg om gunakan, contoh skrip diatas menggunakan versi MySQL ODBC 5.1

      Selamat mencoba :)

  129. Alan Shufy
    June 13, 2011 at 12:27 pm | #211

    ketemu lagi nih kang!
    ada bocoran gmana caranya membuat auto backup untuk aplikasi vb 6 dengan database mysql ngak?

    • June 14, 2011 at 2:11 am | #212

      Ngapain report2x om buat aplikasi lagi, manfaatin aja fasilitas Scheduled Tasks nya windows

      • Alan Shufy
        June 14, 2011 at 6:04 am | #213

        maksud saya saya buat aplikasi dengan mysql misalnya saya ingin di dalam aplikasi terdapat fasilitas untuk backup manual dan auto backup dan mengeset waktu di dalam aplikasi itu sendiri, untuk backup manual saya udah baca postingan akang nah saya ingin mencoba menambahkan backup otomatisnya. kira2 source untuk menjalankan file batch pada schedule task yg akang suruh di postingan lain untuk saya gmana caranya? sebelumnya terima kasih :) salut buat ilmunya….

        • June 14, 2011 at 10:28 am | #214

          Salut sih salut om, klo ditanyain trus babak belur juga sy :D

          Langkah-langkahnya lebih kurang seperti ini om :

          1. Buat file batch misal dg nama backup.cmd, trus file ini dicopykan aja ke folder MySQL\bin

          for /f "tokens=2-4 delims=/ " %%a in ('date /T') do set year=%%c
          for /f "tokens=2-4 delims=/ " %%a in ('date /T') do set month=%%a
          for /f "tokens=2-4 delims=/ " %%a in ('date /T') do set day=%%b
          
          for /f "tokens=1 delims=: " %%h in ('time /T') do set hour=%%h
          for /f "tokens=2 delims=: " %%m in ('time /T') do set minutes=%%m
          for /f "tokens=3 delims=: " %%a in ('time /T') do set ampm=%%a
          
          rem MEMBUAT FILE BACKUP DATABSE DENGAN FORMAT NAMA_DATABASE_tahun-bulan-hari_jam_menit
          rem NAMA_DATABASE MENYESUAIKAN
          set FILE_BACKUP=NAMA_DATABASE_%year%-%month%-%day%_%hour%-%minutes%-%ampm%
          
          rem USER_NAME, USER_PASSWORD dan NAMA_DATABASE menyesuaikan
          mysqldump -uUSER_NAME -pUSER_PASSWORD --routines NAMA_DATABASE > "E:\Backup Database\%FILE_BACKUP%.SQL"
          

          2. Pelajari bagaimana membuat scheduled task untuk menjalankan file batch disini.

          Jangan sebentar2x nanya ya, entar malah sy yg tambah pintar :D

          Selamat mencoba :)

  130. ladiezt
    June 30, 2011 at 9:25 am | #215

    mas,aq mau tanya nih.aq udh coba pake inno seperti yg diatas tapi pas berhasil di instal ketika setup nya di jalanin ga bisa mas.muncul error [ODBC][MySQL] not found.
    saya cari instalan connector odbc nya di C:\program files\MySQL…..ga ada mas,
    bisa kasih pencerahan ga mas?
    lg bikin setup buat skripsi nih..
    makasihhh..^_^

    • June 30, 2011 at 11:21 am | #216

      Ini mba2x kan? Bukan om2x :D

      Jadi gini mba, ODBC MySQL bukan bawaan Windows jadi harus diinstal terlebih dahulu. Untuk file setupnya bisa didownload disini.

      Setelah diinstall coba dijankan lagi inno setupnya

      • ladiezt
        June 30, 2011 at 3:18 pm | #217

        ya bukan donk,hehehe…bagi ym nya donk mas…:D
        udah berhasil bikin setup nya mas,mslahnya pas saya jalankan programnya muncul pesan error tentang odbc itu mas??
        saya nambahin script ini dimana mas,orang saya instal connectornya ga ada di C:\program files\mysql\….

        script ini lho mas :
        [Files]
        ;daftar file MySQL ODBC 5.1
        Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
        Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
        Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.lib”; DestDir: {sys}; Flags: onlyifdoesntexist
        Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.lib”; DestDir: {sys}; Flags: onlyifdoesntexist
        Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc-installer.exe”; DestDir: {sys}; Flags: onlyifdoesntexist

        • July 1, 2011 at 9:22 am | #218

          Berarti errornya pada saat menjalankan programnya ya?

          Bukan pada saat proses pembuatan paket instalasinya ?
          Klo iya mungkin lupa menambahkan perintah berikut di skrip inno setupnya.

          [Run]
          ;install driver myodbc
          Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -a -n ""MySQL ODBC 5.1 Driver"" -t ""DRIVER=myodbc5.dll;SETUP=myodbc5S.dll"""; StatusMsg: "Tunggu sedang mendaftarkan driver MySQL Connector ODBC 5.1.5"; Flags: runhidden
          

          YM ID : k4m4r82 (tapi jarang online :D)

  131. July 6, 2011 at 1:48 pm | #219

    kalau untuk jaringan LAN bisa? setting odbcnya gmn ya, soalnya saya pake connectionstring…

    • July 6, 2011 at 2:16 pm | #220

      Buat aja form input untuk memasukkan informasi yg dibutuhkan connectionstringnya, contohnya ada disini.

  132. July 9, 2011 at 8:07 am | #221

    assalmualaikum om..
    om mo nanya knp ya hasil compile inno setup vb dg active report kok load reportx lama buanget padahal dah disertai arpro2.dll.,

    • July 10, 2011 at 7:48 am | #222

      Harusnya enggak lah om, enggak ada hubungannya lagi antara ngeload ActiveReportnya lambat dengan Inno setup.

      Klo ngeload ActiveReportnya lambat berarti hubungannya dg aplikasi yg kita buat

  133. July 10, 2011 at 10:09 pm | #223

    gitu ya om..tapi waktu aq instal active report baru bisa load reportx..emang ada dll selain arpro2.dll yg harus disertakan dlm compile ya om???

    • July 11, 2011 at 12:01 am | #224

      Klo langsung menampilkan reportnya dll yg dibutuhkan cukup file arpro2.dll tapi klo laporannya diembed ke form menggunakan komponen ActiveReports Viewer perlu file dll tambahan yaitu arview2.ocx

      Sy juga pernah ketemu kasus dimana ngeload laporannya lama banget, tp waktu koneksi internet dimatikan ngeloadnya normal, mungkin tips yg ini bisa om coba :D

  134. July 12, 2011 at 2:24 am | #225

    sudah saya coba om,,tapi masih blum ada efekx,q cek pada IDE Visual Basicx ternyata untuk buka desain reportx aja menghabiskan memori kompt, padahal sblmx tdk. n q cek pada sample report bawaanx tidak ada masalah..kmrn forum sebelah jg ada yg sprt ini n katax suruh edit n copas field2 di reportx tapi g ada efekx juga, aq desainx pake win7 n reportx ar 2.4.0.1279 (ato repotx tidak stabil pd win7 ya om??)

    • July 12, 2011 at 2:54 am | #226

      Enggak kok OS sy juga pake Win 7, coba aktifkan setting “Disable desktop compotition”.
      Caranya :
      1. keluar dari IDE VB 6
      2. Klik kanan shortcut VB 6 -> Properties
      3. Lihat gambar

      • July 22, 2011 at 6:02 am | #227

        sudah saya coba om,,emang lebih cepat om tapi tkadang masih lambat lagi buka report di IDEx n sampe menyedot banyak memori komptr..

  135. afat
    July 14, 2011 at 1:28 pm | #230

    kenapa ya om, ane nyoba bkn setup pek inno setup, pass di compile ada yang error di bagian file dll(pelengkap ocx richtextbox vb) kalo ane apus bagian scrip tuh, bisa di compile om. tapi pas instal gagal, di bagia ini om.

    Source: dll&ocx\stdole2.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib

    regtypelib nya ga mau….. kalo ane plh ignore, pass app dijalanin, ada warning runtime error (6)

    gmana tuh ya om???

    ane pake istool(yg buat buka file setup.lst pd vb), n dilanjutkan dgn compile pke inno setup…

    • July 15, 2011 at 4:21 am | #231

      Kemungkinan besar file stdole2.tlbnya belum ada difolder dll&ocx om

  136. afat
    July 17, 2011 at 7:59 am | #232

    udah bisa om heheh thq… kematin g bsa karna riched32.dll nya unsafe data…..

    jadi g mau dia….
    untuk stdole.tlbnya, itu karna versinya yang berbeda (saya bkn projek di xp, saya coba di win 7… sipaya mau di install, compatibility file setupnya harus di ganti, run as admin dan jalankan sebagai win xp sp3) thq bgt om, bener” brmanfaat banget postingnya heheh…. thq berat deh pokoknya hehehhe

    • July 17, 2011 at 10:15 am | #233

      Sama2x om :)

    • Dadan
      September 17, 2012 at 2:45 pm | #234

      Gan, sebelumnya salam kenal,, terima kasih atas postingannya yg sy rasakan bermanfaat sekali,,,
      sy develop aplikasi dengan vb6 & MS SQL Server,,,, sy sudah berhasil membuat installernya dengan inno setup dan berjalan baik di OS Windows XP,
      tapi ketika saya coba di Windows 7, installernya selalu gagal. hal ini sudah saya coba di beberapa PC yang berbeda.
      Error terjadi pada file stdole2.tlb. dengan flag restartreplace uninsneveruninstall sharedfile
      flag ini saya dapatkan dari hasil convert setup.lst.
      kira2 solusinya gimana ya ??
      Mohon pencerahannya gan,,

      • Dadan
        September 17, 2012 at 2:57 pm | #235

        revisi gan,, setelah baca di site nya inno setup, sy tambahkan script OnlyBelowVersion: 0,6
        error tentang stdole.tlb nya sudah tidak ada tapi setupnya jadi hang terus, dengan tulisan registering file,,,
        mohon pencerahannya gan,,
        terima kasih sebelumnya,,

  137. Hardy
    July 20, 2011 at 10:37 am | #236

    Om K4M4R88 ,, saya mempunyai masalah saat package development wizard saat di klik finish dan mau eksekusi writting setup.lst file yaitu berupa pesan : “Unexpected error numbern 28 has occurred : Out of stack space..”
    Kira2 itu masalahnya dimana yah??
    Terima kasih sebelumnya…:)

    • July 21, 2011 at 5:53 am | #237

      Mungkin masih ada kode program yg error om, buka lagi projectnya trus tekan tombol CTRL+F5

      • Hardy
        July 21, 2011 at 7:01 am | #238

        selalu Om.. saya selalu pake with full compile …
        ga ada error… dan saat di jadikan .exe pun ga masalah… di operasikan juga jalan dengan baik kok om..
        Tapi anehnya kok saat waktu di package development wizard keluar pesan sperti itu..
        Apakah ada pengaruh dari komponen (.ocx) om?
        saya punya komponen CtrlLine.ocx …

        • July 21, 2011 at 7:39 am | #239

          Bisa jadi om coba aja di build tanpa komponen itu :D

  138. slackware
    July 21, 2011 at 2:53 pm | #240

    kalo udah jadi file exe..bisa di balikin lagi ga mas ke vb.net lagii…mau liat source codenya..
    makasih

    • July 21, 2011 at 10:29 pm | #241

      Mungkin langsung aja om coba cari pake keyword “decompiler vb.net”

      • slackware
        July 22, 2011 at 6:52 am | #242

        thanks om..mantabss dah…kalo udah di copyright apa masih bisa di akalin biar codenya keluar semua..

        • July 22, 2011 at 9:18 am | #243

          Itu udah paling mentox om, walaupun udah pake tools decompiler tepat aja kodenya masih mirp2x assembly

  139. Hardy
    July 22, 2011 at 5:17 am | #244

    Admin :
    Bisa jadi om coba aja di build tanpa komponen itu

    okay om saya coba…
    terima kasih banyak pak.DosDunYa[Dosen Dunia Maya] :D
    Karena telah banyak membantu saya dengan secara tidak face to face, selama setahun lebih ini selalu mengunjungi,menyimak,mempraktikan apa yg di share blog anda om…Dan banyak ilmu yg dpt saya terapkan dalam pengembangan program2 saya dari blog om.
    Smoga semakin banyak manusia2 sperti anda om di indonesia …
    Terima kasih seali lagi..Semoga sukses..
    ________________________________________________________________________
    Salam Sukses..

    • July 22, 2011 at 9:20 am | #245

      Sy jadi terharu om :cry:
      Ternyata om salah satu korban keusilan sy di blog ini, sy jadi merasa bersalah :cry:

      Oke om salam sukes juga :)

      • Hardy
        July 24, 2011 at 12:55 pm | #246

        wiwwww… baru liat neh gambar Om admin yg asli… :D

        • July 24, 2011 at 1:28 pm | #247

          Perhatiin trus aja om fotonya, entar lama kelamaan kepalanya bakalan muter ke belakang xixixixi :D

  140. combro
    July 23, 2011 at 2:14 am | #248

    kalo instal di windows seven muncul pesan kesalahan “error accessing registry”, solusinya bagaimana nih admin

    • July 23, 2011 at 2:22 am | #249

      Untuk mengakses registry windows kan butuh login sebagai ADMINISTRATOR
      Jadi waktu nginstallnya om harus login sebagai ADMIN

  141. gian
    July 25, 2011 at 1:16 pm | #250

    bapak klo vb.net + sqlserver . saya mw pindahkan ke komputer lain tanpa menginstall keduanya itu gimana? katanya dibuat paket ntu caranya gimana pa?tolong bantuannya pa?

    • July 26, 2011 at 9:27 am | #251

      Enggak bisa om sql servernya tetap harus diinstall klo cuma 1 komputer, tapi klo kliennya banyak sql servernya cukup diinstall di 1 komputer yg dialokasikan untuk menjadi server.
      Untuk aplikasi yg didistribusikan ke klien2x cukup dot NET framework klo pake XP + aplikasi jadi VB .NETnya biasanya ada difolder bin\Release atau bin\Debug

  142. bernard
    August 6, 2011 at 7:24 am | #252

    Pertanyaan saya adalah, gimana kalau dikomputer yang akan diinstall sudah terdapat mysql

  143. bernard
    August 6, 2011 at 10:29 am | #253

    Maksudnya gini om, kalau di komputer yang akan diinstall sudah mysql gimana caranya. Tapi kita tetap perlu untuk membuat odbc dan database yang tentunya terdapat password yang tidak boleh diketahui client

    • August 6, 2011 at 11:48 am | #254

      Klo cuma untuk mengetahui MySQL udah diinstall atw tidak masih bisa om, kan bisa dicek dari windows service, tp untuk mengetahui passwordnya yg enggak bisa (CMIIW).

      Klo passwordnya lupa aja kita cuma bisa meresetnya kok.

  144. bernard
    August 10, 2011 at 10:53 am | #255

    Nah, scriptnya gimana tuh…..boleh dibantuin nggak?
    Begitu juga untuk mengetahui apakah sudah diinstall myodbc lom…..
    Kalau udah terpasang, mysql, mau create database scriptnya gimana dan buat DSN nya gimana…..

    • August 11, 2011 at 1:45 am | #256

      Semua pertanyaan om sudah ada jawabannya di blog ini om :
      1. Mengecek service windows
      2. Informasi driver ODBC sudah terinstall ada registry berikut :

      HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI
      

      Om bisa manfaatkan fungsi API RegOpenKey, RegQueryStringValue dan RegCloseKey
      3. Create skrip database
      4. Buat DSN juga sudah yg nanya diatas

      Ketauan deh klo om belum baca komen2x diatas

  145. August 11, 2011 at 11:46 am | #257

    Ane emang nggak baca semuanya……..he3x. Installer sich ane udah berhasil buat. Cuma kemudian terpikir gimana kalau komputer yang akan kita install sudah ada mysql dan odbc driver untuk mysql. Nah, kalau di komputer yg akan diinstall sudah ada mysql dan driver mysqlodbc, scriptnya jadi gimana? Kan yang perlu dilakukan adalah membuat user dan password untuk database aplikasi kita, kemudian membuat database, dan DSN……nah itu yang ane gak bisa……
    Sorry pertanyaannya ngulang2, soalnya belum ngarti……maklum masih newbie

    • August 12, 2011 at 1:15 am | #258

      Karena belum mengerti makanya dicoba om, referensi yg sy berikan sudah lengkap dan status newbie bukan alasan untuk malas mencoba.

      Setelah mencoba masih ada masalah baru bertanya.

  146. aulia
    August 12, 2011 at 3:41 am | #259

    mas kalo mau backup & Restore databse Mysql pake coding vb6 gmn???

  147. akum
    August 16, 2011 at 2:43 am | #261

    Om, langkah ini bisa diterapkan juga di windows 7 gak Om

  148. August 18, 2011 at 4:03 am | #263

    Sorry mas Admin, tanya lagi dikit. Ane udah baca semuanya, tapi kog kayaknya lom ada yang pas dengan pertanyaan Ane.
    Sekarang Ane pengen tanya lagi, masih penasaran.
    1. Di komputer yang mau diinstall sudah ada mysql dan odbc, tapi tentunya kita gak tau dia installnya di folder mana (gak jelas gitu, tapi udah ada)
    Pertanyaannya :
    Gimana kita membuat script installer kita yang langsung bisa menggunakan mysql dan odbc yang sudah ada untuk membuat database dan dsn.
    Thanks!

    • August 18, 2011 at 6:08 am | #264

      Oke deh om sy nyerah, coba tambahkan kode berikut di section code

      [Code]
      const
        MaxMySQLODBCVersions = 2;
        MySQLService = 'MySQL';
        
      function IsMySQLExist: Boolean;
      begin
        // cek daftar service yg terinstall ada di
        // HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services
      
        Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SYSTEM\CurrentControlSet\services\' + MySQLService);
      end;
      
      function IsMySQLODBCExist: Boolean;
      var
        I: Integer;
        MySQLODBCVersions: array[1..2] of string;
      begin
        // MySQL ODBC 3.51 Driver
        // MySQL ODBC 5.1 Driver
        
        MySQLODBCVersions[1] := '3.51';
        MySQLODBCVersions[2] := '5.1';
        
        Result := False;
        for I := 1 to MaxMySQLODBCVersions do
        begin
          // cek daftar odbc yg terinstall ada di
          // HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI
              
          Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\ODBC\ODBCINST.INI\MySQL ODBC ' + MySQLODBCVersions[I] + ' Driver');
          if Result then
            Break;
        end;
      end;
      
      function GetMySQLDir: String;
      var
        MySQLDir : string;
        pos1 : integer;
      begin
        RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SYSTEM\CurrentControlSet\services\MySQL', 'ImagePath', MySQLDir);
      
        pos1 := Pos('\bin\mysqld', MySQLDir);
        Result := Copy(MySQLDir, 2, pos1 - 2);
      end;
      

      Untuk fungsi IsMySQLExist dan IsMySQLODBCExist bisa langsung digunakan di section [Files] dan [Run]. Contoh :

      [Files]
      ; daftar file MySQL
      ; tambahan flag Check: not IsMySQLExist
      Source: mysql-5.1.36-win32\bin\*; DestDir: {app}\mysql\bin; Flags: ignoreversion; Check: not IsMySQLExist; Tasks: installmysql
      ; TODO : daftar file mysql lainnya
      
      ; daftar file MySQL ODBC 5.1
      ; tambahan flag Check: not IsMySQLODBCExist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.dll"; DestDir: {sys}; Flags: onlyifdoesntexist; Check: not IsMySQLODBCExist
      ; TODO : daftar file MySQL ODBC lainnya
      
      [Run]
      ;install service MySQL
      Filename: "{app}\mysql\bin\mysqld.exe"; Parameters: "install ""MySQL"""; StatusMsg: "Sedang menginstall service MySQL ..."; Flags: runhidden; Check: not IsMySQLExist; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
      
      ;jalankan service MySQL
      Filename: {sys}\net.exe; Parameters: "start ""MySQL"""; StatusMsg: "Sedang menjalankan service MySQL ..."; Flags: runhidden; Check: not IsMySQLExist; MinVersion: 0.0,4.0.1381; Tasks: installmysql
      

      Untuk contoh penggunaan fungsi GetMySQLDir seperti berikut :

      function InitializeSetup(): Boolean;
      var
        installDir : string;
      begin
        installDir := GetMySQLDir; // contoh pemanggilan fungsi GetMySQLDir
        MsgBox(installDir, mbInformation, MB_OK);
              	
        Result := False;
      end;
      

      Untuk membuat DSN bisa memanfaatkan file myodbc-installer.exe, cara penggunaan sudah ada yg nanya diatas (jawaban komentar #1)

      Selamat mencoba :)

  149. August 23, 2011 at 1:11 am | #265

    Thanks berat bung Admin……..ini baru kena kepermasalahan ane……maklum baru belajar jalan, kalau gak dibimbing ntar jatuh ………

    • August 23, 2011 at 1:45 am | #266

      Oke om mudah2xan udah bisa jalan sendiri :D

  150. aku
    August 26, 2011 at 4:20 am | #267

    Om, kalau pas installasi ingin menambahkan alamat server (MySql di pc lain), user(root) dan passwrd db, bisa gak Om. Jadi nantinya pembuatan ODCB berdasarkan data inputan tersebut…
    terima kasih

    • August 29, 2011 at 8:26 am | #268

      Menambahkan input pada saat instalasi sudah saya bahas disini om.

  151. topsy
    August 26, 2011 at 8:16 pm | #269

    bos, kalo compilenya pake pdw gimana, ya? database mysql kan ada difolder lain : xampp/mysql/data/cobadb

    • August 29, 2011 at 8:28 am | #270

      Klo untuk PDW memang agak susah om, karena keterbatasan dari fitur PDWnya sendiri.

  152. ipank
    September 17, 2011 at 7:46 am | #271

    Sebelumnya salam kenal Pak Admin,

    gini Pak Admin saya udah coba memahami sript inno d atas ada beberapa baris yg udh saya pahami tp masih lebih banyak jg baris yg belum saya mengerti, Pak Admin saya gak ngerti mulai bagian ini :

    [Languages]
    Name: ina; MessagesFile: compiler:Indonesia.isl
    Name: en; MessagesFile: compiler:Default.isl

    [Tasks]
    Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
    Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
    Name: installmysql; Description: “Install MySQL”; GroupDescription: “Proses tambahan:”; Flags: checkedonce

    [Files]
    ;Visual Basic Runtime
    Source: dll&ocx\VB6STKIT.DLL; DestDir: {sys}; Flags: uninsneveruninstall onlyifdoesntexist
    Source: dll&ocx\COMCAT.DLL; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\stdole2.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib
    Source: dll&ocx\asycfilt.dll; DestDir: {sys}; Flags: uninsneveruninstall onlyifdoesntexist
    Source: dll&ocx\olepro32.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\oleaut32.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\msvbvm60.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist

    ;daftar file MySQL
    Source: mysql-5.1.36-win32\bin\*; DestDir: {app}\mysql\bin; Flags: ignoreversion; Tasks: installmysql
    Source: mysql-5.1.36-win32\Docs\*; DestDir: {app}\mysql\Docs; Flags: ignoreversion; Tasks: installmysql
    Source: mysql-5.1.36-win32\lib\*; DestDir: {app}\mysql\lib; Flags: ignoreversion recursesubdirs; Tasks: installmysql
    Source: mysql-5.1.36-win32\share\*; DestDir: {app}\mysql\share; Flags: ignoreversion recursesubdirs; Tasks: installmysql
    Source: mysql-5.1.36-win32\data\*; DestDir: {app}\mysql\data; Flags: ignoreversion recursesubdirs uninsneveruninstall; Tasks: installmysql
    Source: mysql-5.1.36-win32\*; DestDir: {app}\mysql; Flags: ignoreversion; Tasks: installmysql

    ;daftar file MySQL ODBC 5.1
    Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.dll”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.lib”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.lib”; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: “C:\Program Files\MySQL\Connector ODBC 5.1\myodbc-installer.exe”; DestDir: {sys}; Flags: onlyifdoesntexist

    ;My Application Runtime
    Source: main\Albasi.exe.manifest; DestDir: {app}; Flags: ignoreversion
    Source: main\Albasi.exe; DestDir: {app}; Flags: ignoreversion
    Source: main\albasi.sql; DestDir: {app}\mysql\bin; Flags: ignoreversion
    Source: main\exec.cmd; DestDir: {app}\mysql\bin; Flags: ignoreversion

    Source: dll&ocx\MSMASK32.OCX; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\cTreeOpt6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\Comdlg32.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\vbalDTab6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\MSCOMCT2.OCX; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\MyTextBox.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\LVbuttons.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\vbalExpBar6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\MSCOMCTL.OCX; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\vbalIml6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\cPopMenu6.ocx; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\cNewMenu6.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\scrrun.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\vbalMDITabs6.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
    Source: dll&ocx\SSubTmr6.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist

    Source: dll&ocx\msado21.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib

    karena saya meke vb.net 2008 saya jd bingung file sumber mana saja yg harus saya masukkan n gimana cara nulis scriptnya yg benar, mohon bantuannya Pad Admin ? , sekalian mau tanya exec.cmd itu apa n bagaimana ?

  153. ipank
    September 20, 2011 at 9:06 pm | #273

    ok, makasih Pak Admin

  154. September 22, 2011 at 1:17 am | #275

    Mas admin untk paket instalasi foldernya mas ad isinya folder dll&ocx isinya ap dan dari mana ngmbilnya, trus folder main isinya ap dan mysql-5.1.36-win32 apkh folder database mysql setup nya ,gimana jika saya make yg mysql 1.3 apkh sama.. trmakash

    • September 22, 2011 at 3:21 am | #276

      Folder dll&ocx isinya adalah semua file pendukung aplikasi misal file2x *.dll, *.ocx, *.tlb.
      Untuk mendapatkannya bisa dengan memanfaatkan tool Package & Deployment Wizard

      Untuk folder main biasanya sy isi file exe program, file manifest untuk memanfaatkan style xp

      Klo folder mysql-5.1.36-win32 itu file sumber mysqlnya, kan distribusi mysqlnya ada 2 :
      1. format binary biasanya dalam bentuk file setup
      2. format archive biasanya dalam bentuk winzip

      Klo format binarykan kita sudah jelaskan enggak ngapa2xin terima bersih hasil instalasinya sedangkan dg format achive kita tentuin sendiri pada saat instalasi ngapain aja.

      Makanya postingan sy diatas dicoba dulu, biar ada gambaran

  155. ipank
    September 23, 2011 at 4:24 am | #277

    Pak Admin saya udah coba tutorial yg ada d ebook inno setup yg kemarin d kasih sm Pak Admin udh saya ikuti langkah2 nya dengan seksama program saya udh berhsl d packing jg udh bisa d install d lepi saya dg baik, tp selalu saja ada yg aneh sy udh smpt baca postingan ada sebelumnya ttg mslh yg mirip kaya gini maaf jika saya tanyakan lg jujur saya memang belum sepenuhnya mudeng, kasusnya adalah program saya gak bisa d install d lepi yg lain udah saya coba d 3 lepi hasilnya nihil secara garis besar pesan yg muncul adl memberitahu bahwa shortcut / *.exe nya gak bisa jalan kira2 kenapa y apanya yg msh kurang betul, oia satu lagi kayaknya perntanyaan ini jg prnh saya baca d postingan lain tp saya jg masih belum mudeng klo MySql nya gak jalan program saya gak bisa jalan jg biar program saya bisa jalan d lepi lain tanpa harus repot2 nginstal MySql dulu gimana y caranya yg benar Pak Admin, mohon petunjuk maaf jika saya menanyakan hal yg sepertinya pernah d tanyakan, saya memang agak lambat klo mikir jd mohon maaf jk ketidak mudengan saya nambah panjang post comment nya Pak Admin, mohon bantuannya Pak ?

    • September 23, 2011 at 7:03 am | #278

      Untuk mysql tergantung kasusnya om, misalkan program om hanya diinstall di satu komputer otomatis MySqlnya juga harus diinstall, tapi klo dinstall untuk beberapa komputer MySql cukup diinstall di 1 komputer yg akan dijadikan server

      • ipank
        September 24, 2011 at 7:08 am | #279

        program q cuma buat 1 komuter

        • September 24, 2011 at 9:13 am | #280

          Ya udah berarti mysqlnya juga harus diinstall

  156. ipank
    September 23, 2011 at 4:28 am | #281

    maaf ada yg salah sedikit dr pertanyaan saya, mksdnya program saya udah bisa d install d lepi lain tp shortcut / *.exe nya gak bisa d jalankan ?

    • September 23, 2011 at 7:05 am | #282

      Nah klo ini sy harus ngeliat skripnya dulu, coba om posting kesini skrip innonya cukup section Files yg memanggil file exenya dan section Icons.

      • ipank
        September 24, 2011 at 7:10 am | #283

        [Files]
        Source: “C:\Documents and Settings\iradenmas_i\My Documents\Visual Studio 2008\Projects\dbpusban1\dbpusban1\bin\Debug\dbpusban1.exe”; DestDir: “{app}”; Flags: ignoreversion
        Source: “C:\Documents and Settings\iradenmas_i\My Documents\Visual Studio 2008\Projects\dbpusban1\dbpusban1\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs createallsubdirs
        Source: “C:\Documents and Settings\iradenmas_i\My Documents\Visual Studio 2008\gbr1\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs createallsubdirs
        Source: “C:\Documents and Settings\iradenmas_i\My Documents\Visual Studio 2008\Projects\dbpusban1\dbpusban1\bin\Debug\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs createallsubdirs
        ; NOTE: Don’t use “Flags: ignoreversion” on any shared system files

        [Icons]
        Name: “{group}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”
        Name: “{group}\{cm:UninstallProgram,{#MyAppName}}”; Filename: “{uninstallexe}”
        Name: “{commondesktop}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”; Tasks: desktopicon

        • September 24, 2011 at 9:13 am | #284

          Sekalian om deklarasi konstanta MyAppName dan MyAppExeName om :D

          • ipank
            September 25, 2011 at 1:31 pm | #285

            yg d mksd ini kn Pak

            #define MyAppName “dbpus”

            #define MyAppExeName “dbpusban1.exe”

            • September 26, 2011 at 4:20 am | #286

              Kayaxnya udah benar om, atw coba lokas folder yg ada disetting iconya sudah sama belum dg lokasi folder instalasi

              • ipank
                September 28, 2011 at 3:57 am | #287

                kayaknya udh Pak, y entar tak teliti lg, mksh Pak Admin

              • ipank
                September 28, 2011 at 4:03 am | #288

                ipank :
                kayaknya udh Pak, y entar tak teliti lg, mksh Pak Admin, oia Pak Admin setelah program q pernah berhasil q jadiin setup.exe kemuian q install d kompi q installasi berjalan dgn baik dan shortcut.exe nya jg bisa jln tp aneh pas q install d kompilain shortcut.exe nya gak jalan selalu muncul pesan error kenapa y ,,,, ?

  157. September 24, 2011 at 12:13 am | #290

    Ok makash mas admin, saya akan coba dulu

  158. September 24, 2011 at 12:58 am | #291

    Maaf mas nany lagi nich, saya coba perintah mysqldump knpa ndak brhsil ya berikut perintah yang saya ketikan “C:\apache\mysql\bin\mysqldump -u root -p aq1010 -routines dbbatam > c:\dbbatam.sql”. saya menggunakan mysql 1.3 nama instalernya phptriad. satu lagi mass untuk paket non instalnya saya winzip sendiri instaler phptriad nya it bisa jadi pket mysql non instal seperti yang mas bilang diatas ya, dan bagaimana nama folder di paket instalasi untk folder databse mysql apkh nama foldernya harus disamakan dengan nama pket non instalnya, seperti folder mas diatas adlh “mysql-5.1.36-win32″. terimakash banyak sebelumnya mass

    • September 24, 2011 at 2:09 am | #292

      Klo undump itu menggukan tanda < lebih kecil om :

      C:\apache\mysql\bin\mysqldump -uroot -paq1010 -routines dbbatam < c:\dbbatam.sql
      

      Untuk "mysql-5.1.36-win32" itukan hanya nama folder om jadi terserah, berarti :

      Source: mysql-5.1.36-win32\bin\*
      

      diganti menjadi :

      Source: C:\apache\mysql\bin\*
      

      yg lain tinggal nyesuain.

  159. September 24, 2011 at 10:13 am | #293

    Ok mass terimakash atas penjelasnya, cuma syntax it saya copy dari contoh yang mass admin kash diatas “kemudian ketikkan perintah: mysqldump -unama_user -ppassword_user –routines nama_database > c:\nama_database.sql”. pass saya coba tapi hasilnya pertama eror trus berhasil cuma filenya 0 kb mass. maaf mass nany ny kebanyakan nich tapi saya haus sekali akan ilmu inie mass kebetulan ketemu orng kaya mass yang ikhlas membantu kesempatan baik bagi saya untk menimba ilmunya.

    o y satu lagi nich mass admin, sebenarnya lebh dari satu sichh, hehe :

    Source: {sys}\msvcr71.dll; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3i.exe; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3.dll; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3.lib; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3S.dll; DestDir: {sys}; Flags: onlyifdoesntexist
    Source: {sys}\myodbc3S.lib; DestDir: {sys}; Flags: onlyifdoesntexist

    kode diatas saya copy pnya mas admin untk odbc 3.51 tapi kenapa pesannya “Source File Doesnt Exist” Ya mass. trms

  160. manv
    October 10, 2011 at 9:13 am | #295

    pak admin.minta tolong…saya pny code vb.net berikut

    Private Sub btn_backup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_backup.Click
    Try
    Dim lokasi As String = Chr(34) & txt_backup.Text & Chr(34)
    Process.Start(“C:\xampp\mysql\bin\mysqldump.exe”, ” –user=root –password= –database dbinv > -r ” & lokasi)
    Catch ex As Exception
    MsgBox(“Tidak dapat melakukan proses backup” _
    & vbCrLf & Err.Description)
    Finally
    loads()
    End Try
    End Sub
    ‘———————proses backup berhasil————–’

    Private Sub btn_restore_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_restore.Click
    Try
    Dim lokasi As String = Chr(34) & txt_restore.Text & Chr(34)
    Process.Start(“C:\xampp\mysql\bin\mysql.exe”, ” –user=root –password= –database dbinv > -w ” & lokasi)
    Catch ex As Exception
    MsgBox(“Tidak dapat melakukan proses restore” _
    & vbCrLf & Err.Description)
    Finally
    loads()
    End Try
    End Sub
    ‘—————–proses restore g bisa—————-’

    ga da pesan error…cuma muncul konsol command(spt melakukan proses) 1 detik lgsg hilang
    error apanya y…terimakasih.

  161. manv
    October 10, 2011 at 9:18 am | #296

    ooppss…ralat bagian proses restore

    Process.Start(“C:\xampp\mysql\bin\mysql.exe”, ” –user=root –password= –database dbinv < ” & lokasi)

    (–.)a

    • October 10, 2011 at 11:20 am | #297

      Coba buat dulu database test, misal dg nama dbtest trus untuk revisi kodenya seperti ini :

      • manv
        October 10, 2011 at 12:47 pm | #298

        revisi kodenya gmna Pak..gak keliatan.??

        (O,O)

        • October 11, 2011 at 6:10 am | #299

          Ini om :

          'karna password om kosong jadi parameter passwordnya diabaikan
          Process.Start("C:\xampp\mysql\bin\mysql.exe", " –user=root –database dbinv < " & lokasi)
          
  162. October 14, 2011 at 4:37 pm | #300

    pak admin, kok pada saat compile ada pesan {unrecognized parametername “DestDir”} <—itu kenapa pak, saya bingung

    • October 15, 2011 at 1:40 am | #301

      Coba copas kesini baris skrip yg error om

  163. October 15, 2011 at 3:28 am | #302

    sangat bermanfaat sekali …
    trimakasih sare nya ..

  164. seno
    October 26, 2011 at 3:30 pm | #304

    Kakak.mau tanya.q buat prog pake vb.net 2008 dan xampp 1.7.3
    sudah dipaketkan pake inno. error bagian reportnya.
    muncul pesan error:

    See the end of this message for details on invoking
    just-in-time (JIT) debugging instead of this dialog box.

    ************** Exception Text **************
    System.IO.FileNotFoundException: Could not load file or assembly ‘CrystalDecisions.CrystalReports.Engine, Version=10.5.3700.0, Culture=neutral, PublicKeyToken=692fbea5521e1304′ or one of its dependencies. The system cannot find the file specified.
    File name: ‘CrystalDecisions.CrystalReports.Engine, Version=10.5.3700.0, Culture=neutral, PublicKeyToken=692fbea5521e1304′

    WRN: Assembly binding logging is turned OFF.
    To enable assembly bind failure logging, set the registry value [HKLM\Software\Microsoft\Fusion!EnableLog] (DWORD) to 1.
    Note: There is some performance penalty associated with assembly bind failure logging.
    To turn this feature off, remove the registry value [HKLM\Software\Microsoft\Fusion!EnableLog].

    • October 28, 2011 at 2:49 am | #305

      Kayaxnya kurang library CrystallReportnya om

  165. kvee
    November 4, 2011 at 1:33 am | #306

    mas bisa kasih tutorial bikin setup inno untuk database acces g??sekalian kan klo pake inno file .dll am file .tlb gak keregister tuh, gmn caranya biar otomatis register pake inno…

    mohon pencerahan

    • kvee
      November 4, 2011 at 1:35 am | #307

      saya biasa manual register pake notepad abis saya bener2 baru belajar VB bikin file setup pake P&D bawaan vb masih gak mudeng klo soal register2 file sering error T_T

    • November 4, 2011 at 5:58 am | #308

      Klo file access diperlakukan seperti file biasa om :

      Source: "LOKASI_FILE_ACCESS\FILE_ACCESS.MDB"; DestDir: {app}\Db; Flags: onlyifdoesntexist
      

      Untuk meregistrasikan file .dll dan .tlb sama seperti contoh artikel diatas

      Source: NAMA_FILE_DLL.dll; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regserver onlyifdoesntexist
      Source: NAMA_FILE_TLB.tlb; DestDir: {sys}; Flags: uninsneveruninstall sharedfile regtypelib
      
      • kvee
        November 4, 2011 at 3:00 pm | #309

        nanti file ocx,dll,tlb lgsung terkopi dan teregister tuh pak??saya coba dlu y makasih byk tutornya…

  166. Roofie
    November 9, 2011 at 6:25 am | #311

    mas ane dah baca and dah coba sourcenya, nah pertanyaan ane gimana caranya pada saat uninstall aplikasi langsung membackup databasenya…. dan diletakkan dalam folder tertentu…

    • November 9, 2011 at 6:51 am | #312

      Coba ditambahkan disection UninstallRun om.

      [UninstallRun]
      {app}\mysql\bin\mysqldump -uUSER_NAME -pUSER_PASSWORD --routines NAMA_DATABASE > C:\NAMA_FILE_BACKUP.SQL
      

      Untuk lokasi folder “mysql\bin” menyesuaikan.

  167. noshade
    November 15, 2011 at 5:48 am | #313

    panjang bener ini artikel….emang maknyus sih adminnya :D
    makasi ya om admin… :D
    maaf kalo ane jadi silent rider disini,,,abis enak sih baca2 n langsung di copas, coba dirumah, modif lagi :D

    • November 15, 2011 at 12:48 pm | #314

      Enggak pa2x om memang seharusnya gitu, yg namanya belajar enggak jauh2x dari melihat, nyontek dan mencoba :D

  168. November 21, 2011 at 3:25 am | #315

    salam kenal mas…
    saya mau nanya gimana cara bikin folder didalam inno setup,,
    saya pengen database yg saya bikin tersimpan nya di di drive d ex: D:\ my program
    jadi saat instal aplikasi bikin folder nya otomatis dan database nya di copy kan ke d:\my program
    saya mengunakan db acces
    mohon pencerahan nya mas
    trims

    • November 21, 2011 at 4:11 am | #316

      Tinggal set aja om direktori target di secton File

      [Files]
      Source: file_database.mdb; DestDir: "d:\my program\file_database.mdb"; Flags: onlyifdoesntexist
      
  169. November 22, 2011 at 12:46 am | #318

    oke
    sama2x om

  170. November 24, 2011 at 6:41 am | #319

    ok mas udah bisa tq

  171. November 26, 2011 at 8:49 am | #321

    salam kenal kak, saya mohon bantuannya, program saya kan saya buat dengan database acces dan Crystal report, buwat paket instalasinya pakek innosetup gimana ya kak..? dah berkali-kali saya coba gagal terus. maklum kak saya blm bisa buat aplikasi pakek MySQL jadi baru pakek acces, saya mohon dengan sangat bantuannya kak…!

  172. November 26, 2011 at 10:50 am | #322

    Cara yg paling gampang seperti ini aja om

    1. Jalankan dulu tools Package & Deployment Wizard, setelah selesai cek folder penyimpanan hasil proses “Package & Deployment Wizard” didalamnya biasanya sudah ada folder Support.
    Folder support berisi semua file yg harus didistribusikan pada saat instalasi, salah satu file penting yg ada difolder ini adalah file Setup.lst, file ini berisi informasi kemana saja file2x tersebut harus dicopykan selain itu file setup.lst akan kita butuhkan pada langkah ke dua

    2. Selanjutnya download program ISTool, dari aplikasi ini kemudian buka file setup.lst setelah itu skrip inno setup otomatis digenerate berdasarkan informasi yg ada di file setup.lst

    3. Terakhir tinggal lengkapi skrip inno yg dihasilkan ISTool dg mempelajari skrip inno diatas.

    Selamat mencoba :)

    • November 27, 2011 at 4:21 am | #323

      terimakasih kak.. saya akan coba dulu..!

  173. November 28, 2011 at 9:11 pm | #324

    mas kalau pakek SQL server 2000 ada gak caranya..?

    • November 29, 2011 at 8:56 am | #325

      Yg jelas bisa om, cuma sy belum sempat coba :D

  174. November 29, 2011 at 2:59 pm | #326

    sip infonya.. soalnya lagi nyari buat mysql…

    • November 29, 2011 at 5:31 pm | #327

      Oke om, sip juga udah mampir kesini :)

  175. December 3, 2011 at 1:51 pm | #328

    Bos, kalo mo daftar odbc pake ipaddres lewat form input gimana? jadi ipaddressnya ga perlu dihardcode. biar user nentuin sendiri ipnya.
    Terima kasih banyak smua infonya.

    • December 3, 2011 at 3:01 pm | #329

      Coba kesini om untuk menambahkan input pada saat instalasi.

  176. December 3, 2011 at 3:33 pm | #330

    udah bos. tapi itu kan buwat koneksi database client ke server. saya perlu setting odbc lewat form input di inno buwt koneksi crystal report. biar crystal report bisa akses database di server. yg saya tahu cuma lewat settingan odbc. saya dah coba yg ini:
    Filename: “{sys}\myodbc-installer.exe”; Parameters: “-s -a -c1 -n “”abis”” -t

    “”DRIVER=MySQL ODBC 5.1 Driver;SERVER=192.168.1.5;DATABASE=mydata;UID=123;PWD=”””; StatusMsg: “Tunggu sedang membuat DSN-mydata”; Flags: runhidden; Tasks:Client

    nah. gimana caranya supaya SERVER=192.168.1.5 bisa diambil dari hasil form input. karena klo IP server user beda berati harus setting odbc.

    terima kasih banyak bos.

    • December 3, 2011 at 4:34 pm | #331

      Coba seperti ini om, tapi belum sy coba :D

      [Run]
      ;ip address server didapat dg memanggil fungsi GetIPServer
      Filename: "{sys}\myodbc-installer.exe"; Parameters: "-s -a -c1 -n ""abis"" -t ""DRIVER=MySQL ODBC 5.1 Driver;SERVER={code:GetIPServer};DATABASE=mydata;UID=123;PWD="""; StatusMsg: "Tunggu sedang membuat DSN-mydata"; Flags: runhidden; Tasks:Client
      
      [Code]
      var
         INIInputPage: TInputQueryWizardPage;
        
      procedure InitializeWizard();
      begin
        // Input setting
        INIInputPage := CreateInputQueryPage(wpInfoAfter, 'Konfigurasi', 'Konfigurasi Program',
                                             'Isikan konfigurasi program ke dalam form di bawah ini.');
      
        INIInputPage.Add('IP Address Server', False);
        INIInputPage.Values[0] := GetPreviousData('IPServer', '');
      end;
      
      procedure RegisterPreviousData(PreviousDataKey: Integer);
      begin
        SetPreviousData(PreviousDataKey, 'IPServer', INIInputPage.Values[0]);
      end;
      
      function NextButtonClick(CurPageID: Integer): Boolean;
      begin
        Result := True;
        if CurPageID = INIInputPage.ID then begin
          if (Trim(INIInputPage.Values[0]) = '') then begin
             MsgBox('Anda harus mengisikan data secara lengkap!', mbError, MB_OK);
             Result := False;
      
          end else begin
            // simpan ip yg diinputkan di registry
            // biar bisa dibaca oleh fungsi GetIPServer
            RegWriteStringValue(HKEY_CURRENT_USER, 'Software\MyApp\ODBC', 'IPServer', INIInputPage.Values[0]);
          end;
        end;
      end;
      
      function GetIPServer(Param : string): string;
      var
        IPServer : string;
      begin
        RegQueryStringValue(HKEY_CURRENT_USER, 'Software\MyApp\ODBC', 'IPServer', IPServer);
        Result := IPServer;
      end;
      
  177. topsy
    December 4, 2011 at 9:03 pm | #332

    dicoba dulu, bos.

  178. Roofie
    December 7, 2011 at 6:25 pm | #334

    maaf gan mo tanya lagi…
    ane dah coba scriptnya cuma ane bingung nih ane kan pake vb2010 and untuk xp sp2 butuh pendukung seperti WIC, MSI31 and NETFRAMEWORK4 nah gimana cara mengeksekusi aplikasi tersebut dan kalo instal MSI31.exe kan perlu restart gimana caranya biar gak restart tapi langsung masuk ke instal NETFRAMEWORK4 nya ane dah coba pake yang seperti ini :

    [Files]
    Source: D:\Project\Aplication\RDSKMHT\RDSKMHT\stp\Inno\wic_x86_enu.exe; DestDir: “{tmp}”
    Source: D:\Project\Aplication\RDSKMHT\RDSKMHT\stp\Inno\WindowsInstaller-KB893803-v2-x86.exe; DestDir: “{tmp}”
    Source: D:\Project\Aplication\RDSKMHT\RDSKMHT\stp\Inno\dotNetFx40_Full_x86_x64.exe; DestDir: “{tmp}”

    [Run]
    Filename: “exeexec.exe”; Parameters: “/i “”{tmp}\wic_x86_enu.exe”””
    Filename: “exeexec.exe”; Parameters: “/i “”{tmp}\WindowsInstaller-KB893803-v2-x86.exe”””
    Filename: “exeexec.exe”; Parameters: “/i “”{tmp}\dotNetFx40_Full_x86_x64.exe”””

    mohon petunjuknya gan……

  179. December 19, 2011 at 12:34 pm | #336

    mas admin saya mau tanya ,,
    waktu saya disitribusikan aplikasi ke klien keluar pesan error seperti ini mas “run time error 430 Class does not support automation or does not support expected interface.”
    Ini kesalahannya dimana ya mas,,
    mohon bantuannya

    • December 19, 2011 at 12:43 pm | #337

      Sy pernah ngalamin kasus seperti ini ketika sy mengcompile aplikasi menggunakan OS Win 7+SP 1 dan target kliennya Win XP klo memang kasusnya sama, solusi yg bisa om coba :
      1. Pake library ADO versi yg lebih baru misal 2.8
      2. Uninstall SP 1 Win 7nya (ini solusi yg sy pilih :D)

      Jangan lupa compile ulang projectnya

      • December 19, 2011 at 5:19 pm | #338

        mas ado link untuk dapat kan ado terbaru ngak??? hehehehe
        klu w7 SP lainnya ngak ada masalah kan mas..
        klu sekarang mas make W7 yang mana??

        • December 19, 2011 at 6:38 pm | #339

          Sy sendiri belum pernah update ADO, untuk ADO versi 2.8 bukannya udah include waktu instalasi ?

          Klo sy pake Win 7 Pro

  180. December 19, 2011 at 4:19 pm | #340

    THANK’S buanget neh buat admin ….sangat membantu, memang agak ribet tapi hasilnya memuaskan …..! :)

    Mau nanya neh tuk mas admin ya, gmna driver crstal report 8.5 ya bisa satu paket dalam instalan biar gak instal-instal cr 85 ya lagi …..?

    • December 19, 2011 at 6:45 pm | #341

      Coba ikuti langkah-langkah komentar #319 diatas om

      • December 21, 2011 at 5:43 pm | #342

        Ya mas admin, thak’s buanget …..berhasil akhirnya …..semoga mas admin makin berkah ilmu ya …thk’s buanget ya mas admin …..!

  181. December 20, 2011 at 6:28 pm | #343

    setup nya uda dibikin, trus pas di install keluar error seperti ini http://i41.tinypic.com/1eo22h.jpg
    kira2 salah disebelah mananya ya?

    • December 21, 2011 at 5:45 pm | #344

      Sama kyk punya saya tuh gan, ikutin langkah #319 aja ….berhasil kok, sya udh coba

  182. December 29, 2011 at 10:23 pm | #345

    Mas admin, report program sya kan menggunakan chart, waktu programnya di setup chart ya gak keluar, kira-kira apanya mas admin …?

    • December 30, 2011 at 12:52 pm | #346

      Lah si om, sedikit2x nyalahin package instalasinya :D
      Coba dicek lagi chartnya itu menggunakan komponen apa? Trus udah ikut terdistribusikan enggak waktu instalasi.

      • January 1, 2012 at 9:50 pm | #347

        Y mas komponen ya gak ikut, mangkanya dia gak tampil, sory ya mas soalnya masih awal-awal belajar program …..
        Mas ada contoh sorcode backup dan restore database mysql gak ..?

  183. February 12, 2012 at 2:13 pm | #349

    kalau pake crystal 9 gmna caranya??? kirim ke email ya yannaelshofa@gmail.com

    • February 13, 2012 at 9:13 am | #350

      Kayaxnya udah banyak deh yg nanya tentang menambahkan library crystall report, coba dicek lagi komentar2x diatas

  184. February 16, 2012 at 9:34 am | #351

    Salam kenal semuanya, mau gabung nie mas.
    mas sya punya masalah dengan pembuatan setup VB.NET 2010 dan SQLServer 2008. sya menggunakan inno setup. yang jadi masalah setup saya gk bisa di pake di kmputer lain, kendalanya masalah koneksi or databasenya. Mas saya mhon bngit minta penjelasannya step by step langkah-langkahnya soalnya saya udah mentok nie. Low ada tutorialnya jg blh. mhn bgt mas pencerahannya… bgt bgt nie
    maklum mas sya msh bljr. trmksh sblmnya.

  185. February 16, 2012 at 3:56 pm | #352

    Emg om nulis string koneksinya seperti apa ?

    • February 19, 2012 at 9:16 am | #353

      gini mas, nie di modul :
      Public Sub Koneksi()
      str = “Data Source=TONI-PC;Initial Catalog=dbpoto;Integrated Security=True”
      Conn = New SqlConnection(str)
      If Conn.State = ConnectionState.Closed Then
      Conn.Open()
      End If
      End Sub

  186. February 19, 2012 at 10:55 am | #354

    Klo string koneksi yg om pake, hanya berlaku untuk komputer lokal, klo mau diakses dari komputer lain, pake koneksi yg ini om (ada ketambahan user name dan password).

    Data Source=TONI-PC;Initial Catalog=dbpoto;User Id=USER_SQL_SERVER;Password=PASSWORD_SQL_SERVER;
    

    Trus klo sudah bisa konek untuk nilai Data Source sebaiknya disimpan di file konfigurasi (app.config), jadi klo servernya diganti enggak harus compile ulang cukup mengganti nilai yg ada di file app.confignya.

    Untuk cara membuat, menulis dan membaca file app.config, silahkan digoogling soalnya sudah banyak pembahasan tentang masalah ini.

  187. omen
    February 27, 2012 at 10:21 pm | #355

    salam Kenal om,.,.,

    saya baru belajar bikin sistem informasi memakai vb 6 dan crystal report,,,

    saya mau menayakan, bagai mana aplikasi yang sudah siap itu bisa di pasang di beberapa komputer tanpa ada vb 6 dan crystal report di komputer tersebut,.,.??
    Ctt: saya memakai database mysql…

    Mohon bantuan nya om,.,.
    makasih sebelum nya om,.,..,

    • February 28, 2012 at 6:07 am | #356

      D’oh pertanyaan yg sama terulang kembali :(

      Males om ya baca2x komentar2x diatas, padahal klo mau meluangkan waktu akan ada banyak informasi tambahan yg om bisa dapatkan, coba dicek om komentar #319 diatas

  188. omen
    March 1, 2012 at 10:20 pm | #357

    maaf om nanya lagi,.,.
    cara Melakukan Package & Deployment Wizard yang benar gemana ya om…..

    sudah saya Coba, tapi saya mendapatkan erorr sewaktu pembuatan nama scrip nya,.,.
    trus,, saya tekan aja ok.. trus muncul kotak dialog yang tulisan nya writing setup ist file…
    tapi kok prosesnya lama ya om,.,.,??

    mohon penjelasan nya om,.,.

    makasih om,.,.

    • March 2, 2012 at 8:32 am | #358

      Project om coba di compile dulu (menu File -> Make nama project.exe)
      Klo berhasil seharusnya tidak ada masalah pada saat menjalankan Package & Deployment Wizard

  189. ahmad7802
    March 9, 2012 at 9:35 pm | #359

    Om Klo report dg crystal report 8.5 gimana ???

  190. ahmad7802
    March 9, 2012 at 10:01 pm | #360

    Sorry om kelawat baca nya buat cr 8.5

  191. ahmad7802
    March 10, 2012 at 8:44 pm | #362

    jgn di close dulu om , kan masih mau belajar … ntar klo ada yg kurang ngeh bisa ditanya lagi kan *smile*

  192. alex omie
    March 16, 2012 at 7:34 pm | #364

    Mas..
    Klo untuk connector .Net gmana cara menyertakannya dalam file setup.exe kita nantinya..
    Kan itu yg pake ODBC..
    Tpi aplikasi saya pake .Net Connector
    Gmana caranya supaya langsung terinstal ketika setup.exe berjalan seperti ODBC itu.. ??
    Makasih.. :D

    • March 17, 2012 at 8:31 am | #365

      Tinggal distribusikan aja om file MySql.Data.dll, satu folder dg file exenya

      • alex omie
        March 21, 2012 at 2:47 pm | #366

        Tutorial diatas untuk membuat MySql yang tidak dipassword..
        Trus gimana caranya, supaya MySql-nya jadi ber-password..??
        Passwordnya kita yang tentukan, bukan si user…
        Mohon Bantuannya Mas.. :)

        • March 22, 2012 at 10:54 am | #367

          Kan sudah ada om sample skripnya diatas untuk mengganti password default root, coba dicek lagi

  193. alex omie
    March 21, 2012 at 2:15 pm | #368

    Gak perlu di letakkan di System32 ya Mas..??

    • March 22, 2012 at 10:46 am | #369

      Enggak perlu om, langsung ditempatkan aja di satu folder dg aplikasi aja dan tidak perlu diregister

  194. March 31, 2012 at 11:45 pm | #370

    saat jalanin file exec.cmd kok error ya? gimana tuh solusinya

    • April 2, 2012 at 12:44 pm | #371

      Enggak tau tuh om, kan error itu ada banyak, yg mana satu ya ???

  195. Rifki
    April 3, 2012 at 10:31 am | #372

    Informasinya bermanfaat bgt. :) Tapi mas, untuk penggunaan CR 8.5 component dll yg harus di includekan apa saja ya?

    • April 3, 2012 at 11:43 am | #373

      Klo informasinya bermanfaat bacanya itu harus lengkap om, terutama dibagian komentar karna sudah banyak yg menanyakan komponen CR yg harus diincludekan, biar enggak double pertanyaan.

  196. April 15, 2012 at 2:55 pm | #374

    Kalau mau bikin setup agar user bisa langsung setting ip ODBC. caranya gimana mas?

    • April 15, 2012 at 2:58 pm | #375

      Udah ada yg nanya tuh om, coba cek komentar #1 & 2

      • April 19, 2012 at 11:54 am | #376

        ogh iya sori” kurang teliti :D
        oh iya nanya lagi, klo mau bikin shourtcard di start gimana ya?
        jadi di start itu ada shourtcard aplikasi dan manual

        • April 19, 2012 at 5:08 pm | #377

          Udah ada juga om di sample skrip inno setup diatas coba cek di section Icon, jadi klo bisa nanyanya itu setelah mencoba biar enggak nanya sesuatu yg udah ada jawabannya.

  197. JimyAlkana
    April 25, 2012 at 11:19 am | #378

    Gan, mohon bantuan..
    aku pakai xampp dan mysql connector 3.51.,
    aku sudah coba buat, tapi error mulu,
    peringatannya “Data source name not found and no default driver specification.
    itu knapa ya.,
    tlong dibantu ya., thanks

    • April 25, 2012 at 11:41 am | #379

      D’oh kayaxny obrolan diatas om itu udah lengkap banget deh, sy aja sampe bingung mau jawab apa lagi jika ada yg bertanya tentang masalah ini.

  198. ruben
    May 9, 2012 at 12:10 pm | #380

    kalo pake sqllite gimana om?

  199. Amil
    May 16, 2012 at 12:00 pm | #382

    Mas, ketika di saya buka di project VB, lancar2 aja,
    tapi ketika sudah saya exe, dan saya instal di komputer lain, muncul error
    “request returned with SQL_ERROR”

    pesan ini muncul ketika saya coba lihat di DSN, saya klik database muncul error itu, dan list pada database kosong, tidak ada isi.,
    mohon pencerahan mas.,
    thanx

    • May 19, 2012 at 8:45 am | #383

      Coba mana contoh string koneksi yang om pake ?

  200. May 21, 2012 at 4:25 pm | #384

    PA, MAU TANYA INI MYSQL NYA BELOM AUTOMATIC NYALA KETIKA KOMPUTER JALAN PERTAMA KALI YAH? JDNYA KALAU SELESAI DIINTALL MENYALA TP SETELAH KOMPUTER RESTART MYSQL NYA BELUM DIJALANKAN . MOHON PENCERAHAN NYA GIMANA SUPAYA MYSQL NYA JALAN SAAT PERTAMA MENJALANKAN KOMPUTER.TERIMA KASIH

    • June 1, 2012 at 11:36 am | #385

      Tau etika dalam menulis di internet enggak om, apakah itu chating, bertanya di forum/milis/ ???

      Jangan menggunakan huruf besar, penggunaan huruf besar yang tidak pada tempatnya akan diartikan oleh orang lain bahwa kita sedang berteriak dan ngomong keras.

  201. June 1, 2012 at 11:16 am | #386

    Run-time error ’429′:

    ActiveX component can’t create object

    thx,
    (pada Komponen osenxpsuite2006.ocx)

    Mohon bantuannya kak?…
    Terimakasih sebelumnya.

  202. kandrick
    June 2, 2012 at 12:58 am | #394

    Maaf pak, saya buru2 ketik ga sadar capslock nya nyala, karena terlalu bersemangat :D. Gimana pak supaya mysql nya selalu start ketika komputer dinyalakan? Makasi sebelum nya

    • June 2, 2012 at 9:13 am | #395

      Oke om permintaan maaf diterima :)

      Mungkin belum dijadiin service kali om, coba masuk dulu ke command prompt trus ketik perintah berikut :

      sc query mysql
      

      klo sudah jadi service biasanya output lebih kurang seperti berikut :

      C:\Users\Roedhi>sc query mysql
      
      SERVICE_NAME: mysql
              TYPE               : 10  WIN32_OWN_PROCESS
              STATE              : 4  RUNNING
                                      (STOPPABLE, PAUSABLE, ACCEPTS_SHUTDOWN)
              WIN32_EXIT_CODE    : 0  (0x0)
              SERVICE_EXIT_CODE  : 0  (0x0)
              CHECKPOINT         : 0x0
              WAIT_HINT          : 0x0
      
      C:\Users\Roedhi>
      

      Untuk menjadikan mysql sebagai service ketik perintah berikut :

      mysqld install MySQL
      

      Perintah diatas diketikkan di folder mysql\bin

      kemudian dilanjutkan dengan perintah :

      net.exe start MySQL
      

      Selamat mencoba :)

  203. June 3, 2012 at 1:15 am | #396

    salam kenal,,
    ane lagi latihan compile pake inno setup
    cuma kok setelah selesay terus ane instal
    MSADODC.OCX nya vailed kenape ya bang..

    “Component ‘MSADODC.OCX’ or one of its dependencies not correctly registred:a file is missing or vailed”

    • June 3, 2012 at 9:55 am | #397

      Coba paste kesini skrip innonya, khusus section Files

  204. June 3, 2012 at 2:28 pm | #398

    pa hehe.., maaf nanya lg saya pengen menjadikan mysql sebagai start up program di inno set up nya, kalau saya liat cara menjalankan mysql d inno set up seperti ini

    Filename: {sys}\net.exe; Parameters: “start “”MySQL”””; StatusMsg: “Sedang menjalankan service MySQL …”; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0.0,4.0.1381; Tasks: installmysql

    kalau saya ingin menjadikan mysql sebagai start up program, saya harus mendaftarkan di registry

    Root: HKLM; Subkey: “SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\Run”; ValueName: “MYSQL”; ValueType: String; ValueData: {sys}\net.exe; Flags: uninsdeletevalue;Check: not IsMySQLExist; Tasks: installmysql

    saya bisa menjalankan net.exe nya melalui registry tapi parameter “start Mysql” nya belum ada, bagaimana caranya supaya mysql bisa terdaftar di registry sebagai startup program?

    bila dengan ini

    Filename: {sys}\net.exe; Parameters: “start “”MySQL”””; StatusMsg: “Sedang menjalankan service MySQL …”; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0.0,4.0.1381; Tasks: installmysql

    belum otomatis jalan sebagai service ya? hanya menjalankan service saat selesai diinstal saja, benar pa?

    Thanks sebelumnya pak :D

    • June 3, 2012 at 3:05 pm | #399

      Lah iya kan sebelum menjalankan net start, ada proses menjadikan service dulu :

      [Run]
      ;install service MySQL
      Filename: "{app}\mysql\bin\mysqld.exe"; Parameters: "install ""MySQL"""; StatusMsg: "Sedang menginstall service MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
      
  205. dzi
    June 7, 2012 at 10:13 am | #400

    wahhh mantap mas, , ,
    oh y saya tanya donk mas, ,
    kalau membuat intaller program powerbuilder yang menggunakan server jaguar gmana y cara buat installernya karena selain harus setting ODBCnya khan harus seting diserver jaguarnya juga, , ,
    makasih ya mas sebelumnya,,

    • June 7, 2012 at 12:26 pm | #401

      Sory ya om, sy bukan pengguna powerbuilder :D

  206. June 7, 2012 at 4:12 pm | #402

    Assalamu’alaikum.
    Mohon bantuannya kakak2 saya mengalami masalah seperti dibawah ini :

    [img]https://lh5.googleusercontent.com/-1FmjHX0HRjg/T9Bui56FOvI/AAAAAAAABlM/MXBN1tNiPAg/h120/Error.jpg[/img]

    Hal ini terjasdi saat saya memasukan tanda petik ( ‘ ) pada texbox.
    Bagaimana Solusinya?
    Terimakasih banyak.

  207. June 7, 2012 at 4:13 pm | #403

    ahmadlukmannulhakim :
    Assalamu’alaikum.
    Mohon bantuannya kakak saya mengalami masalah seperti dibawah ini :
    [img]https://lh5.googleusercontent.com/-1FmjHX0HRjg/T9Bui56FOvI/AAAAAAAABlM/MXBN1tNiPAg/h120/Error.jpg[/img]
    Hal ini terjasdi saat saya memasukan tanda petik ( ‘ ) pada texbox.
    Bagaimana Solusinya?
    Terimakasih banyak.

    • June 7, 2012 at 6:47 pm | #404

      Coba seperti ini om :

      Private Function rep(ByVal s As String) As String
          rep = Replace(s, "'", "''")
      End Function
      
      Private Sub cmdTes_Click()
          strsql = "INSERT INTO tabel (field_1, field_2) VALUES ('" & rep(text1.Text) & "', '" & rep(text2.Text) & "')"
      End Sub
      

      Fungsi rep diatas dipanggil khusus untuk tipe string

  208. dewi
    June 18, 2012 at 1:30 pm | #410

    saya udah coba compale pake inno setup tapi waktu mau ngecek laporan yang pake crytal report ada pesan ” error “connect my sql server, tapi kalo masalah input, output atau yang lainnya di aplikasi vbnya ga masalah.mohon bantuannya, apa yang harus di lakukan

    • June 18, 2012 at 3:43 pm | #411

      Emg waktu membuat aplikasinya untuk koneksi ke reportnya seperti apa ?

  209. dewi
    June 19, 2012 at 8:20 am | #412

    aplikasi vb saya buat dan jalankan di laptop saya yang menggunakan window seven ga da masalah sampai laporan menggunakan crystal report kemudian aplikasi saya PWD bermasalah terus muncul pesan “”Unexpected error number 80010108 has occured : Automation error The object invoked has disconnected from its client “” ga bs terinstall ga tau permasalahannya aplikasi saya atau PWD nya kemudian saya coba pindah ke komp menggunakan XP untuk di PWD sebelum di PWD permasalahannya waktu mau liat laporan yang menggunakan CRISTAL REPORT pesan error lg” cannot open mysql server” jadi kalo mau di packing pake PWD atau INNO SETUP permasalahannya di CR terus ga terkoneksi, mohon bantuannya

    • June 19, 2012 at 12:32 pm | #413

      Klo nampil pesan seperti diatas biasanya masih ada error di kode program, coba tekan tombol CTRL+F5 pada saat menjalankan kode program.

      Klo ada errornya diperbaiki dulu baru menjalankan tool PWD.

  210. dewi
    June 21, 2012 at 7:29 am | #414

    saya coba tekan CTRL+F5 saat menjalankan program tapi ga ketemu-ketemu errorrnya alias ga da errornya, waktu di compile pake PWD selalu gagal.Kalo CR ga ikut di compile sukses PWD/Inno setup nya.Kalo cara compile CR 8.5 ke INNO SETUP gmn kak, tolong di bantu saya permasalahannya di CR aja.

    • June 21, 2012 at 11:04 am | #415

      Ya udah berarti dicatat manual library CRnya yg dibutuhkan apa saja kan bisa dicek melalui menu Project -> References, setelah itu baru didaftarkan secara manual di skrip inno setupnya.

  211. dewi
    June 21, 2012 at 11:27 am | #416

    menu Project – Preferences ada di aplikasi apa dulu nih kak???vb atau CR

  212. dewi
    June 21, 2012 at 12:26 pm | #418

    yang di pilih apa aja kak di references nya? setelah di pilih trus gmn untuk inno setupnya

    • June 21, 2012 at 12:39 pm | #419

      Wah bakalan panjang ceritanya klo pembahasan dimulai dari sini lagi, cek coba komentar #181 dan #320 diatas, disitu sy jelaskan kenapa harus menggunakan PWD klo tanpa PWD berarti membuat skrip inno setupnya harus manual.

  213. dewi
    June 21, 2012 at 1:05 pm | #420

    apa harus begitu kak, ga da cara lain nich, aku tetep ga ngerti masalah instaler… bantuin dong kak,boleh minta no telpnya ga kak,

    • June 21, 2012 at 3:48 pm | #421

      Atw coba aplikasi ini, yg bisa mengenerate script inno berdasarkan file Visual Basic Project (.vbp).

  214. dewi
    June 22, 2012 at 12:19 pm | #422

    [Files]
    Source: “D:\KASPERSKY\kaspersky.exe”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blndo5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blndo6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blnrr5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blnrr6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\WINDOWS\Crystal\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs createallsubdirs
    ; NOTE: Don’t use “Flags: ignoreversion” on any shared system files

    Kak seperti ini file nya tolong di kasih tau apa yang harus di ganti untuk CR nya

  215. June 23, 2012 at 2:24 am | #424

    met pagi
    sy mw tanya, sy buat aplikasi client server, tp knp package instalasi client sy tdk terkoneksi ke database server yah? asumsinya dlm coding pemrogramanx sdh diatur IP server, mohon pencerahannya
    trimakasih sblumnya :)

  216. June 23, 2012 at 4:11 am | #425

    lanjutan pertanyaan sy, apakah hrus dizinkan dlu kompi lain agar bs terkoneksi?
    hmmm…mslhnya sy bljr scra otodidak jd tdk paham n msh tingkat pemula, jd untuk mengiznkn atau aplh nmnya itu, sy tdk tahu bang
    mksh sblumnya

    • June 23, 2012 at 1:02 pm | #426

      Emg om nulis di coding koneksinya g mana ?

  217. dewi
    June 24, 2012 at 11:51 am | #427

    alhamdulilah udah bisa di compile kak, ternyata harus di tambahin satu folder Crystal report di:C,file rpt dan vb exe nya di :D lalu di compile jadi satu, tapi database sql dan connector odbcnya lom di compile lom tau caranya, seumpama komp target di instal connector odbc dan xampp terlebih dahulu trus di setting connector odbc dan database mysql lalu di install aplikasi saya kira-2 bisa ga ya,

  218. June 24, 2012 at 3:18 pm | #429

    met sore
    Om kmrn prtanyaan sy txt mslhnya ad di firewall sj yg blum di non-aktifkn.

    tp mslh slnjtnya, knp skin yg sy gunakan melalui codejock tdk aktif saat diinstal di kmptr lainnya?

    apkh ada cra khusus untuk menerapkan skin agr trbaca dikmptr lain?
    mohon pencerahannya n mksh sblumnya :)

    • June 26, 2012 at 8:26 pm | #430

      Sy belum pernah make codejock, mungkin saja file skinnya yg belum ikut didistribusikan ke komputer target.

  219. dewi
    June 26, 2012 at 1:04 pm | #431

    saat sudah di install di pc lain pesan runtime errorr”339″ ada pa dngn msadodc.ocx nya tolong di bantu kad admin, klo aku install di pc sendiri sukses klo di pc lain error trs

  220. dewi
    June 26, 2012 at 11:32 pm | #432

    [Setup]
    ; NOTE: The value of AppId uniquely identifies this application.
    ; Do not use the same AppId value in installers for other applications.
    ; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
    AppId={{B76C14C9-9244-4E6F-9586-B624DC02EB82}
    AppName={#MyAppName}
    AppVersion={#MyAppVersion}
    ;AppVerName={#MyAppName} {#MyAppVersion}
    AppPublisher={#MyAppPublisher}
    AppPublisherURL={#MyAppURL}
    AppSupportURL={#MyAppURL}
    AppUpdatesURL={#MyAppURL}
    DefaultDirName={pf}\{#MyAppName}
    DefaultGroupName={#MyAppName}
    OutputDir=D:\CRISTAL REPORT
    OutputBaseFilename=setup
    Compression=lzma
    SolidCompression=yes

    [Languages]
    Name: “english”; MessagesFile: “compiler:Default.isl”

    [Tasks]
    Name: “desktopicon”; Description: “{cm:CreateDesktopIcon}”; GroupDescription: “{cm:AdditionalIcons}”; Flags: unchecked

    [Files]
    Source: “D:\KASPERSKY\kaspersky.exe”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\MSADODC.OCX”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\MSBIND.DLL”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\Crystl32.OCX”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\crpe32.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\mscomct2.ocx”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\VB6STKIT.DLL”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\MSSTDFMT.DLL”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\MSDATGRD.OCX”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blndo5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blndo6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blnrr5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blnrr6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu1.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu2.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu3.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr6.rpt”; DestDir: “{app}”; Flags: ignoreversion

    ; NOTE: Don’t use “Flags: ignoreversion” on any shared system files

    [Icons]
    Name: “{group}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”
    Name: “{group}\{cm:ProgramOnTheWeb,{#MyAppName}}”; Filename: “{#MyAppURL}”
    Name: “{group}\{cm:UninstallProgram,{#MyAppName}}”; Filename: “{uninstallexe}”
    Name: “{commondesktop}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”; Tasks: desktopicon

    [Run]
    Filename: “{app}\{#MyAppExeName}”; Description: “{cm:LaunchProgram,{#StringChange(MyAppName, ‘&’, ‘&&’)}}”; Flags: nowait postinstall skipifsilent

    ini kak admin semua script untuk compile, database mysql saya copas/import di comp target dan connector odbc nya saya coba instal di comp target lalu saya setting system DNS nya,masih ga bisa terus

    • June 27, 2012 at 10:37 am | #433

      Kayaxnya kurang file2x runtime visual basicnya, coba perhatikan lagi sample skrip yg diatas di section file yg ada komentar ;Visual Basic Runtime

  221. dewi
    June 27, 2012 at 4:45 pm | #434

    oouuww gt ya kak, saya coba lagi deh, selain inno setupp saya juga coba compile pake PDW VB tapi setelah di instal di PC lain ada pesan ERROR 3705, kenapa yah, saya coba dua 2 nya inno setup dan PDW tapi semua masih saja error mohon bantuannya kak,

    • June 28, 2012 at 3:45 pm | #435

      Visual basic runtimenya sudah ditambahkan belum, seperti petunjuk sy sebelumnya.

  222. dewi
    June 28, 2012 at 8:00 pm | #436

    ; Script generated by the Inno Setup Script Wizard.
    ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

    #define MyAppName “APLIKASI DEKSTOP KASPERSKY”
    #define MyAppVersion “1.5″
    #define MyAppPublisher “My Company, Inc.”
    #define MyAppURL “http://www.example.com/”
    #define MyAppExeName “kaspersky.exe”

    [Setup]
    ; NOTE: The value of AppId uniquely identifies this application.
    ; Do not use the same AppId value in installers for other applications.
    ; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
    AppId={{B76C14C9-9244-4E6F-9586-B624DC02EB82}
    AppName={#MyAppName}
    AppVersion={#MyAppVersion}
    ;AppVerName={#MyAppName} {#MyAppVersion}
    AppPublisher={#MyAppPublisher}
    AppPublisherURL={#MyAppURL}
    AppSupportURL={#MyAppURL}
    AppUpdatesURL={#MyAppURL}
    DefaultDirName={pf}\{#MyAppName}
    DefaultGroupName={#MyAppName}
    OutputDir=D:\CRISTAL REPORT
    OutputBaseFilename=setup
    Compression=lzma
    SolidCompression=yes

    [Languages]
    Name: “english”; MessagesFile: “compiler:Default.isl”

    [Tasks]
    Name: “desktopicon”; Description: “{cm:CreateDesktopIcon}”; GroupDescription: “{cm:AdditionalIcons}”; Flags: unchecked

    [Files]
    ;visual basic runtime
    Source: “C:\Windows\System32\VB6STKIT.DLL”; DestDir: {app}; Flags: ignoreversion
    Source: “C:\Windows\System32\COMCAT.DLL”; DestDir: {app}; Flags:ignoreversion
    Source: “C:\Windows\System32\stdole2.tlb”; DestDir: {app}; Flags: ignoreversion
    Source: “C:\Windows\System32\asycfilt.dll”; DestDir: {app}; Flags: ignoreversion
    Source: “C:\Windows\System32\olepro32.dll”; DestDir: {app}; Flags: ignoreversion
    Source: “C:\Windows\System32\oleaut32.dll”; DestDir: {app}; Flags: ignoreversion
    Source: “C:\Windows\System32\msvbvm60.dll”; DestDir: {app}; Flags: ignoreversion

    ;crystal report 8,5
    Source: “C:\Windows\System32\MSADODC.OCX”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\MSBIND.DLL”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\Crystl32.OCX”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\crpe32.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\crwrap32.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\crypt32.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\IMPLODE.DLL”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\p2bdao.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\p2ctdao.dll”; DestDir: “{app}”; Flags: ignoreversion
    Source: “C:\Windows\System32\p2irdao.dll”; DestDir: “{app}”; Flags: ignoreversion
    ;application runtime
    Source: “D:\KASPERSKY\kaspersky.exe”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blndo5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blndo6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blnrr5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\blnrr6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu1.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu2.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\minggu3.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perdo6.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr5.rpt”; DestDir: “{app}”; Flags: ignoreversion
    Source: “D:\KASPERSKY\perrr6.rpt”; DestDir: “{app}”; Flags: ignoreversion

    ; NOTE: Don’t use “Flags: ignoreversion” on any shared system files

    [Icons]
    Name: “{group}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”
    Name: “{group}\{cm:ProgramOnTheWeb,{#MyAppName}}”; Filename: “{#MyAppURL}”
    Name: “{group}\{cm:UninstallProgram,{#MyAppName}}”; Filename: “{uninstallexe}”
    Name: “{commondesktop}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”; Tasks: desktopicon

    [Run]
    Filename: “{app}\{#MyAppExeName}”; Description: “{cm:LaunchProgram,{#StringChange(MyAppName, ‘&’, ‘&&’)}}”; Flags: nowait postinstall skipifsilent
    tolong di cek lagi kak pa yang kurang, atau salah, udah saya coba install dan jalankan di netbook saya sendiri sukses tapi belum tentu di komputer lain,… di komputer yang mau saya instal itu udah saya install CR 8.5, xammp dan conector odbc 3.51, selain itu udah saya set system dsn di connector ODBC dan database nya sudah saya import ke phpmyadminnya, data source name jg sudah saya samain sama yang di netbook saya, kalo masih error terus saya putus aja kak, mohon bantuannya ya kak

    • June 30, 2012 at 7:58 pm | #437

      Salut deh buat mbanya masih bisa bertahan berhari2x dengan kasus yg sama :D

      Kayaxnya harus diperjelas dulu ini errornya pada saat kapan ?
      1. Pada saat instalasi ? Berarti mungkin memang ada masalah pada saat pembuatan paket instalasinya misal ada library yg lupa diikutsertakan.
      2. Instalasi sukses tetapi aplikasi error pada saat dijalankan.

      Nah utk kasusnya mba masuk poin yg mana 1 atw 2, trus klo ada error dicopas kesini donk pesan erronya biar proses deteksinya lebih gampang.

  223. dewi
    June 28, 2012 at 8:01 pm | #438

    maksud saya putus asa kak

  224. Anissa
    June 30, 2012 at 2:53 pm | #439

    kakak taku mau tanya,
    aku dulu udah pernah nginstall odbc, .
    tapi pas mau buat project vb baru, tak conect-in tapi gak mau conect ama databasenya
    tak pikir yang salah odbc nya makanya tak instal ulang
    trus pas tak install ulang, mau tak conect in lagi malah keluar warning
    “the setup routines for the mysql odbc 3.51 driver could not be found”
    kira2 itu kenapa ya? tak istal ulang berkali2 tapi tetep aja keluar warning yang sama
    saya udah putus asa, mohon bantuanya kakak

    • June 30, 2012 at 8:47 pm | #440

      Coba dicek ODBC Data Source, klo driver MySQL ODBCnya terinstall dengan baik seharusnya nampil seperti gambar berikut :

      lihat gambar

  225. dewi
    June 30, 2012 at 8:38 pm | #441

    karena ini program aplikasi pertama saya untuk mau di pakai di perusahaan saya,kalo yang instalasi terakhir ini belum saya install di computer kantor soalnya libur jadi senin kale, kalo ada pesan error pasti saya kasih tau ma anda.untuk kasusnya sepertinya no 1 bisa no 2 jg bisa.

    • June 30, 2012 at 9:40 pm | #442

      Oke deh sy tunggu pesan errornya.

      untuk kasusnya sepertinya no 1 bisa no 2 jg bisa.

      Nah ini nih yg msh belum jelas :D

  226. Anissa
    July 1, 2012 at 6:17 pm | #443

    udah, udah keluar gituanya ka,
    tapi justeru pas mau tak add ODBC nya itu, keluar warning yang kaya d atas,
    trus kudu d gimanain tu ka?

  227. dewi
    July 2, 2012 at 8:35 am | #445

    udah saya install lalu saya masuk ke program,bisa login masuk ke program, tapi waktu mau buka halaman seperti barang ada pesan- pesan error nya “cannot initialize data bindings” itu pesan dari microsoft datagrid control sepertinya,jadi datagridnya ga bisa nampilin database dariphpmyadminnya,….sepertinya kasus nya no 1 deh,karna saya ga tau apa aja library yang belum di masukin saat compile

  228. dewi
    July 3, 2012 at 4:10 pm | #447

    saya coba crystl32.dep ubah seperti di bawah ini pada netbook saya
    ;[CRPE32.DLL]
    ;Dest=$(WinSysPath)
    ;Uses1=Crpe32.dll
    ;Uses2=

    tapi kenapa selalu gagal untuk disimpan / gagal di edit? tolong kak kasih tau

  229. dede
    July 6, 2012 at 3:02 pm | #448

    Assalamu’alaikum wr. wb.
    Mohon bantuanya om admin. Bagaimana scriptnya untuk 2 kondisi berikut :
    1. jika di pc target belum terpasang mysql maka instal mysql berikut databasenya
    2. jika di pc target sudah terpasang mysql tidak perlu instal mysql tp hanya mengcreat database baru dan restore database yg sudah di dump. Matur nuwun.
    Wassalamu’alaikum wr. wb.

    • July 7, 2012 at 1:08 pm | #449

      Sudah ada yg nanya om, coba cek komentar #261 dan #262 diatas.

      • dede
        July 11, 2012 at 7:25 am | #450

        O ia om, maaf kurang jeli bacanya.
        Terima kasih banyak.

  230. July 9, 2012 at 3:17 am | #452

    mas sy udh ikutin semua tutorial yg dijabarkan di atas, tp selalu g bisa mulu knp?, sy ingin buat setup utk program yg sy buat dgn vb.net + mysql 5.5.16 melalui xampp tapinya, jg crystal report 11, semua file yg dibutuhkan udh sy masukkan jg, tp masih g bisa2

    • July 9, 2012 at 2:45 pm | #453

      Ya jangan pake xampp, untuk mysqlnya pake aja yg versi noninstall (format zip)

    • arulamd
      July 9, 2012 at 3:51 pm | #454

      mas, klo buat installer ino setup buat komputer server dan komputer client,dengan metode di atas bagaimana mas, jadi klo komputer server dia instal mysql nya klo di client dia instal odbcnya aja.terima kasih.

      • July 9, 2012 at 3:58 pm | #455

        Skrip di ataskan udah lengkap om (digunakan untuk menginstall mysql dan odbc).

        Jadi buat aja dua skrip inno (server dan klien), asumsikan skrip diatas adalah skrip untuk membuatan file setup aplikasi server sedangkan skrip untuk membuat file setup aplikasi klien tinggal nonaktifkan perintah menginstall mysqlnya.

        • arulamd
          July 9, 2012 at 4:13 pm | #456

          mas ,bisa di satukan scrip untuk server dan client nya, jadi waktu kita jalanin wizarnya ada pilihan buat server atau client.kadi klo pilih server yg dijalankan isntal mysqlnya dan odbcnya sedangkan jika untuk client hanya odbcnya aja..,terima kasih

          • July 9, 2012 at 8:52 pm | #457

            Oke mudah2xan skrip berikut bisa memberikan gambaran :

            [Types]
            Name: klien; Description: "Aplikasi Klien"
            Name: server; Description: "Aplikasi Server"
            
            [Components]
            Name: klien; Description: "Aplikasi Klien"; Types: klien; Flags: fixed
            Name: server; Description: "Aplikasi Server"; Types: server; Flags: fixed
            
            [Files]
            ;untuk file2x MySql tambahkan pemanggilan Components: server
            Source: mysql-5.1.36-win32\bin\*; DestDir: {app}\mysql\bin; Components: server; Flags: ignoreversion; Tasks: installmysql
            
            ;untuk file2x MySQL ODBC tambahkan pemanggilan Components: server or klien
            Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.dll"; Components: server or klien; DestDir: {sys}; Flags: onlyifdoesntexist
            

            Di section Run juga menyesuaikan.

  231. arulamd
    July 9, 2012 at 4:01 pm | #458

    file sql nya tidak bisa di undump yah, cuma nama database aja yang terpasang dan odbcnya.untuk table2 nya tidak masuk ke database nya, mohon pencerahan nya…?terima kasih.

  232. arulamd
    July 9, 2012 at 5:22 pm | #459

    ada yg bisa bantu, exec.cmd nya tidak jalan, jadi tabel tidak terbentuk hanya nama database nya saja…,terima kasih

    • July 9, 2012 at 8:58 pm | #460

      Klo yg ini om :

      [Run]
      ; proses undump
      Filename: cmd.exe; Parameters: "cmd /c {app}\mysql\bin\mysql.exe -uroot -pmasterkey albasi < albasi.sql"; Flags: runhidden
      
      • arulamd
        July 10, 2012 at 10:21 am | #461

        mas bukan nya file nya namanya exec.cmd klo diatas cmd.exe, itu cara pembuatan filenya gimana?terima kasih..

      • arulamd
        July 10, 2012 at 10:47 am | #462

        mas sudah saya coba scrip di atas, tabelnya tidak ikut mas hanya membentuk nama database nya aja.kira2 apa yg salah yah…?

      • arulamd
        July 10, 2012 at 10:50 am | #463

        satu lagi mas, untuk configure DSN ODBC nya di source nya bagaimana cara menambahkan variabel nilai di detail nya, tab misc di beri centang yang ignore spase after fungtion names,terima kasih.

        • July 12, 2012 at 11:56 am | #464

          Coba tambahkan skrip berikut di section Code :

          [Code]
          procedure DeinitializeSetup();
          var
            dsnName : string;
            dbName : string;  
          begin
             // disesuaikan dg nama dsn yg dibuat	   
             dsnName := 'dsn-albasi'; 
             RegQueryStringValue(HKEY_CURRENT_USER, 'Software\ODBC\ODBC.INI\' + dsnName, 'DATABASE', dbName);
             if not (dbName = '') then
             begin
                RegWriteStringValue(HKEY_CURRENT_USER, 'Software\ODBC\ODBC.INI\' + dsnName, 'IGNORE_SPACE', '1');      
             end
          end;
          
      • arulamd
        July 10, 2012 at 2:19 pm | #465

        mysql -uroot -pmasterkey AAS < aas.sql ini untuk scrip nya, file nya berada di folder paketinstalasi drive d,sedang untuk aas.sql sama ada di folder paket isntalasi isi scripnya ky gini :CREATE DATABASE /*!32312 IF NOT EXISTS*/`AAS` /*!40100 DEFAULT CHARACTER SET utf8 COLLATE utf8_bin */;

        USE `AAS`;

        /*Table structure for table `barang` */

        DROP TABLE IF EXISTS `barang`;

        CREATE TABLE `barang` (
        `id_barang` varchar(10) NOT NULL,
        `nm_barang` varchar(50) NOT NULL,
        `hrg_barang` int(8) NOT NULL,
        `jml_barang` int(3) NOT NULL,
        PRIMARY KEY (`id_barang`)
        ) ENGINE=MyISAM DEFAULT CHARSET=latin1;

        /*Data for the table `barang` */

        insert into `barang`(`id_barang`,`nm_barang`,`hrg_barang`,`jml_barang`) values ('BRG0000001','MOUSE TUNASMEDIA',50000,150),('BRG0000002','MOUSE VAINIT BLU LASER',25000,300),('BRG0000003','PC VAINIT CORE I7 6.0 GHZ',1000000,400),('BRG0000004','PRINTER VAINIT TO BEST PHOTO',300000,50),('BRG0000005','HANDPHONE VAINIT',200000,20),('BRG0000006','BUKU PHP TUNASMEDIA',25000,100);

        /*Table structure for table `cb_autopayment` */

        DROP TABLE IF EXISTS `cb_autopayment`;

        CREATE TABLE `cb_autopayment` (
        `sandi_kliring` varchar(7) COLLATE utf8_bin NOT NULL,
        `nama_bank` varchar(22) COLLATE utf8_bin DEFAULT NULL,
        `alamat_bank` varchar(22) COLLATE utf8_bin NOT NULL,
        `kota` varchar(22) COLLATE utf8_bin DEFAULT NULL,
        PRIMARY KEY (`sandi_kliring`,`alamat_bank`)
        ) ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_bin;

        /*Data for the table `cb_autopayment` */

        /*Table structure for table `cb_autopayment_dtl` */

        DROP TABLE IF EXISTS `cb_autopayment_dtl`;

        CREATE TABLE `cb_autopayment_dtl` (
        `bukti_giro` varchar(15) COLLATE utf8_bin NOT NULL,
        `supp_id` varchar(15) COLLATE utf8_bin NOT NULL,
        `nama_bank` varchar(22) COLLATE utf8_bin DEFAULT NULL,
        `alamat_bank` varchar(22) COLLATE utf8_bin DEFAULT NULL,
        `kota` varchar(22) COLLATE utf8_bin DEFAULT NULL,
        `sandi_kliring` varchar(7) COLLATE utf8_bin DEFAULT NULL,
        `nama_penerima` varchar(30) COLLATE utf8_bin DEFAULT NULL,
        `rekening_penerima` varchar(30) COLLATE utf8_bin DEFAULT NULL,
        `currency` char(3) COLLATE utf8_bin DEFAULT NULL,
        `nominal` decimal(13,0) DEFAULT NULL,
        `nominal2` varchar(13) COLLATE utf8_bin DEFAULT NULL,
        `berita1` varchar(66) COLLATE utf8_bin DEFAULT NULL,
        `berita2` varchar(66) COLLATE utf8_bin DEFAULT NULL,
        `kode_residen` char(1) COLLATE utf8_bin DEFAULT NULL,
        `kode_penduduk` char(1) COLLATE utf8_bin DEFAULT NULL,
        `pot` decimal(10,2) DEFAULT NULL,
        PRIMARY KEY (`bukti_giro`,`supp_id`),
        CONSTRAINT `fk_cb_autopayement_01` FOREIGN KEY (`bukti_giro`) REFERENCES `cb_autopayment_hdr` (`bukti_giro`)
        ) ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_bin;

        /*Data for the table `cb_autopayment_dtl` */

        /*Table structure for table `cb_autopayment_dtl1` */

        DROP TABLE IF EXISTS `cb_autopayment_dtl1`;

        CREATE TABLE `cb_autopayment_dtl1` (
        `supp_id` varchar(15) COLLATE utf8_bin NOT NULL,
        `tgl_penj` datetime NOT NULL,
        `no_giro` varchar(15) COLLATE utf8_bin NOT NULL,
        `tgl_jual1` mediumblob,
        `tgl_jual2` mediumblob,
        `bayar_sekarang` decimal(18,2) DEFAULT NULL,
        `bayar_lalu` decimal(18,2) DEFAULT NULL,
        `pot` decimal(14,2) DEFAULT NULL,
        PRIMARY KEY (`supp_id`,`tgl_penj`,`no_giro`)
        ) ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_bin; sebagai contoh saja, terima kasih

        • July 12, 2012 at 11:03 am | #466

          Sy coba undump manual aja skrip diatas masih error kok om.

  233. July 10, 2012 at 10:08 pm | #467

    Assalamu’alaikum
    Kak..ada source code steganografi pada file audio untuk vb6 kak..?

  234. dewi
    July 11, 2012 at 6:12 pm | #473

    kak admin program saya bijimana nich setup nya ga kelar-kelar help me dong, sampe tuntas# memohon banged.com#

    • July 12, 2012 at 11:07 am | #474

      Di upload aja file project vbnya (ektensi *.vbp) plus link downloadnya kesini.

  235. dewi
    July 12, 2012 at 12:25 pm | #475

    kak download di http://www.ziddu.com/download/expire.rar.html
    mohon bantuannya dan terimakasih

  236. dewi
    July 12, 2012 at 12:30 pm | #476

    setelah di download tolong di hapus link nya kak di blog ini. thanks

  237. roni
    July 15, 2012 at 12:44 am | #477

    saya ada sedikit masalah untuk distribusi file mysql saya,,hasil script diatas sudah dijalan pada waktu saya coba instal aplikasi pada windows XP, tapi saya coba ke Windows 7 malah MYSQL tidak dapat konek, dengan pesan error : “Erro 1067 The Process Teriminated unexpedtedly”, itu pesan ketika saya buka langsung melalui menu services…
    services y memang terinstal di daftar services,,,tapi tidak bisa konek kedatabasenya

    trims sebelumnya

  238. dewi
    July 17, 2012 at 9:09 am | #479

    kak admin gimana masalahnya di apa program vb 6 aku, tolong di compile sekalian ya ,Terima kasih

    • July 21, 2012 at 11:16 am | #480

      Sy enggak punya Crystal Report jadi error trus buka projectnya :D

  239. roni
    July 19, 2012 at 12:14 pm | #481

    om admin,,untuk UAC sdh saya nonaktifkan, saya cek basedir dan datadir sudah benar untuk pathnya , kira2 knpa ya ?,,dengan error 1067 the process terminated …….

  240. July 24, 2012 at 5:46 pm | #483

    assalamualaiakum

    om admin saya tanya pada sektip berikut
    ;My Application Runtime
    Source: main\Albasi.exe.manifest; DestDir: {app}; Flags: ignoreversion
    Source: main\Albasi.exe; DestDir: {app}; Flags: ignoreversion
    Source: main\albasi.sql; DestDir: {app}\mysql\bin; Flags: ignoreversion
    Source: main\exec.cmd; DestDir: {app}\mysql\bin; Flags: ignoreversion

    untuk file baris pertama (exe.manifest) maksudnya apa
    untuk baris ke-4 ngambil filenya dari mana, apa itu shortcut cmd console

    Syukron

    • July 25, 2012 at 9:07 am | #484

      File manifests digunakan jika ingin control2x standar (ex. CommandButton, TextBox) dari aplikasi yg kita buat bergaya XP.

      Untuk keterangan lengkapnya bisa dicek disini.

      Untuk file exec.cmd sudah sy jelaskan diatas, coba dicek lagi, dan untuk membuatnya gambang gunakan saja notepad yg penting waktu nyimpan gunakan ekstensi cmd.

  241. July 25, 2012 at 12:06 pm | #485

    ok, makasih mas atas pencerahannya
    mas, saya dapat runtime CR8 dr blog luar, filenya ada 49 (dll&ocx)
    itu wajar ngga ya ?
    sekali lagi terimakasih

    • July 25, 2012 at 12:33 pm | #486

      Kok harus ngambil dari blog luar ???
      Klo ditempat om sudah terinstall CR, berarti kan runtimenya juga sudah ada.

  242. July 28, 2012 at 5:35 pm | #487

    mas saya mua tanya lagi
    saya mau maketin file oem logo yang akan di letakan didirektory : C:\WINDOWS\system32
    gimana mas skripnya
    makasih…

    • July 28, 2012 at 6:39 pm | #488

      Tinggal tambahkan di section File om :

      [Files]
      Source: "lokasi file logo.bmp"; DestDir: {sys}; Flags: ignoreversion
      
  243. July 31, 2012 at 7:53 am | #489

    mas, kalo misal kompi trsebut udah ada mysql sama odbcnya gmn ya ?
    apa ga apa2 tetep di install full paket,
    terus kalo program kita di unintal apa g ngaruh ke prog mysql & odbc pada kompi tersebut ?
    makasih mas, selalu merespon kami yg sedang kebingungan :)

    • August 4, 2012 at 9:41 am | #490

      Makanya pada saat instalasi dicek dulu apakah sudah terinstall MySQL dan ODBCnya.
      Trus pada saat uninstall prosesnya ngapain aja bisa kita atur di section UninstallRun

  244. August 1, 2012 at 10:12 am | #491

    Halo mas, tambah mantap aja nih tutorial nya :)
    Mas.. mau tanya lagi nih, kebetulan lagi mau buat installer buat aplikasi kecil-kecilan gitu.
    Cuma karena aplikasi yang akan saya instal ini lokasinya sudah saya tentukan dan otomatis membuat icon di desktop. jadi kalau dilihat dari gambar hasil instal di atas maka dari gambar 1 langsung ke gambar 4.
    Jadi gambar 2 yang pilih lokasi dan gambar 3 yang buat desktop dihilangkan.
    Kalau seperti itu kira-kira rubahnya dibagian mana ya mas?

    • August 4, 2012 at 10:12 am | #492

      Itu cuma main di section Setup kok om, ini contohnya :

      [Setup]
      AppName=Update Sistem Pembelian Bahan Baku
      AppVerName=Update Sistem Pembelian Bahan Baku Versi 1.0.0.00
      AppPublisher=K4m4r82's Laboratory
      AppPublisherURL=http://coding4ever.wordpress.com/
      AppVersion=1.0.0.00
      AppCopyright=Copyright © 2009. K4m4r82's Laboratory
      VersionInfoVersion=1.0.0.00
      OutputBaseFilename=UpdateSPBBAlbasi17Jun2011
      OutputDir=F:\Pribadi\PT. ALBASI\Revisi Juni 2011
      DisableProgramGroupPage=yes
      CreateAppDir=no
      Compression = lzma
      SolidCompression = yes
      LanguageDetectionMethod=none
      ShowLanguageDialog=no
      PrivilegesRequired = admin
      SetupIconFile=Setup.ico
      WizardImageFile=SetupModern21.bmp
      WizardSmallImageFile=SetupModernSmall21.bmp
      CreateUninstallRegKey=no
      UpdateUninstallLogAppName=no
      
  245. tealin
    August 1, 2012 at 10:36 pm | #493

    Mas admin.. mau tanya kalo misal nambah yang [run] biar instal apache nya juga gmn yaak? mohon bantuannya.. :)

  246. edit
    August 4, 2012 at 2:23 pm | #495

    kalo coding inno setup sendiri untuk mengecek apakah suatu port terpakai atau tidak bagaimana,kalo terpakai ada pesan,,,tp sebelumnya ada semacam dibuatkan textboxt untuk cek port itu sendiri ,nanti bisa otomatis di write di file (.ini) nya MySql

    • August 6, 2012 at 10:14 am | #496

      Untuk mengecek port kita bisa menggunakan perintah netstat, contoh untuk mengecek port MySQL bisa menggunakan perintah berikut :

      netstat -ano|findstr 3306
      

      Untuk menampung hasil dari perintah diatas tambahkan perintah > nama file

      netstat -ano|findstr 3306 > c:\output.txt
      

      setelah itu tinggal manfaatkan di skrip inno setup

      [Code]
      var
         INIInputPage: TInputQueryWizardPage;
      
      procedure InitializeWizard();
      begin
        // Form Input
        INIInputPage := CreateInputQueryPage(wpInfoAfter, 'Konfigurasi', 'Konfigurasi Program.',
                                             'Isikan konfigurasi program ke dalam form di bawah ini.');
      
        INIInputPage.Add('Port Aplikasi', False);
      
        INIInputPage.Values[0] := GetPreviousData('port', '3306');
      end;
      
      // prosedur ketika user mengklik tombol kembali, setelah pengisian form
      procedure RegisterPreviousData(PreviousDataKey: Integer);
      begin
        // tampilkan nilai sebelumnya yang sudah diinputkan user
        SetPreviousData(PreviousDataKey, 'port', INIInputPage.Values[0]);
      end;
      
      // prosedur ketika user mengklik tombol lanjut, setelah pengisian form
      function NextButtonClick(CurPageID: Integer): Boolean;
      var
        resultCode, posisi : integer;
        port, netstat, params, output, content, command : string;
        
      begin
        Result := True;
        if CurPageID = INIInputPage.ID then begin
          // validasi input
          if (Trim(INIInputPage.Values[0]) = '') then begin
             MsgBox('Anda harus mengisikan data secara lengkap!', mbError, MB_OK);
             Result := False;
      
          end else begin
            port := INIInputPage.Values[0];
      
            netstat := ExpandConstant('{sys}\netstat.exe');
            params := '-ano|findstr ' + port;
            output := 'c:\output.txt';
      
            command := AddQuotes(netstat) + ' ' + params + ' >' + AddQuotes(output);
            Exec(ExpandConstant('{cmd}'), '/C ' + command, '', SW_HIDE, ewWaitUntilTerminated, resultCode);
      
            LoadStringFromFile(output, content);
      
            posisi := Pos('LISTENING', content);
            if posisi > 0 then
            begin
              MsgBox('Port sudah digunakan', mbInformation, MB_OK);
              Result := False;
            end
        
            // TODO : tulis ke file INI menggunakan fungsi SetIniString
          end;
        end;
      end;
      
  247. kandrick
    August 15, 2012 at 7:51 am | #497

    Gan mohon pencerahan nya saya sudah mengikuti tutorial di atas , tp mysql nya ga bisa connect saat aplikasi mau menggunakan mysql. Berikut saya sertakan code saya yah. Mohon pencerahan nya:
    ; Script generated by the Inno Setup Script Wizard.
    ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

    #define MyAppName “Simple Cashier”
    #define MyAppVersion “2.1″
    #define MyAppPublisher “Simple Soft”
    #define MyAppURL “http://www.simplesoft.com/”
    #define MyAppExeName “MDIAPP.exe”

    [Setup]
    ; NOTE: The value of AppId uniquely identifies this application.
    ; Do not use the same AppId value in installers for other applications.
    ; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
    AppId={{56A9EAC9-C66A-4B18-ADC4-9A1BAE74693C}
    AppName={#MyAppName}
    AppVersion={#MyAppVersion}
    ;AppVerName={#MyAppName} {#MyAppVersion}
    AppPublisher={#MyAppPublisher}
    AppPublisherURL={#MyAppURL}
    AppSupportURL={#MyAppURL}
    AppUpdatesURL={#MyAppURL}
    DefaultDirName={pf}\{#MyAppName}
    DefaultGroupName={#MyAppName}
    OutputBaseFilename=setup
    Compression=lzma
    SolidCompression=yes

    [Languages]
    Name: “english”; MessagesFile: “compiler:Default.isl”

    [Tasks]
    Name: “desktopicon”; Description: “{cm:CreateDesktopIcon}”; GroupDescription: “{cm:AdditionalIcons}”; Flags: unchecked
    Name: “quicklaunchicon”; Description: “{cm:CreateQuickLaunchIcon}”; GroupDescription: “{cm:AdditionalIcons}”; Flags: unchecked; OnlyBelowVersion: 0,6.1
    Name: installodbc; Description: “Install ODBCMySQL”; GroupDescription: “Proses tambahan:”; Flags: checkedonce
    Name: installmysql; Description: “Install MySQL”; GroupDescription: “Proses tambahan:”; Flags: checkedonce

    [Files]
    ;delphi run time
    Source: “source\qtintf70.dll”; DestDir: “C:\WINDOWS\system32″; Flags: ignoreversion recursesubdirs createallsubdirs
    ;program
    Source: “source\MDIAPP.exe”; DestDir: “{app}”; Flags: ignoreversion
    Source: “source\*”; DestDir: “{app}”; Flags: ignoreversion recursesubdirs createallsubdirs
    ;mysql
    Source: mysql\bin\*; DestDir: {app}\mysql\bin; Flags: ignoreversion;Check: not IsMySQLExist; Tasks: installmysql
    Source: mysql\Docs\*; DestDir: {app}\mysql\Docs; Flags: ignoreversion;Check: not IsMySQLExist; Tasks: installmysql
    Source: mysql\lib\*; DestDir: {app}\mysql\lib; Flags: ignoreversion recursesubdirs; Check: not IsMySQLExist; Tasks: installmysql
    Source: mysql\share\*; DestDir: {app}\mysql\share; Flags: ignoreversion recursesubdirs;Check: not IsMySQLExist ; Tasks: installmysql
    Source: mysql\data\*; DestDir: {app}\mysql\data; Flags: ignoreversion recursesubdirs uninsneveruninstall;Check: not IsMySQLExist ; Tasks: installmysql
    Source: mysql\*; DestDir: {app}\mysql; Flags: ignoreversion; Check: not IsMySQLExist; Tasks: installmysql
    ;daftar file MySQL ODBC 5.1
    Source: “Connector ODBC 5.1\myodbc5.dll”; DestDir: {sys}; Flags: onlyifdoesntexist;Tasks: installodbc
    Source: “Connector ODBC 5.1\myodbc5S.dll”; DestDir: {sys}; Flags: onlyifdoesntexist;Tasks: installodbc
    Source: “Connector ODBC 5.1\myodbc5.lib”; DestDir: {sys}; Flags: onlyifdoesntexist;Tasks: installodbc
    Source: “Connector ODBC 5.1\myodbc5S.lib”; DestDir: {sys}; Flags: onlyifdoesntexist;Tasks: installodbc
    Source: “Connector ODBC 5.1\myodbc-installer.exe”; DestDir: {sys}; Flags: onlyifdoesntexist;Tasks: installodbc

    ; NOTE: Don’t use “Flags: ignoreversion” on any shared system files

    [Icons]
    Name: “{group}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”
    Name: “{group}\{cm:UninstallProgram,{#MyAppName}}”; Filename: “{uninstallexe}”
    Name: “{commondesktop}\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”; Tasks: desktopicon
    Name: “{userappdata}\Microsoft\Internet Explorer\Quick Launch\{#MyAppName}”; Filename: “{app}\{#MyAppExeName}”; Tasks: quicklaunchicon

    [Run]
    ;install service MySQL
    Filename: “{app}\mysql\bin\mysqld.exe”; Parameters: “install “”MySQL”””; StatusMsg: “Sedang menginstall service MySQL …”; Flags: runhidden;Check: not IsMySQLExist ; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
    ;jalankan service MySQL
    Filename: {sys}\net.exe; Parameters: “start “”MySQL”””; StatusMsg: “Sedang menjalankan service MySQL …”; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0.0,4.0.1381; Tasks: installmysql
    ;mendaftarkan port default mysql (3306) ke firewall
    Filename: “{sys}\netsh.exe”; Parameters: “firewall add portopening TCP 3306 “”Port MySQL”””; StatusMsg: “Sedang mendaftarkan port MySQL …”; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
    Filename: “{sys}\netsh.exe”; Parameters: “firewall set service type = fileandprint mode = enable”; StatusMsg: “Mengaktifkan File and Printer Sharing …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
    ;mengganti password default root (blank). ex : yuyayu
    Filename: “{app}\mysql\bin\mysqladmin.exe”; Parameters: “-uroot password yuyayu”; StatusMsg: “Mengganti password root”; Flags: runhidden;Check: not IsMySQLExist ; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
    ;menghapus user default1 (user=blank, password=blank)
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”DELETE FROM mysql.user WHERE Host=’localhost’ AND User=””””; Flags: runhidden;Check: not IsMySQLExist ;MinVersion: 0,5.01.2600sp2
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”FLUSH PRIVILEGES”””; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0,5.01.2600sp2
    ;menghapus user default2 (user=root, password=blank)
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”DELETE FROM mysql.user WHERE Host=’127.0.0.1′ AND User=’root’”””; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0,5.01.2600sp2
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”FLUSH PRIVILEGES”””; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0,5.01.2600sp2
    ;set agar user root bisa login dari mesin lain (kalo diperlukan)
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”GRANT ALL PRIVILEGES ON *.* TO root@’%’ IDENTIFIED BY ‘yuyayu’”””;Check: not IsMySQLExist; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”FLUSH PRIVILEGES”””; Flags: runhidden;Check: not IsMySQLExist; MinVersion: 0,5.01.2600sp2

    ;mengganti agar root bisa masuk dr mesin lain
    ;Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”UPDATE mysql.user SET Host=’%’ WHERE User=’root’”””; Flags: runhidden;Check: not IsMySQLExist ; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
    ;membuat database kosong
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pyuyayu -e “”CREATE DATABASE simple_cashier_v2″””; Flags: runhidden;Check: not IsMySQLExist ; MinVersion: 0,5.01.2600sp2; Tasks: installmysql
    ;menjalankan file batch exec.cmd untuk melakukan proses undump
    Filename: “{app}\mysql\bin\exec.cmd”; Flags: runhidden; MinVersion: 0,5.01.2600sp2; Check: not IsMySQLExist; Tasks: installmysql
    ;install driver myodbc
    Filename: “{app}\myodbc-installer.exe”; Parameters: “-d -a -n “”MySQL ODBC 5.1 Driver”” -t “”DRIVER=myodbc5.dll;SETUP=myodbc5S.dll”””; StatusMsg: “Tunggu sedang mendaftarkan driver MySQL Connector ODBC 5.1.5″; Flags: runhidden; Tasks: installodbc
    ;nambahin datasource
    ;ip address server didapat dg memanggil fungsi GetIPServer
    Filename: “{app}\myodbc-installer.exe”; Parameters: “-s -a -c1 -n “”simple_cashier_v2″” -t “”DRIVER=MySQL ODBC 5.1 Driver;SERVER={code:GetIPServer};DATABASE=simple_cashier_v2;UID=root;PWD=yuyayu”””; StatusMsg: “Tunggu sedang membuat DSN-SIMPLE_CASHIER_V2″; Flags: runhidden; Tasks: installodbc
    ;launch program
    Filename: “{app}\{#MyAppExeName}”; Description: “{cm:LaunchProgram,{#StringChange(MyAppName, ‘&’, ‘&&’)}}”; Flags: nowait postinstall skipifsilent

    [Code]
    var
    INIInputPage: TInputQueryWizardPage;

    const
    MaxMySQLODBCVersions = 2;
    MySQLService = ‘MySQL’;

    function IsMySQLExist: Boolean;
    begin
    // cek daftar service yg terinstall ada di
    // HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services

    Result := RegKeyExists(HKEY_LOCAL_MACHINE, ‘SYSTEM\CurrentControlSet\services\’ + MySQLService);
    end;

    function IsMySQLODBCExist: Boolean;
    var
    I: Integer;
    MySQLODBCVersions: array[1..2] of string;
    begin
    // MySQL ODBC 3.51 Driver
    // MySQL ODBC 5.1 Driver

    MySQLODBCVersions[1] := ’3.51′;
    MySQLODBCVersions[2] := ’5.1′;

    Result := False;
    for I := 1 to MaxMySQLODBCVersions do
    begin
    // cek daftar odbc yg terinstall ada di
    // HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI

    Result := RegKeyExists(HKEY_LOCAL_MACHINE, ‘SOFTWARE\ODBC\ODBCINST.INI\MySQL ODBC ‘ + MySQLODBCVersions[I] + ‘ Driver’);
    if Result then
    Break;
    end;
    end;

    function GetMySQLDir: String;
    var
    MySQLDir : string;
    pos1 : integer;
    begin
    RegQueryStringValue(HKEY_LOCAL_MACHINE, ‘SYSTEM\CurrentControlSet\services\MySQL’, ‘ImagePath’, MySQLDir);
    pos1 := Pos(‘\bin\mysqld’, MySQLDir);
    Result := Copy(MySQLDir, 2, pos1 – 2);
    end;

    //set ip

    procedure InitializeWizard();
    begin
    // Input setting
    INIInputPage := CreateInputQueryPage(wpInfoAfter, ‘Konfigurasi’, ‘Konfigurasi Program’,’Isikan konfigurasi program ke dalam form di bawah ini.’);
    INIInputPage.Add(‘IP Address Server’, False);
    INIInputPage.Values[0] := GetPreviousData(‘IPServer’, ‘localhost’);
    end;

    procedure RegisterPreviousData(PreviousDataKey: Integer);
    begin
    SetPreviousData(PreviousDataKey, ‘IPServer’, INIInputPage.Values[0]);
    end;

    function NextButtonClick(CurPageID: Integer): Boolean;
    begin
    Result := True;
    if CurPageID = INIInputPage.ID then begin
    if (Trim(INIInputPage.Values[0]) = ”) then
    begin
    MsgBox(‘Anda harus mengisikan data secara lengkap!’, mbError, MB_OK);
    Result := False;
    end
    else
    begin
    // simpan ip yg diinputkan di registry
    // biar bisa dibaca oleh fungsi GetIPServer
    RegWriteStringValue(HKEY_CURRENT_USER, ‘Software\MyApp\ODBC’, ‘IPServer’, INIInputPage.Values[0]);
    end;
    end;
    end;

    function GetIPServer(Param : string): string;
    var
    IPServer : string;
    begin
    RegQueryStringValue(HKEY_CURRENT_USER, ‘Software\MyApp\ODBC’, ‘IPServer’, IPServer);
    Result := IPServer;
    end;

    function InitializeSetup(): Boolean;
    var
    installDir : string;
    begin
    installDir := GetMySQLDir; // contoh pemanggilan fungsi GetMySQLDir
    MsgBox(installDir, mbInformation, MB_OK);

    Result := True;
    end;

    [UninstallRun]
    Filename: {sys}\net.exe; Parameters: “stop “”MySQL”””; StatusMsg: “Menghentikan Service MySQL …”; Flags: runhidden; MinVersion: 0.0,4.0.1381
    Filename: “{app}\mysql\bin\mysqld.exe”; Parameters: “remove “”MySQL”””; StatusMsg: “Sedang menghapus service MySQL …”; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    ;skrip delete datasoutce
    Filename: “{sys}\myodbc-installer.exe”; Parameters: “-s -r -c1 -n “”simple_cashier_v2″””; StatusMsg: “Tunggu sedang menghapus DSN-ALBASI”; Flags: runhidden
    Filename: “{sys}\myodbc-installer.exe”; Parameters: “-d -r -n “”MySQL ODBC 5.1 Driver”””; StatusMsg: “Tunggu sedang menghapus driver MySQL Connector ODBC 5.1.5″; Flags: runhidden

    [UninstallDelete]
    ;MYSQL FILE
    Type: files; Name: {app}\mysql\bin\*.*
    Type: files; Name: {app}\mysql\Docs\*.*
    Type: files; Name: {app}\mysql\lib\*.*
    Type: files; Name: {app}\mysql\share\*.*
    ;ODBC FILE
    Type: files; Name: {sys}\myodbc5S.dll
    Type: files; Name: {sys}\myodbc5S.lib
    Type: files; Name: {sys}\myodbc5.dll
    Type: files; Name: {sys}\myodbc5.lib
    Type: files; Name: {sys}\myodbc-installer.exe

    [Registry]
    ;SET AUTO RUN
    Root: HKLM; Subkey: “SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\Run”; ValueName: “MYSQL”; ValueType: String; ValueData: {sys}\net.exe; Flags: uninsdeletevalue;Check: not IsMySQLExist; Tasks: installmysql
    ;mencatat lokasi instalasi program, ini dibutuhkan jika kita ingin membuat paket instalasi update
    Root: HKCU; Subkey: “Software\Simple_Cashier_v2″; ValueName: “installDir”; ValueType: String; ValueData: {app}; Flags: uninsdeletevalue

    Makasih gan

  248. August 16, 2012 at 9:34 am | #498

    Ngeriii, jadi malas ngecek skripnya :D
    Yg jelas skrip sy diatas sebelum sy upload sudah sy uji coba dulu di komputer lokal dan berhasil.

  249. ayu
    August 24, 2012 at 11:22 pm | #499

    met malem oommm pemula mw cri wangsit nihhh…. slm knal y omm :) gmna y om jk qt membuat suatu program vb 6 yg di tujukan untuk client-server tp menggunakan database ms. acces apa aja langkah-langkah yg hrus di lakukan agar database bs tersharing untuk banyak client ? dan persiapan aplikasi tambahan apa aja yang mendukung suksesnya sharing database tersebut saat client bisa menginputkan data ke database client. makasih banyak y om

  250. ayu
    August 24, 2012 at 11:28 pm | #500

    maaf om ralat kata-kata td yg terakhir (“mendukung suksesnya sharing database tersebut saat client bisa menginputkan data ke database server”)

    • August 25, 2012 at 7:24 am | #501

      Sebenarnya cukup dua langkah agar database ms. accessnya bisa diakses dari komputer lain.
      1. Database ms accesnya harus dishare terlebih dulu dg mode full (read and write)
      gambar

      2. Pada saat membuka koneksi kedatabase sebutkan ip komputer, folder share dan database ms. accessnya.

      Dim conn        As ADODB.Connection
      Dim ipServer    As String
      Dim folderShare As String
      Dim dbName      As String
      
      ipServer = "192.168.1.1" ' ip server disesuaikan
      folderShare = "Database" ' sesuai gambar di atas
      dbName = "nama_database.mdb"
      
      strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\" & ipServer & "\" & folderShare & "\" & dbName
      Set conn = New ADODB.Connection
      conn.ConnectionString = strCon
      conn.Open
      
  251. ayu
    August 25, 2012 at 8:54 am | #502

    met pagi om :D ,maksih y omm bwt pencerahannya yg semalem…. salam sukses selalu

  252. ayu
    August 25, 2012 at 9:40 pm | #504

    met malem om… mw tnya lg. gni kan kata om

    “Sebenarnya cukup dua langkah agar database ms. accessnya bisa diakses dari komputer lain.
    1. Database ms accesnya harus dishare terlebih dulu dg mode full (read and write)”

    yg mau saya tanyakan adakah cara agar saat database berupa ms acces yg sudah disharing pada client aman tidak bisa dihapus folder sharenya maupun isi(database ms acces) di bagian komputer client yg menerima sharing. apa saja tahapan untuk memproteksinya. trima kasih bnyak sebelumnya om

  253. ayu
    August 25, 2012 at 9:54 pm | #505

    ribet y om nanya nya gni aja dech… gimana Cara Memproteksi Folder Agar Tidak Dapat Dihapus tetapi tetap bisa di akses saat sudah disharing??? tapi dengan catatan posisi data atw folder tetap pada folder share

    • August 25, 2012 at 11:05 pm | #506

      Yg namanya file klo di share dg mode full (read dan write) ya jelas bisa dihapus.

      Nah inilah salah satu kekurangan jika maksain banget menggunakan ms access untuk aplikasi klien server, padahal kan udah banyak database yg bawaannya mendukung klien server misal Firebird, MySQL, Postgresql, SQL Server yg enggak perlu pake acara share2x folder segala.

      Jadi intinya mba punya dua pilihan :
      1. Cara pertanya seperti yg sudah sy jelaskan tanpa merubah kode sedikitpun
      2. Atw cara yg kedua menggunakan Winsock dg cara yg kedua ini folder database tidak perlu dishare, cuma ya… selamat gotong royong utk merubah kode program :D

  254. ayu
    August 26, 2012 at 6:31 am | #507

    slmt pagi… mksh y mas :D bwt infonya..

  255. August 30, 2012 at 11:28 pm | #508

    om jujur neh saya masih bingung banget soal mysql noninstall, maklum masih newbie…saya udah download yg zipnya, versi mysql saya 5.1.41…odbc con 5.1
    nah gmn cara make yg noninstall ntu buat bikin installer program?apa file zip tadi saya extract trus saya copas ke folder master program atau gmn?nah terus untuk script inno yg se detail itu didapat dari mana?apa saya bikin dulu package n deploynya?trus dicari setup.lst ntar dicopas ke inno atau gmn?soalnya baru pertama kali coba pake inno setup…

    Makasi banyak sblmnya…

  256. August 31, 2012 at 12:44 am | #509

    tambahan…untuk databasenya saya bikin melalui phpmyadmin aja, trus saya export menjadi database.sql…nah database hasil export tadi harus saya taruh dimana didalam folder instalasi?

  257. September 13, 2012 at 1:29 pm | #510

    Mas ukuran file mySQL Zip nya 143 Mb, pas di extract jadi 600 Mb, ada sekitar 6000 an file di dalam nya.. tapi kalo saya liat scrift inno yang mas buat ko pendek ya.. mohon pencerahan.. bisa gak mas posting sample untuk instal mySQL nya aja.

  258. September 17, 2012 at 3:58 pm | #511

    gan, krm email dund tutorialnya… masih bingung. klo bisa, sekalian klo databasenya sql server y,,, thx

  259. dewi
    September 27, 2012 at 1:49 pm | #512

    Kak admin saya minta source kode penomoran otomatis reset pertahun…..jadi jika tahun berganti no transaksi kembali ke awal : 00001 tapi pake adodc.. saya nyerah ga bisa kalo tiap tahun harus kembali ke no awal
    ini code saya:

    Adodc1.RecordSource = “select trans_rr5.no_trans from trans_rr5 where year(tahun)=’” & Year(Now) & “‘and no_trans GROUP BY trans_rr5.no_trans”
    Adodc1.Refresh
    Adodc1.Refresh
    If Adodc1.Recordset.EOF Then
    Text1.Text = “” & “00001″
    Else
    Adodc1.Recordset.MoveLast
    noint = Val(Right(Adodc1.Recordset.Fields(“no_trans”), 5)) + 1
    Select Case noint
    Case 0 To 9
    Text1.Text = “” & “0000″ & (Trim(Str(noint)))
    Case 10 To 99
    Text1.Text = “” & “000″ & (Trim(Str(noint)))
    Case 100 To 999
    Text1.Text = “” & “00″ & (Trim(Str(noint)))
    Case 1000 To 9999
    Text1.Text = “” & “0″ & (Trim(Str(noint)))
    Case 10000 To 99999
    Text1.Text = “” & (Trim(Str(noint)))
    End Select
    End If

  260. November 18, 2012 at 4:58 am | #513

    bang admin bikin tutorny cara buat paket instalasi c# + mysql ODBC + Crystal reportnya dengan inno setup, ane pake visual studio 2008

  261. Ogun
    November 20, 2012 at 4:36 pm | #514

    bos saya bisa mnta software inno yang bisa bahasa indonesia g?yang buat compiler:Indonesian.isl..
    saya cari2 tp g nemu software yang bisa bahasa indonesia..
    mksh sbelumnya mas..

  262. November 22, 2012 at 3:31 pm | #515

    mas kalo port mysqlnya gak default gimana mas

  263. November 26, 2012 at 10:06 pm | #516

    bang admin Seting DSN ODBC di windows7 x64 dengan inno setup tidak bisa gimana ?

  264. December 30, 2012 at 12:25 pm | #517

    Bos, klo access denied for user ‘root’@’localhost’ karena sudah ada mysql berpassword dr software lain. gmana solusinya? solusi di innosetup gimana?

    • January 2, 2013 at 10:52 am | #518

      Direset aja om passwordnya, coba pelajari dulu manualnya disini.

      • January 2, 2013 at 6:20 pm | #519

        Makasih, bos pencerahannya. tp itu cara manual jadinya. gimana klo lewat coding vb6? Kayanya repot juga klo harus reset mysql punya orang.

        ceritanya begini, sy mo instal aplikasi saya, tp di komp user dah ada software lain yg pake mysql. dan mysqlnya dipassword. dan mysqlnya ada difolder berbeda. klo passwordnya sy reset kuatir software yg dah ada ga bisa akses databasenya (ga begitu ya, bos?)

        sy dah coba pake 2 database mysql, yg satu user rootnya dipassword, trus tambahin user n database kosong, aplikasi sy bisa akses. sy kuatir klo software yg lain pake user root. klo sy ganti, ntar user ga bisa akses software itu.

        seandainya sy mo konversi/copy database mysql ke sqlite, bisa ga bos lewat vb6?
        tolong pencerahannya, bos. biar tenang dunia akhirat.

        Terima kasih banyak atas semua10x postingannya.

        • January 3, 2013 at 8:38 am | #520

          Untuk solusi kasus pertama mungkin om bisa install MySqlnya om sendiri, tanpa menggangu MySQL yang sudah terinstall tentunya dengan nama service dan port yang berbeda, untuk referensi om bisa baca artikel Running Multiple MySQL Instances on One Machine

          Klo kasus yang kedua kayaxnya enggak perlu coding juga bisa tergantung kondisi database yg mau dikonversi, klo tabel sedikit mendingan langsung buat ulang aja di SQLitenya tapi klo banyak sy biasanya memanfaatkan fasilitas ODBC yg sudah tersedia di Windows.

          • Joe
            January 4, 2013 at 11:42 am | #521

            Mas Admin, Untuk Kasus pertama ada contohnya gak? tq sebelumnya… Salam Kenal

            • January 4, 2013 at 12:41 pm | #522

              Bukannya udah saya kasih linknya, tinggal di coba dulu apa susahnya ?
              Klo nunggu saya yg nyoba entar kelamaan.

  265. yuli
    December 31, 2012 at 5:20 pm | #523

    assalamualikum…..
    ketemu lagi om mau nanya nih, gimana caranya memproteksi file exe yang dibuat dengan vb6 agar tidak bisa didecompile
    makasih sebelumnya..

  266. gemaldi
    January 3, 2013 at 7:35 pm | #527

    slamt malam mas mau tanya
    ketika package inoo sudah jadi ketika saya instal di kmputer lain
    ada peringatan “error message :[Microsoft][ODBC Driver manager] data source name not found and no default driver spesified”
    knapa ya mas?/?mohon pencerahanya
    thanks before

    • January 3, 2013 at 9:50 pm | #528

      Mungkin MySql Connector/ODBC belum terinstall om.

  267. gemaldi
    January 4, 2013 at 7:00 am | #529

    mksudnya mysql conectornya di instal dulu di computer lain ap gimana mas??saya coba di lptop yg saya pakai buat bikin program itu jga klo ga d aktifin xamppnya ga mau conect k dtbase nya mas
    ap d komputer yg mau saya instalkan program ini mesti saya instal xampp dulu??

  268. January 4, 2013 at 8:52 am | #530

    Rinciannya seperti ini om :
    1. Komputer server, cukup diinstall MySQL
    2. Komputer klien yg perlu diinstall runtime aplikasi + Library (dll, ocx) + odbc

    Nah pertanyaannya om buat setupan utk yg mana ?

  269. January 13, 2013 at 5:26 pm | #531

    Nanya lagi nih, bos (Nanya mulu). Klo bikin saldo bwt laporan keuangan di crystal report gimana ya? Biar ada lap saldo di tiap baris.

    Misal:
    No. Uraian Debet Kredit Saldo
    1 dana masuk 5.000 – 5.000
    2. Beli kopi – 2.000 3.000
    3. Beli gula – 1.000 2.000

    biar kaya gitu, bos. Pencerahannya, bos?
    Terima kasih banyak sebelumnya karena dah share segunung ilmu.

    • January 14, 2013 at 9:24 am | #532

      Sy belum pernah pake CR om jadi belum bisa bantu.

  270. January 15, 2013 at 12:19 am | #533

    bos saya minta tlong dunk..
    saya lagi buat program perpustakaan untuk tugas akhir pke vb6.
    kasusnya gini bos untuk perhitungan denda keterlambatan..
    khusus hari minggu keterlambatan tidak dihitung
    jadi klo misalnya pengembalian buku terlambat 2 minggu otomatis dalam 2 minggu itu ada 2 hari minggu nah yang 2 hari itu tidak dihitung..mohon bantuanya bos klo bisa ksh source code maklum bos saya masih orang awam..terima kasih sebelumnya.

    • January 15, 2013 at 9:13 am | #534

      Untuk hari libur sebaiknya disimpan di tabel tersendiri, coba pelajari dulu postingan saya yang disini.

      • January 15, 2013 at 9:55 am | #535

        g bisa ya bos tanpa perlu disimpan ditabel?
        klo sistem secara otomatis baca tanggal khusus hari minggu bisa g biar lebih efisien gitu kn yang diambil cuma khusus hari minggu..
        klo harus simpan tanggal yang hari minggu satu persatu kayaknya ribet..hehehhe..
        mksh bos ilmunya.saya banyak belajar dari anda..
        saya sering lihat-lihat refensi dari blog anda.

        • January 15, 2013 at 10:15 am | #536

          Bukan masalah ribet om, tujuannya untuk pengembangan lebih lanjut, klo ada hari libur selain hari minggu gimana ? Misal hari libur nasional masa’ enggak masuk hitungan.

          Dan sebenarnya dipostingan saya yang disini, sudah ada kode untuk mengetahu tanggal khusus hari minggu, tapi gpp sy positing aja lagi disini

          Option Explicit
          
          Private Function getJumlahHariByBulan(ByVal bulan As Integer, ByVal tahun As Long) As Integer
              getJumlahHariByBulan = Day(DateSerial(tahun, bulan + 1, 0))
          End Function
          
          Private Function getFirstSunday() As Integer
              Dim firstDay As String
          
              firstDay = Year(Now) & "/" & Month(Now) & "/1"
              firstDay = Weekday(firstDay)
              If Val(firstDay) > 1 Then
                  getFirstSunday = 9 - Val(firstDay)
              Else
                  getFirstSunday = Val(firstDay)
              End If
          End Function
          
          Private Sub Command1_Click()
              Dim i           As Integer
              Dim firstDay    As Integer
              Dim tgl         As String
          
              firstDay = getFirstSunday 'ambil tgl hari minggu pertama
              For i = firstDay To getJumlahHariByBulan(Month(Now), Year(Now)) Step 7
                  tgl = Year(Now) & "/" & Month(Now) & "/" & i
          
                  Debug.Print tgl ' hari minggu
              Next
          End Sub
          
          • January 15, 2013 at 10:25 am | #537

            makasih bos dah membantu..
            saya ijin sedot referensi Inno bos..

            • January 15, 2013 at 11:48 am | #538

              Oke om, silahkan :)

              • January 15, 2013 at 12:46 pm | #539

                wah salut q ma blog ini..smua pertanyaan slalu dijawab dengan ikhlas dan masuk akal g kyak blog lain..

  271. January 17, 2013 at 3:17 pm | #540

    selamat sore bos maaf ganggu lg..hehehhe
    mksh bos untuk perhitungan hari libur dh sukses.
    saya mw nanya lg ni bos tentang grafik menggunakan mschart…gpa2 ya.hihhiihhi
    saya ingin menampilkan grafik pengunjung perpustakaan stiap tahun atau stiap bulan berdasarkan keperluan diantaranya:keperluan=’Membaca’,Keperluan=’Meminjam’,Keperluan=’Mengembalikan’.
    saya dh coba buat tp msh error..
    ini scrip yg saya buat
    ===================================================
    Set rsKunjungan = New ADODB.
    StrSql = “select Str(tgl) as Tahun,sum(keperluan=’membaca’) as Membaca,sum(keperluan=’Meminjam’) as Meminjam,sum(keperluan=’mengembalikan’) as Mengembalikan from kunjungan ” & _
    “group by tgl ” & _
    “order by tgl;”
    rsKunjungan.Open StrSql, ConData, adOpenStatic, adLockOptimistic
    GrafikKunjungan.Refresh
    Set GrafikKunjungan.DataSource = rsKunjungan
    ======================
    Str nya tidak dapat di baca mysql.
    kira-kira solusinya gmn bos?
    mohon bantuanya…mkasih

    • January 19, 2013 at 10:05 am | #541

      Emg isi dari tabel kunjungan itu seperti apa om ?

      • January 20, 2013 at 1:05 am | #542

        tabel kunjungan
        ================
        field :
        kd_kunjungan
        tgl
        jam
        no_anggota
        keperluan.
        ============
        keperluan ada 3 jenis yaitu membaca, meminjam, mengembalikan.
        misalkan q mw melihat grafik yang berkunjung setiap tahun. yg membaca brapa, meminjam brapa, mengembalikan brapa.

        • January 20, 2013 at 4:19 pm | #543

          Coba om query ini dites dulu

          SELECT keperluan, COUNT(*)
          FROM kunjungan
          GROUP BY keperluan
          

          Klo hasilnya sesuai yg diinginkan baru dimasukkan ke kode program.

          • January 21, 2013 at 1:30 am | #544

            q dh coba pake koding ini bos tapi hasilnya kq g sesuai ya..
            =================================================
            Set rsKunjungan = New ADODB.Recordset
            StrSql = “select year(tgl),sum(keperluan=’Membaca’) as Membaca,sum(keperluan=’Meminjam’) as Meminjam,sum(keperluan=’Mengembalikan’) as Mengembalikan from kunjungan ” & _
            “group by year(tgl) ” & _
            “order by year(tgl);”
            rsKunjungan.Open StrSql, ConData, adOpenStatic, adLockOptimistic
            Set GrafikKunjungan.DataSource = rsKunjungan
            =================================================
            q pengenya keterangan C1 dan seterunya yg di kanan grafik itu jenis keperluannya.
            sedangkan keterangan R1 dan seterunya yg di bawah grafik itu untuk tahun berdasarkan group by…

            q dh coba query yg diatas di mysql hasilnya sesuai tp klo di vbnya hasilnya beda..
            mohon bantuanya om..

            • January 21, 2013 at 9:39 am | #545

              Coba posingan saya yg disini aja om, soalnya saya belum pernah make komponen grafik bawaan VB.

  272. vian
    January 18, 2013 at 4:32 pm | #546

    om kamar82 gimana cara nya nentuin port mysql dan port untuk odbc. soalnya saya ingin port mysql nya 3307 otomatis odbc nya juga menyesuaiankan dengan 3307

    • January 19, 2013 at 8:07 pm | #547

      Oke om, berikut contoh skrip innonya masih berdasarkan sample diatas.

      1. Tambahan skrip di section INI

      [INI]
      ; skrip baru
      Filename: {app}\mysql\my.ini; Section: mysqld; Key: port; String: "3307"; Tasks: installmysql
      Filename: {app}\mysql\my.ini; Section: client; Key: port; String: "3307"; Tasks: installmysql
      

      2. Section RUN

      [Run]
      ;revisi mendaftar port 3307
      Filename: "{sys}\netsh.exe"; Parameters: "firewall add portopening TCP 3307 ""Port MySQL"""; StatusMsg: "Sedang mendaftarkan port MySQL ..."; Flags: runhidden; MinVersion: 0,5.01.2600sp2
      
      ;ada tambahan atribut port
      Filename: "{sys}\myodbc-installer.exe"; Parameters: "-s -a -c1 -n ""dsn-albasi"" -t ""DRIVER=MySQL ODBC 5.1 Driver;SERVER=127.0.0.1;DATABASE=albasi;UID=root;PWD=masterkey;port=3307"""; StatusMsg: "Tunggu sedang membuat DSN-ALBASI"; Flags: runhidden
      
      • vian
        January 21, 2013 at 11:21 am | #548

        Cakep om, rupanya client juga perlu di tambahkan ya. Terima kasih om kamar82.

  273. vian
    January 21, 2013 at 12:57 pm | #549

    om kamar82 ane ada pertanyaan lagi, ketika ane mau lihat report kok muncul error dan ini errornya “run-time error 20532 cannot find database dll” dan ane munggunakan crystal report 8.5

    • January 21, 2013 at 2:21 pm | #550

      Mungkin ada library CRnya belum dicopykan ke komputer klien om.

      • vian
        January 21, 2013 at 2:48 pm | #551

        nah itu dia om mungkin om kamar82 punya referensi library apa aja yang di butuhkan CR 8.5. Soalnya berguru ke mbah google gak di kasih-kasih om soalnya alias gk ketemu-ketemu he. .he. ..

        • January 21, 2013 at 3:07 pm | #552

          Coba cek pertanyaan ke #436 diatas om, cara lainnya bisa om cek di komentar #322 poin ke satu

  274. January 21, 2013 at 3:22 pm | #553

    bos tu componentone link downloadnya kq g bisa ya?

  275. vian
    January 22, 2013 at 9:05 am | #554

    om klo muncul pesan di inno setup , ini pesan nya “Unsafe file detected” kira2 kenapa ya om

  276. January 22, 2013 at 10:35 am | #556

    berarti conector ODBC nya juga harus di include nya. mungkin logikanya sama dengan menggunakan setup bawaan vb.net. atau gimna?
    mohon penjelasannya.
    thank sblumnya.

    • January 22, 2013 at 11:29 am | #557

      Lah iya connector ODBCnya juga harus diikutkan secara manual

  277. January 22, 2013 at 10:38 am | #558

    oya satu lagi mau tanya. saya menggunakan myssql yg ada di XAMPP dan connector ODBC 5.1 dan vb.net, low cara mengambil databasenya dengan cara databasenya di export (database hasil export di gunakan untuk setup)bisa gk ya?

    • January 22, 2013 at 11:32 am | #559

      Bisa coba cek lagi sample skrip inno saya diatas, kan didalamnya ada proses untuk melakukan proses undump file sqlnya.

      • vian
        January 22, 2013 at 12:37 pm | #560

        terima kasih om kamar82, alhamdulilah crystal report sdh bisa tampil

      • January 28, 2013 at 2:47 pm | #562

        ia mkasih gan, saya kembali lagi ke innosetup yang dulu sempet di coba2 tp gagal terus. sya berfikir langkahnya sama ja kan vb6 dan vb.net juga dalam pembuatan setup installer nya. mohon bimbingannya

        • February 2, 2013 at 9:15 am | #563

          Iya om saja klo utk vb6 kan langkah-langkahnya lebih kurang seperti komentar sy diatas nomor #322.
          Untuk VB .net sendiri di section File lokasi file-file yang dipaketkan tinggal diarahkan ke folder bin/debug atau bin/release

      • January 28, 2013 at 2:59 pm | #564

        ini teh aplikasi my sql kan “mysqld.exe” atau apa?

      • January 28, 2013 at 3:03 pm | #565

        ber arti low pake XAMPP gmnya? atau XAMPP nya ja di ikutin atau cuman mysqlnya ja???

        • February 2, 2013 at 9:47 am | #566

          Kan gini om, isi dari XAMPP itu kan ada Apache web server, MySQL, PHP and Perl.

          Jadi klo yg dibutuhkan cuma MySQL kenapa harus report2x menginstall XAMPP segala ??

          MySQL sendirikan kan ada 2 versi :
          1. Versi installer
          2. Versi archive atau istilah lainnya adalah versi noninstall

          Klo versi yg pertama kan modenya wizard tinggal klik2x selesai sehingga agak susah klo diikutsertakan sertakan di dalam paket aplikasi kita, makanya dipostingan diatas saya menggunakan versi yg kedua sehingga lebih fleksibel untuk dikonfigurasi secara manual pada saat instalasi.

          Sekali lagi kenapa harus install XAMPP klo yg dibutuhkan hanya MySQL ?

  278. January 23, 2013 at 2:43 pm | #567

    bos saya mw tanya untuk membuat instalan untuk client ma server kira” sama g?

  279. January 24, 2013 at 4:38 pm | #568

    Beda isi aja sih om, klo sy sih gini aja om, misal database yg digunakan adalah MySql :
    1. Paket klien = Aplikasi + MySql ODBC
    2. Paket server = Aplikasi + MySql ODBC + Database MySql

  280. January 24, 2013 at 5:02 pm | #569

    ok om mksh infonya..
    q mw nanya skali lg neh om
    mslah grafik yg kemarin q tanya tuh tahunnya g mw tampil karna bukan string
    yg q tanyakan gmn cranya format tanggal yg dh trsimpan di database mysql di vb
    jd nanti buat grafiknya tanggal itu menjadi string..
    querynya ni bos
    ===================================================================
    Set rsKunjungan = New ADODB.Recordset
    StrSql = “select tgl,sum(keperluan=’membaca’) as Membaca,sum(keperluan=’meminjam’) as Meminjam,sum(keperluan=’mengembalikan’) as Mengembalikan from kunjungan ” & _
    “group by tgl ” & _
    “order by tgl;”
    rsKunjungan.Open StrSql, ConData, adOpenStatic, adLockOptimistic
    Set Grafikkunjungan.DataSource = rsKunjungan
    ===================================================================
    nanti tgl itu dijadikan string di querynya itu.
    mohon bantuanya bos..klo bsa ksh contoh source codenya..
    mksh sebelumnya bos.

  281. January 28, 2013 at 10:04 am | #570

    mf om mw tanya..klo Uninstall folder yg kita instal gmn caranya?
    contohnya c:\program files\perpustakaan..nanti klo diUninstall folder perpustakaan jg ikut kehapus.
    trus klo Uninstall komponen” yg dh dinstal biar kehapus jg gmn caranya?
    q msh lom ngerti mksdnya ni “*.*” di [UninstallDelete].
    mohon pencerahan om.

  282. January 30, 2013 at 9:52 pm | #571

    mf bos mw ganggu lg neh..mksh bos kasus yg kemarin dh sukses tinggal 1 lg yg belum untuk inno,,q buat koding kyak gni di inno
    =========================================
    ;mengganti password default root (blank). ex : masterkey
    Filename: “{app}\mysql\bin\mysqladmin.exe”; Parameters: “-uroot password ogun”; StatusMsg: “Mengganti password root”; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    ;menghapus user default1 (user=blank, password=blank) 20
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pogun -e “”DELETE FROM mysql.user WHERE Host=’localhost’ AND User=””””; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pogun -e “”FLUSH PRIVILEGES”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    ;menghapus user default2 (user=root, password=blank)
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pogun -e “”DELETE FROM mysql.user WHERE Host=’127.0.0.1′ AND User=’root’”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pogun -e “”FLUSH PRIVILEGES”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2

    ;set agar user root bisa login dari mesin lain (kalo diperlukan)
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pogun -e “”GRANT ALL PRIVILEGES ON *.* TO root@’%’ IDENTIFIED BY ‘ogun’”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    Filename: “{app}\mysql\bin\mysql.exe”; Parameters: “-uroot -pogun -e “”FLUSH PRIVILEGES”””; Flags: runhidden; MinVersion: 0,5.01.2600sp2
    =================================================
    kenapa klo q login dri client g bsa konek ke server klo pke password?
    tp klo q reset passwordnya dari server client bisa konek ke server.
    mungkin ada solusinya klo ada yg salah dengan koding diatas tlong dibenerin?
    mkasih.

    • February 2, 2013 at 10:20 am | #572

      Klo ngeliat dari scriptnya sih udah benar om, emg kode yg om pake utk koneksi dari klien ke server seperti apa ?

  283. February 2, 2013 at 10:39 am | #573

    q menggunakan [file.ini] ommm .
    seperti yg om buat itu…
    yang isinya..
    server, user, password, database sesuai yang ada dikomputer server..

    • February 2, 2013 at 12:39 pm | #574

      Klo skrip yg menghapus user default1 dan 2 jalan enggak om ?

  284. February 2, 2013 at 3:18 pm | #575

    jalan om..masalahnya klo pake password g bisa diakses dri client tp klo q jlanin di server passwordnya bsa di akses..q buat koding di inno kyak yg di coment #571..
    kira” yg bermasalah apanya yo bos?
    klo ada solusi tlong dishering ya..hehhehhe

    • February 3, 2013 at 2:37 pm | #576

      Gini aja om, coba cek isi dari table user yg ada di dalam database mysql trus dipaste kesini.

  285. sugiono
    February 6, 2013 at 4:00 am | #577

    selamat pagi gan. sori ganggu waktu tidurnya heheheh

    saya dah coba membuat paket instalasi dan instalnya, alhamdulillah berhasil,
    cuman ketika di jalankan tidak dapat akses database gan.
    mohon pencerahanya gan.

    • February 6, 2013 at 10:37 am | #578

      Coba dites manual menggunakan tool mysql untuk melakukan koneksi ke databasenya

  286. sugiono
    February 6, 2013 at 3:32 pm | #579

    gan kalau mysqlnya sudah ada di pc saya ko’ error dia nya gan…

    mohon pencerahanya….

  287. February 6, 2013 at 4:43 pm | #580

    Ya makanya dicek dulu sudah ada MySql yg terinstall atau belum, klo belum ada baru diinstall MySqlnya.

    Nah bagaimana melakukan pengecekan MySqlnya om bisa cek komentar #263 di atas.

  288. February 6, 2013 at 11:43 pm | #581

    Bang mau tanya dung. klo mau bkin koneksi pake ODBC DSN, input Alamat servernya di input pke textbox. di ketik waktu mau login aplikasi. kira2 bisa ga bang.
    maksih sebelumnya.

    • February 7, 2013 at 9:48 am | #582

      Ya jelas bisa, coba sy mau lihat kode koneksi om seperti apa ?

  289. February 8, 2013 at 11:15 am | #583

    Gini bang, saya membuat aplikasi client – server, bagian client mengambil data menggunakan System DSN degan connector ODBC. saya pingin buat nama koneksinya pas waktu penginstallan. klo dri coding atas yg om buat servernya di kasih di localhost(127.0.0.1), sedangkan database saya ga di localhost. ada di server dengan IP server belum di ketahui. Kira2 caranya gmna om, biar bisa buat koneksi System DSN dengan IP bsa di masukin pas melakukan Install aplikasi. tolong bnget pencerahanya omm, udah puyeng ini… :(

    • February 8, 2013 at 2:50 pm | #584

      Untuk membuat DSN secara manual pada saat instalasi kita bisa memanfaatkan tool myodbc-installer.exe yang sudah disertakan pada saat kita menginstall MySQL Connector ODBC, jadi pada section File, file ini harus disertakan.

      [Files]
      ;daftar file MySQL ODBC 5.1
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.dll"; DestDir: {sys}; Flags: onlyifdoesntexist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.dll"; DestDir: {sys}; Flags: onlyifdoesntexist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5.lib"; DestDir: {sys}; Flags: onlyifdoesntexist
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc5S.lib"; DestDir: {sys}; Flags: onlyifdoesntexist
      ; file myodbc-installer.exe digunakan untuk membuat DSN
      Source: "C:\Program Files\MySQL\Connector ODBC 5.1\myodbc-installer.exe"; DestDir: {sys}; Flags: onlyifdoesntexist
      

      Kemudian jangan lupa di section Run kita jalankan file myodbc-installer.exe untuk mendaftarkan MySQL ODBC Driver

      [Run]
      ;install MySQL ODBC Driver
      Filename: "{sys}\myodbc-installer.exe"; Parameters: "-d -a -n ""MySQL ODBC 5.1 Driver"" -t ""DRIVER=myodbc5.dll;SETUP=myodbc5S.dll"""; StatusMsg: "Tunggu sedang mendaftarkan driver MySQL Connector ODBC 5.1.5"; Flags: runhidden
      

      Terakhir di section Code kita tambahkan Input pada saat instalasi, di section ini juga kita mengeksekusi file myodbc-installer.exe.

      [Code]
      var
         INIInputPage: TInputQueryWizardPage;
      
      procedure InitializeWizard();
      begin
        // Form Input
        INIInputPage := CreateInputQueryPage(wpInfoAfter, 'Konfigurasi', 'Konfigurasi Program.',
                                             'Isikan konfigurasi program ke dalam form di bawah ini.');
      
        INIInputPage.Add('IP Server', False);
        INIInputPage.Values[0] := GetPreviousData('IPServer', '');
      end;
      
      // prosedur ketika user mengklik tombol kembali, setelah pengisian form
      procedure RegisterPreviousData(PreviousDataKey: Integer);
      begin
        // tampilkan nilai sebelumnya yang sudah diinputkan user
        SetPreviousData(PreviousDataKey, 'IPServer', INIInputPage.Values[0]);
      end;
      
      // prosedur ketika user mengklik tombol lanjut, setelah pengisian form
      function NextButtonClick(CurPageID: Integer): Boolean;
      var
        fileName, param : string;
        dbServer, dbUser, dbPass, dbName, dsnName : string;
        resultCode : integer;
      begin
        Result := True;
        if CurPageID = INIInputPage.ID then
        begin
          if (Trim(INIInputPage.Values[0]) = '') then
          begin
             MsgBox('Maaf informasi ip server harus diisikan!', mbError, MB_OK);
             Result := False;
          end
          else
          begin
            dbServer := INIInputPage.Values[0]; // diinput secara manual
            dbUser := 'user mysql';
            dbPass := 'password mysql';
            dbName := 'nama database';
            dsnName := 'nama DSN';
            
            fileName := 'myodbc-installer.exe';
            param := '-s -a -c1 -n ' + dsnName + ' -t ' + AddQuotes('DRIVER=MySQL ODBC 5.1 Driver;SERVER=' + dbServer + ';DATABASE=' + dbName + ';UID=' + dbUser + ';PWD=' + dbPass);
      
            if FileExists(ExpandConstant('{sys}\' + fileName))then
            begin
              if Exec(ExpandConstant('{sys}\' + fileName), param, '', SW_HIDE, ewWaitUntilTerminated, resultCode) then
              begin
                if not (ResultCode = 0) then
                begin
                    MsgBox('Gagal membuat DSN ' + dsnName, mbError, MB_OK);
                end
              end
            end
          end
        end
      end;
      

      Selamat mencoba :)

  290. vian
    February 12, 2013 at 3:53 pm | #585

    om kamar kenapa service mysql tidak bisa running ya, memang ada ocx/dll yang tidak bisa di register. Berikut filenya advapi32.dll, P2smon.dll, p2soledb.dll. Apakah di karenakan file yang saya sebutkan tadi ya. Terima kasih

    • February 13, 2013 at 8:37 am | #586

      File2x yg om sebutkan di atas enggak ada hubungannya om dg MySql

  291. vian
    February 13, 2013 at 4:30 pm | #587

    iya om terima kasih, ternyata file mysql yang uninstal nya corupt ketika compile di inno setup. Setelah pake yang baru kemudian di compile lagi masalah tidak terjadi lagi.

  292. February 13, 2013 at 5:23 pm | #588

    oke om sipp

  293. vian
    February 21, 2013 at 4:28 pm | #589

    om kalau mysql yang sdh terinstal rusak ato corrupt bagaimana cara memperbaikinya om. Misal kalau kita instalnya pake .msi kan gampang tinggal di repair. Nah sedang ini pake yang uninstaler bagaimana om script yang di tambah kan di inno setup nya. Terima Kasih.

    • February 21, 2013 at 5:47 pm | #590

      Klo langsung ditimpa aja gimana om ?
      Udah d coba blm ?

  294. vian
    February 22, 2013 at 1:25 pm | #591

    om jika service mysql tidak bisa running atau corupt dan tidak bisa jalan meskipun di start di service, bagaimana caranya membuat repair di inno setup nya karena kita memakai mysql uninstaler. Karena kalau memakai mysql instaler kita tinggal repair aja. Terima Kasih

  295. vian
    February 22, 2013 at 1:30 pm | #592

    maaf om pertanyaan #591 tidak perlu di tanggapi karena sama. Kalau kita ingin timpa berarti kira harus instal ulang sedangkan inno setupnya sudah di set agar kalau program sudah terinstal maka harus uninstal dulu sedang yang bermasalah cuma mysql nya saja.Terima Kasih

    • February 22, 2013 at 2:15 pm | #593

      Emg harus ribet seperti ini ya om ?
      Trus skenario yg om inginkan seperti apa ?
      Sy bantu coding aja deh :D

      Lagian kok bisa sih MySqlnya sampe corupt segala, biasanya yg corupt itukan databasenya.

  296. February 22, 2013 at 4:08 pm | #594

    Makasih Om jawabanya, saya coba dulu yah..
    meskipun masih bingung2 ria.. hhe ^^

  297. vian
    February 23, 2013 at 8:41 am | #596

    intinya om bagaimana cara repair mysql tanpa harus mengunistal aplikasi yang sudah terinstal. Terima Kasih.

    • February 23, 2013 at 9:16 am | #597

      Dari referensi yg ada katanya bisa pake tool MySQL Server Instance Config Wizard.

  298. February 26, 2013 at 6:11 am | #598

    lha yang pake sqlserver gimana ya bang

  299. February 26, 2013 at 6:13 am | #600

    Bang mau tanya lo ane mau bikin setup pake inno tapi ane makenya vb6, sqlserver dan cristalreport 8.5 ..apa aj yang dibtuhkan bang. syukron

  300. February 26, 2013 at 9:57 am | #601

    Ane enggak salah denger nih om ? VB 6 ? Mau jungkir balik po ? :P

    Yg dibutuhkan :

    1. File programnya yg dibuat pake VB 6 + library (ocx atau dll)
    2. SQL Servernya
    3. CR
    4. Inno Setup
    :D

  301. Sedengan
    March 6, 2013 at 8:21 am | #602

    Mas, mungkin saya telat. Tapi biar lengkap, tolong buat tutorial “membuat paket instalasi vb6 + ms accsess dengan inno setup. Bagaimanapun juga dapat bermanfaat, apalagi saya seringnya pake ms access. Ditunggu…..

    Thank’s….

    • March 16, 2013 at 4:30 pm | #603

      File database accessnya diperlakukan seperti file biasa aja om. Contoh :
      Misal klo target path database om satu folder dg aplikasi kodenya seperti berikut :

      [Files]
      Source: "FILE_ACCESS.MDB"; DestDir: {app}; Flags: onlyifdoesntexist

  302. March 6, 2013 at 11:11 am | #604

    Mas admin mau tanya soal codejock. saya udah buat paket instalasi pake inno file ocx ama lisensinya udah saya masukin. trus ketika di install di koputer lain bsa. tpi waktu dirun ada pesan error missing Codejo~1.OCX, padahal saya ga pake ocx itu.
    kira2 ini yang salah apa yah? mohon pencerahanya dung mas admin. ^^

  303. Iyon
    March 22, 2013 at 10:11 am | #605

    mas, setelah dibuat setup pake inno trus dijalanin. muncul “runtime error 429 you do not have an appropriate license to use this functionality” diamana error itu muncul saat saya klik slah satu form transaksi (ada komponen osenxpsuite2006), apakah berpengaruh komponen itu dan gmn solusinya.

    • March 22, 2013 at 3:41 pm | #606

      Sy enggak pernah make komponen osenxpsuite jadi enggak tau apakah perlu ada lisensi yg perlu diikutsertakan pada saat instalasi.

      Yg jelas setau sy lisensi komponen itu cuma diperlukan pada saat devlop, jadi waktu kita didistribusikan ke komputer lain lisensinya sudah tidak diperlukan lagi.

  304. aru
    April 5, 2013 at 12:10 am | #607

    mas mau nanya,,
    konektor mysql nya sy pake mysql connector net, ini sudah sy include dalam reference di program vb(2010) yg sy buat. apa masih perlu di masukkan dalam script inno setup?
    makasih. :D

    • April 10, 2013 at 4:10 pm | #608

      Enggak perlu om, kan library connecton .netnya secara otomatis sudah dicopykan ke folder bin\debug atau bin\release

      Jadi yg perlu didistribusikan cukup file2x yg ada di folder bin\debug atau bin\release + .NET framework sudah terinstall di komputer target

  305. dhan
    April 9, 2013 at 1:51 pm | #609

    mas admin saya mau tanya lagi nich,,,

    cara update isi field query gimana,,
    saya coba dengan perintah update hasl nya ngak sesuai dg yg di ingin kan

    di tabel ada filed nomor,nama,status
    saya mau update field nomor dengan menambahkan “.1″ pada di belakang dari field nomor tsb..

    nomor hasil yg di inginkan
    132.1.99999 132.1.99999.1

    tapi di hail query yg saya bukin jadi nya 132.1

    query yg saya bikin kayak gini
    ” update mutasi set nomor=nomor+’.1′ ”
    mohon pencerahannya

    • April 10, 2013 at 4:01 pm | #610

      Harusnya sih udah benar om, emg pake database apa ?

      Coba dulu query ini, hasil gimana ?

      SELECT nomor, nomor + '.1' AS nomor 2 FROM tabel_xx
      
  306. sugiono
    April 10, 2013 at 12:36 pm | #611

    mas admin saya mau tanya nih
    kalu instalasi visual basic dan mysqlnya di pisahkan jadi 2 paket instalan bisa tidak?????

    • April 10, 2013 at 3:52 pm | #612

      Ya jelas bisa om, dari sample skrip di ataskan udah terlihat mana2x kode yg dibutuhkan untuk aplikasi VB dan MySQLnya

  307. April 27, 2013 at 11:47 pm | #613

    Permisi om, salam kenal. Saya mau tanya…
    1. Apakah mysql servernya itu ditaruh se-folder dengan program vbnya?

    2. Untuk koneksi dari program vb ke mysql saya tidak menggunakan mysql connector, saya cuma ambil dll yang Mysql.Data saja. Sampai sekarang saya coba dikomputer lain (belum dalam bentuk installer, masih portable exe dan dll yang se-folder). Tapi apakah tetap bisa bila dibundle menjadi installer tapi tanpa mysql connector?

    3. Saya download mysql server versi no install kok sizenya 100MB lebih ya? Apakah betul?

    4. Dari pertanyaan nomor 3, apakah tidak membuat bengkak size installer? Karena saya usahakan agar user tidak download file program saya dengan size yang 100MB lebih.

    Tolong bantuannya om, terimakasih banyak sebelumnya :)

    • April 30, 2013 at 9:41 am | #614

      Apakah mysql servernya itu ditaruh se-folder dengan program vbnya?

      Klo ini sih terserah om mau satu folder atau enggak

      Untuk koneksi dari program vb ke mysql saya tidak menggunakan mysql connector, saya cuma ambil dll yang Mysql.Data saja. Sampai sekarang saya coba dikomputer lain (belum dalam bentuk installer, masih portable exe dan dll yang se-folder). Tapi apakah tetap bisa bila dibundle menjadi installer tapi tanpa mysql connector?

      Klo menggunakan VB 6 memang membutuhkan MySQL Connector tp klo pake VB .NET atau C# cukup menggunakan file MySql.Data.dll yg sudah kita tambahkan di bagian project -> references

      Yg jelas tetap bisa di jadikan installer

      Saya download mysql server versi no install kok sizenya 100MB lebih ya? Apakah betul?

      Iya betul, tapi nanti setelah dijadikan package biasanya langsung di kompress sehingga ukuran filenya sedikit berkurang.

      Dari pertanyaan nomor 3, apakah tidak membuat bengkak size installer? Karena saya usahakan agar user tidak download file program saya dengan size yang 100MB lebih.

      Ya itu resiko om menggunakan database MySQL, ukuran versi2x terakhirkan memang seperti itu, atau cukup buat installer aplikasi saja trus untuk MySQL langsung di arahkan untuk download di web resminya MySQL.

  308. May 7, 2013 at 12:06 am | #615

    bookmark dulu.. :D

  309. May 7, 2013 at 3:19 pm | #617