tag:blogger.com,1999:blog-34540375124902456902024-03-05T23:03:01.273-08:00rahmatdcc.blogspot.comMenggemparkan dunia dengan mimpi-mimpi yang tinggi.rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.comBlogger109125tag:blogger.com,1999:blog-3454037512490245690.post-64216347597830910682023-12-21T05:33:00.000-08:002023-12-21T05:34:42.854-08:00Mengatasi error ERROR 2002 (HY000): Can't connect to local MySQL server through socket '/var/run/mysqld/mysqld.sock' (2)Cara mengatasi error ERROR 2002 (HY000): Can't connect to local MySQL server through socket '/var/run/mysqld/mysqld.sock' (2) 1. buka configurasi my.cnf, edit seperti dibawah ini kemudian simpan! # The following options will be passed to all MySQL clients [client] #socket = /tmp/mysql.sock rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-3535430644576379002023-11-29T00:32:00.000-08:002023-11-29T00:36:56.956-08:00Install mysql 5.1 on ubuntu 23.10 server#!/bin/bash
# Run as root
set -e
apt-get update
apt-get install -y build-essential
apt-get install -y libncurses5-dev
useradd mysql
cd
wget http://dev.mysql.com/get/Downloads/MySQL-5.1/mysql-5.1.73.tar.gz
tar xzvf mysql-5.1.73.tar.gz
cd mysql-5.1.73
./configure \
'--prefix=/usr' \
'--exec-prefix=/usr' \
'--libexecdir=/usr/sbin' \
'--datadir=/usr/share' \
'--localstatedir=/var/lib/mysql' \
'-rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-4181820459804653112023-11-28T15:45:00.000-08:002023-11-28T15:45:00.153-08:00Install Mysql 8 Ubuntu 23sudo apt install mysql-server
sudo systemctl start mysqlsudo systemctl status mysqlsudo mysqlALTER USER 'root'@'localhost' IDENTIFIED WITH mysql_native_password BY 'password12345';mysql_secure_installationsudo nano /etc/mysql/mysql.conf.d/mysqld.cnfbind-address = 127.0.0.1 => rubah ke IP server mysqlsudo systemctl restart mysql#Login to MySQL console rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-26590143603618653512023-11-28T15:35:00.000-08:002023-11-28T15:41:20.682-08:00Set IP Address Ubuntu 23 Install Net-Toolsapt install net-toolsMasuk ke direktory netplanroot@server:/# cd /etc/netplan/root@server:/etc/netplan#pico 50-cloud-init.yaml#network:# ethernets:# eno1:# dhcp4: true# version: 2# create newnetwork: ethernets: # interface name enp1s0: rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-7714418274643773492023-11-01T21:03:00.004-07:002023-11-01T21:03:58.063-07:00Dinamically Populate Listview VB6 any databasePublic Sub dinamicLv(strSql As String, lv As ListView)Dim rs As New MYSQL_RSDim i, j, k As Integer With lv .view = lvwReport .Gridlines = True .FullRowSelect = True .HotTracking = True .ColumnHeaders.Clear rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-59710509418619319382023-10-20T19:24:00.004-07:002023-10-20T19:25:53.896-07:00Install Whatsapp API ubuntu server 201. Siapkan beberapa hal berikut: NodeJS 18, Python 3, pip dan npm2. Install NodeJS 18 curl -sL https://deb.nodesource.com/setup_18.x | sudo -E bash - 3. Install Python dan library apt-get install python3-pip pip install mysql-connector-python pip install requests  rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-29015976015417391072023-06-11T05:40:00.004-07:002023-10-19T14:43:17.218-07:00Permission UserAdd permission datachown -R www-data:www-data /image
routing gateway proxmoxroot@stompr:~# ip route show192.168.10.0/24 dev vlan10 proto kernel scope link src 192.168.10.10root@stompr:~# ip route add default via 192.168.10.1 dev vlan10root@stompr:~# ping 1.1.1.1PING 1.1.1.1 (1.1.1.1) 56(84) bytes of data.64 bytes from 1.1.1.1: icmp_seq=1 ttl=58 time=20.7 ms64 bytes from 1.1.1.1: icmp_seq=2 ttl=rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-71893920885446629132023-06-09T01:36:00.005-07:002023-06-09T01:36:53.515-07:00Config My.cnf Mysql 5.5[client]port = 3636socket = /tmp/mysql.sock[mysqld]port = 3636socket = /tmp/mysql.sockskip-external-lockingkey_buffer_size = 16Mmax_allowed_packet = 1Mtable_open_cache = 64sort_buffer_size = 512Knet_buffer_length = 8Kread_buffer_size = 256Kread_rnd_buffer_size = 512Kmyisam_sort_buffer_size = 8M#tambahanskip-name-resolvelog_bin_trust_function_creators = 1bind-address = xxx.xxx.xxx.xxxlog-bin=rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-3153446038467209872023-04-05T10:03:00.003-07:002023-04-05T10:03:13.464-07:00Install Mysql 5.5 ubuntu server 16Uninstall any existing version of MySQLsudo rm /var/lib/mysql/ -RDelete the MySQL profilesudo rm /etc/mysql/ -RAutomatically uninstall mysqlsudo apt-get autoremove mysql* --purge
sudo apt-get remove apparmorDownload version 5.5.51 from MySQL sitewget https://dev.mysql.com/get/Downloads/MySQL-5.5/mysql-5.5.56-linux-glibc2.5-x86_64.tar.gzAdd mysql user groupsudo groupadd mysqlAdd mysql (not rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-89237721431005766392023-04-05T09:18:00.002-07:002023-04-05T09:18:11.362-07:00Remove Mysql Ubuntu ServerStep by step remove mysql from Ubuntu Server: sudo systemctl status mysqlsudo systemctl stop mysqlsudo systemctl status mysqlsudo apt purge mysql-server*sudo apt purge mysql-server mysql-client mysql-common mysql-server-core-* mysql-client-core-*ls /etc/mysqlsudo ls /var/lib/mysqlsudo rm -r /etc/mysql /var/lib/mysqlsudo rm -r /var/log/mysqlsudo apt autoremoverahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-39867220252155725172022-04-27T12:05:00.002-07:002022-04-27T12:06:00.093-07:00Set Time zone ubuntu ke IndonesiaPilih salah satu time zone berikut sesuai dengan wilayah WIB/WITA/WIT: sudo timedatectl set-timezone Asia/Jakartasudo timedatectl set-timezone Asia/Makassarsudo timedatectl set-timezone Asia/JayapuraCek hasil timezonesudo timedatectl Local time: Mon 2016-12-26 13:31:57 WIBUniversal time: Mon 2016-12-26 06:31:57 UTCRTC time: n/aTime zone: Asia/Jakarta (WIB, +0700)Network timerahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-90130108930065045992022-04-02T15:13:00.004-07:002022-04-02T15:14:48.940-07:00Install LAN driver DELL T40 ubuntu server 14- Download driver Ethernet e1000e di https://sourceforge.net/projects/e1000/- Copy file tersebut ke dalam flashdisk- mounting CDROM untuk install module "make" dan "gcc", >>> "sudo mount /dev/sr0 /media/cdrom"- aktifkan apt cdrom >> "pico /etc/apt/sources.list" - Delete # (pagar) pada baris "#deb cdrom:[Ubuntu-Server 14.04.1 LTS _Trusty Tahr_ - Release amd64 (rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-43328318406510712092019-02-26T13:02:00.001-08:002019-02-26T13:02:32.584-08:00Call Procedure Mysql dengan VB.NETAda perbedaan yang sangat signifikan ketika memanggil Procedure Mysql antara VB6 dan VB.net, jika menggukan VB6, script yang dipanggil sama saja dengan script yang digunakan di mysql, contohnya dengan query
CALL NamaProsedur(variable In, Variable Out)
Jika dipanggil dengan menggunakan VB.net yang maka srcipt adalah sebagai berikut:
Sub PanggilProsedur()
&rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-59435834405424104102019-02-26T12:49:00.001-08:002019-02-26T12:49:39.927-08:00Mikrotik IP Cloud Indihome TerbaruBeberapa hari yang lalu saya kesulitan untuk mengakses mikrotik saya dari jaringan luar, itu disebabkan settingan IP-Cloud di mikrotik mendapatkan IP dari indihome dengan nomor IP depannya adalah 36.xxx.xxx.xxx. setelah saya coba-coba berkali dengan force update hasilnya tetap saja tidak dapat diakses dari luar.
setelah menggunakan beberapa percobaan, akhirnya dapat merubah IP public rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-35984582373567043462016-10-17T02:44:00.000-07:002016-10-17T12:35:31.754-07:00ID Auto Number di Vb.netMembuat "Automatic ID Number" (nomor ID Otomatis) sering dilakukan dalam hal pemrograman. jika pemrogramannya berbasis client-server, atau berbasis databases, pembuatan ID numbernya bisa dilakukan di dua sisi, disisi aplikasi pemrogramnnya atau disisi basis datanya (database). berikut cara pembuatan auto number menggunakan Vb.net.
1. Buatlah objek "txtKode"
2. Copy script dibawah ini!
&rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-40885030499210359592016-10-07T02:24:00.003-07:002016-10-07T02:24:45.496-07:00Mengisi data di Listview VB.NET Sub TabelGroup()
With Me.ListView1
.FullRowSelect = True
.GridLines = True
.AllowColumnReorder = True
.CheckBoxes = True
.rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-12559466341684603732016-09-23T20:55:00.004-07:002016-09-23T20:55:33.352-07:00Kumpulan Fungsi Manipulasi String Vb.netImports MySql.Data.MySqlClient
Imports System.IO
Module modFungsi
Public result As String
Public cmd As New MySqlCommand
Public cmd2 As New MySqlCommand
Public Sub DeleteFile(namaFile As String)
Try
If File.Exists(namaFile) Then
rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-82745456984872402622016-09-21T19:15:00.003-07:002016-09-21T19:15:31.908-07:00Module Export Listview to Excel Vb.netExport data dari listview ke format excel sangat sering dilakukan, apalagi data tersebut terkait dengan data operasional harian yang akan di modifikasi dengan aplikasi lain. Microsoft excel merupakan salah satu aplikasi yang paling sering digunakan untuk mengedit dokumen dalam bentuk data. berikut cara export data dari listview ke microsoft excel dengan VB.NET
Yang perlu disedikan adalah: rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com1tag:blogger.com,1999:blog-3454037512490245690.post-82986798556751463802016-09-21T02:40:00.002-07:002016-09-21T19:23:19.202-07:00Module CRUD MySql dengan VB.NETCRUD (CREATE, READ, UPDATE, DELETE) merupakan bagian yang tidak mungkin terpisahkan dari pemrograman, apalagi jika program yang digunakan sangat tergantung kepada database. berikut adalah module CRUD VB.NET dangan database MYSQL
Imports MySql.Data.MySqlClient
Module modCrud
''declaring a string
Public result As String
Public cmd As New MySqlCommand
&rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-58799242508397468642016-09-21T02:40:00.000-07:002016-09-21T02:40:18.279-07:00Module CRUD Imports MySql.Data.MySqlClient
Module modCrud
''declaring a string
Public result As String
Public cmd As New MySqlCommand
Public cmd2 As New MySqlCommand
Public rdr As MySqlDataReader
Public rdr2 As MySqlDataReader
Public rdt As DataTable
Public Sub cCall(ByVal strSql As String)
 rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-43561109534913900342016-09-19T21:48:00.000-07:002016-09-19T21:48:12.813-07:00Module Koneksi Imports System
Imports System.IO
Imports System.Data
Imports MySql.Data.MySqlClient
Module modKoneksi
Public conn As New MySqlConnection
Public conn2 As New MySqlConnection
Public cmd As New MySqlCommand
Public cmd2 As New MySqlCommand
Public Sub connDb()
Dim db_nama1 As String
rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-63987814181203049922016-09-19T21:42:00.002-07:002016-09-19T21:42:31.801-07:00Load Menu From DatabaseDim MainMenu As New MenuStrip
Dim ParentMenu, ChildMenu, ChildMenu2 As ToolStripMenuItem
Dim MenuKode, MenuLabel As String
Sub MenuAkses()
cSelect("SELECT * FROM kode_menu WHERE menu_group = '" & LoginLevel & "' " & _
"ORDER BY menu_kode ASC ")
Do While rdr.Read
&rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-12998889185952757672015-01-06T18:56:00.002-08:002015-01-06T18:57:30.537-08:00Membuat Installer VB6 + Crystal Report 8.5 dengan Inno SetupInno setup adalah salah satu yang digunakan untuk membuat installer (package) untuk projet Visual Basic / Net. Tool sangat membantu disamping di dalam VB sendiri mempunya compiler internal yang digunakan untuk membuat installer. Kelebihan dari Inno Setup adalah file Installer yang dihasilkan lebih kecil dibandingkan menggunakan compiler internal VB.
Kendala selanjutnya adalah ketika VBrahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com5tag:blogger.com,1999:blog-3454037512490245690.post-3001089488695186682014-12-31T04:46:00.003-08:002014-12-31T04:46:34.896-08:00Active Report Mysql dengan VB6
Private Sub ActiveReport_ReportStart()
Dim strSql As String
Dim TglAwal As String
Dim TglAkhir As String
lblLembagaNama.Caption = UCase(xNamaKantor)
lblLembagaAlamat.Caption = xAlamatKantor
With frmAbsensiLaporan
TglAwal = Format(.dtAwal.Value, "yyyy-mm-dd")
TglAkhir = Format(.dtAkhir.Value, "rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0tag:blogger.com,1999:blog-3454037512490245690.post-40311717131215567182014-12-30T23:51:00.003-08:002014-12-30T23:51:47.440-08:00SendKeys error dengan VB6 di windows 8Ada masalah kecil ketika menggunakan perintah SendKeys pada VB6 dengan OS windows 8, setelah googling, akhirnya mendapatkan script berikut dan alhamdulillah sukses. tapi sory lupa save link sumbernya. berikut scriptnya:
Public Sub Sendkeys(text$, Optional wait As Boolean = False)
Dim WshShell As Object
Set WshShell = CreateObject("wscript.shell")
rahmatpwthttp://www.blogger.com/profile/02317230168577587531noreply@blogger.com0