Flashdisk is not accessible Access Denied

Wahyu Raja Reply 2:28 PM

Buka gpedit. Msc Pilih computer configuration kemudian administrative templates kemudian all settings Cari removeable disk 3 pilihan baru ...

You may set the startup type of Printer Spooler service to Manual or Delayed Start for a test.

Coba restart printer spooler dari services. Msc pada run.

Printers "Operation could not be completed (error 0x00000709) Double check the printer name and make sure that the printer is connected to the network

Wahyu Raja Reply 2:08 PM

You may set the startup type of Printer Spooler service to Manual or Delayed Start for a test. Coba restart printer spooler dari services. ...

You need to install wireless driver.

Insert your Ubuntu installation disk or a flash drive and copy these files from the installation disk to your Home directory:

pool/main/d/dkms/dkms_XXXXX.deb pool/restricted/b/bcmwl/bcmwl-kernel-source_XXXXX.deb

Then run the following in terminal:

sudo dpkg -i *.deb

If you are using Ubuntu 14.04.2 installation media the driver will not build

If you have 14.04.2, then download 64-BIT DRIVER FROM UBUNTU REPOSITORY or 32-BIT DRIVER, copy it to your home folder and run the same command. But you still need dkms_XXXXX.deb file from installation disk. Or you you can download it from HERE.

Ubuntu 14.04.2 has 3.16 kernel, but the installation image contains an old driver, which does not build for that kernel.

If you have UEFI BIOS, you need to disable Secure Boot to load the driver.

Install WIFI in Your Linux Ubuntu

Wahyu Raja Reply 9:33 AM

You need to install wireless driver. Insert your Ubuntu installation disk or a flash drive and copy these files from the installation disk ...

Tinggal masuk ke menu developer kemudian pilih visual basic.

Copy dan Paste Code sebagai berikut :
Dim Huruf(0 To 9) As String
Dim AX(0 To 3) As Double

Public Sub InitAngka()
    Huruf(0) = ""
    Huruf(1) = "satu "
    Huruf(2) = "dua "
    Huruf(3) = "tiga "
    Huruf(4) = "empat "
    Huruf(5) = "lima "
    Huruf(6) = "enam "
    Huruf(7) = "tujuh "
    Huruf(8) = "delapan "
    Huruf(9) = "sembilan "
End Sub

Public Function DgRatus(ByVal A As Double) As String
Dim Angka As Long

Angka = Int(A)
temp = ""
InitAngka

panjang = Len(Trim(Str(Angka)))
nilai = Right("000", 3 - panjang) & Trim(Str(Angka))

For y = 3 To 1 Step -1
    AX(y) = Mid(nilai, y, 1)
    Next y

Select Case AX(1)
    Case Is = 1
        temp = "seratus "
    Case Is > 1
        temp = Huruf(Val(AX(1))) & "" & "ratus "
    Case Else
        temp = ""
End Select

Select Case AX(2)
    Case Is = 0
        temp = temp & Huruf(Val(AX(3)))
    Case Is = 1
        Select Case AX(3)
            Case Is = 1
            temp = temp & "sebelas "
            Case Is = 0
            temp = temp & "sepuluh "
    Case Else
        temp = temp & Huruf(Val(AX(3))) & "belas "
End Select
Case Is > 1
    temp = temp & Huruf(Val(AX(2))) & "puluh "
    temp = temp & "" & Huruf(Val(AX(3)))
End Select
DgRatus = temp
End Function

Function DgHuruf(A As Double) As String
    Dim Ratusan(0 To 6) As String
    Dim Sebut(0 To 4) As String
    Dim Koma As String
    Dim Angka As Double
    Dim AAA As String
   
    On Error GoTo salah
    Koma = Format(A, "##############0.#0")
Angka = A - (Val(Right(Koma, 2)) / 100)
Sebut(1) = "ribu "
Sebut(2) = "juta "
Sebut(3) = "milyar "
Sebut(4) = "triliun "

panjang = Len(Trim(Str(Angka)))
Kl = Int(panjang / 3)
If Int(panjang / 3) * 3 <> panjang Then
    Kl = Kl + 1
    sisa = panjang - Int(panjang / 3) * 3
    nilai = Right("000", 3 - sisa) & Trim(Str(Angka))
Else
    nilai = Trim(Str(Angka))
End If

For x = 0 To Kl
    Ratusan(Kl - x) = Mid(nilai, x * 3 + 1, 3)
Next x

For y = Kl To 1 Step -1
    If y = 2 And Val(Ratusan(y)) = 1 Then
        temp = temp & "seribu "
    Else
        If Val(Ratusan(y)) = 0 Then
            temp = temp
        Else
            temp = temp & DgRatus(Val(Ratusan(y)))
            temp = temp & Sebut(y - 1)
        End If
    End If
Next y

DgHuruf = UCase(Left(temp, 1)) & Mid(temp, 2, Len(temp) - 1)

Koma = Format(A, "##############0.#0")

If Right(Koma, 2) = "00" Then
    DgHuruf = DgHuruf
Else
    If Val(Right(Koma, 2)) < 10 Then
        DgHuruf = DgHuruf & " " & Right(Koma, 1) & "/100 "
    Else
        DgHuruf = DgHuruf & " " & Right(Koma, 2) & "/100 "
    End If
End If
DgHuruf = DgHuruf & "rupiah,-"
Exit Function
salah:
MsgBox "Kata Ferdinan S, Terjadi Kesalahan" & vbCr & vbCr & _
        Err.Description & vbCr & Err.Number & vbCr & Err.Source, vbCritical, "KESALAHAN"
End Function



Note : Cara panggil pada kolom formula ketik "DgHuruf(NAMAKOLOM)".

Module Terbilang Automatis Di Excel

Wahyu Raja Reply 10:01 AM

Tinggal masuk ke menu developer kemudian pilih visual basic. Copy dan Paste Code sebagai berikut : Dim Huruf(0 To 9) As String Dim AX(0 ...

Try this. It worked for me. Check that the workbooks are of same type. i.e. both are .xlxs workbooks. If not convert to same format. Close excel. Restart excel. Open both workbooks from inside the file dialogue box under Recent Documents. That is workbooks should be opened from same instance of excel opening. Select the worksheet to be copied. Right click. Click on move or copy tab. Click on Create a copy. Select the workbook to which worksheet is to be opened from To Book and choose location from "before sheet". That's it.


Artinya : :)

Kita harus buka salah satu excel kemudian buka excel tujuan yang akan kita pindahkan pada tab recent document pada file. Untuk mengenalkan excel satu sama lain.

Excel 2003 Tidak Bisa Move Sheet Microsoft Office

Wahyu Raja Reply 10:18 AM

Try this. It worked for me. Check that the workbooks are of same type. i.e. both are .xlxs workbooks. If not convert to same format. Close e...

Luangkan bbrpa menit untuk membaca sampai selesai. 😊

*** *TAX AMNESTY Mulai hari Senin ini tanggal 18 Juli 2016.****

"JANGAN MEREMEHKAN TAX AMNESTY"

Berikut hasil ringkasan pernyataan Jokowi 15 Juli 2016, dalam acara sosialisasi Amnesti Pajak - Grand City Surabaya.

Tax Amnesty berbeda dengan pemutihan. Tax Amnesti merupakan penghapusan pajak yang seharusnya terutang, tidak dikenai sanksi administrasi perpajakan dan sanksi pidana di bidang perpajakan dengan cara *mengungkap harta dan membayar uang tebusan*.

Secara lebih ringkas tax amnesti itu  *UNGKAP-TEBUS-LEGA*

*1. UNGKAP*
Laporkan seluruh harta yang belum dilaporkan atau disembunyikan selama ini sampai dengan spt tahunan pph terakhir 2015.

*2. TEBUS*
Pembayaran sejumlah uang (tarif) ke kas negara untuk mendapatkan amnesti pajak.
Uang tebusan = Tarif x Nilai Harta Bersih
Nilai harta bersih = Harta - Utang

Harta adalah seluruh kekayaan dalam bentuk apapun, Sedangkan utang adalah jumlah pokok utang yang belum dibayar berkaitan langsung dengan perolehan harta.

Tarif yang berlaku sebagai berikut:
Pengungkapan Harta di dalam wilayah NKRI
Periode I: 18 Jun - 30 Sep = 2%
Periode II: 1 Okt - 31 Des   = 3%
Periode III: 1 Jan - 31 Mar = 5%

Pengungkapan Harta di luar wilayah NKRI
Periode I: 18 Jun - 30 Sep = 4%
Periode II: 1 Okt - 31 Des   = 6%
Periode III: 1 Jan - 31 Mar = 10%

Dana yang berasal dari luar negeri yang kemudian dibawa masuk ke indonesia, harus minim diendapkan selama 3 tahun.

Contoh ilustrasi:
Kekayaan atau Harta si A sekitar 3 Milyar. Sedangkan si A selama ini hanya melaporkan 1 Milyar (terakhir SPT 2015).
Adanya selisih 2 milyar yang tidak pernah dilaporkan / disembunyikan itu yang akan dikenakan tarif tax amnesti.
Berarti si A harus membayar tebusan 2% dari 2 Milyar, jika dilakukan di periode pertama.

*3. LEGA*
Anda tidak perlu takut apapun lagi dalam berinvestasi, karena ibaratnya pelaporan pajak anda di reset untuk kembali menjadi 0.

*INI YANG PALING PENTING:*
Seseorang yang telah mengikuti tax amnesty akan ada payung hukum, Dimana TIDAK DAPAT dijadikan dasar "penyelidikan, Penyidikan, dan/atau Penuntutan tindak pidana apapun".
Nama dan Data sangat dirahasiakan, Orang dalam yang membocorkan akan ada tindak pidana berat.

Apa Yang membuat semua orang yang merasa melanggar harus ikut? Perlu dikatahui setelah 31 Maret 2017 (Berakhirnya Tax Amnesty), yang ketahuan tidak pernah melaporkan akan dikenakan Sangat Sangat tinggi yaitu Dikenai *PPh + Tambah Sanksi 200% + Pidana Penjara.*

Berjalannya tax amnesty akan ada kelanjutan revisi undang-undang ketentuan PPN dan PPh, dimana kemungkinan akan lebih dipermurah.

Quartal Pertama tahun 2018 atau 2 tahun lagi, semua lembaga akan *mewajibkan menyerahkan seluruh data ke badan pajak* (Wow!!). Seperti perbankan, Asuransi, Kartu kredit, dan lembaga lainnya. Bahkan kerjasama dengan negara-negara dunia telah menandatangani untuk *saling keterbukaan. Dengan kata lain orang-orang yang tidak ikut tax amnesty akan sangat gampang ketahuan bahkan bagi yang mempunyai keuangan di Swiss, Singapore atau negara lainnya akan mudah terdeteksi. dengan kata lain *denda 200% dan Pidana*  akan diberlakukan.
Mendebarkan bukan? So bagaimana?

_*Pilihan anda hanya ada 2*_:
*LAKUKAN Tax Amnesty* dan menjalankan sebagai warga negara yang taat dan tanpa beban dengan membayar tebusan yang lebih murah, atau *ABAIKAN* dimana anda hanya bisa simpan uang anda seumur hidup dirumah dengan hidup penuh beban dan rasa takut dalam melakukan investasi.

*Bagaimana cara mengikuti Tax Amnesti?*
Anda hanya perlu datang ke kantor pajak, dengan mengambil sebuah form. Form yang dibuat sangat sederhana, bahkan beberapa data yang perlu difotocopy sangat sedikit dan dipermudah. Tidak seperti broadcast palsu yang seolah-olah sangat banyak persyaratannya.

Mari membangun bangsa ini, melihat bahwa Tax Amnesty sebagai sesuatu yang positif. Semuanya untuk pertumbuhan ekonomi indonesia yang lebih baik dan tentu semua untuk kebaikan bersama.

Silahkan Share karena belum banyak yang memahami.

Semoga bermanfaat

Wassalam

Apa itu Tax Amnesty

Wahyu Raja Reply 8:28 PM

Luangkan bbrpa menit untuk membaca sampai selesai. 😊 *** *TAX AMNESTY Mulai hari Senin ini tanggal 18 Juli 2016.**** "JANGAN MEREMEH...

1. untuk multiple delete
function hapusallterkirim(){
$nis=$this->input->post('check');
$jumlah=count($nis);
$hasil=array();
for ($a=0;$a<$jumlah;$a++){
$query="delete from sentitems where ID='$nis[$a]'";
$result=$this->db->query($query);
$hasil[$a]=$result;
}
return $hasil;
}


2. untuk multiple insert
function simpanujian(){
$data=array();
foreach($_POST['nis'] AS $key => $val){
$data[]=array(
"IDUJIAN" => $_POST['nis'][$key].$_POST['mapel2'].$_POST['jenis'].$_POST['semester'],
"IDSISWA" => $_POST['nis'][$key],
"IDKELAS" => $_POST['idkelasmm'],
"IDJENIS" => $_POST['jenis'],
"IDSEMESTER" => $_POST['semester'],
"IDMAPEL" => $_POST['mapel2'],
"NILAIP" => $_POST['nilaip'][$key],
'NILAIK' => $_POST['nilaik'][$key],
"NILAIS" => $_POST['nilais'][$key],
"TANGGAL" => $_POST['tanggal']
);
}
$this->db->insert_batch('tbl_ujian',$data);
}


3.untuk multiple selection query
function ambilwalitampung(){
$nis=$this->input->post('nis');
$jumlah=count($nis);
$hasil=array();
for ($a=0;$a<$jumlah;$a++){
$query="select * from tbl_wali_siswa where NISWALI='$nis[$a]'";
$result=$this->db->query($query)->row();
$hasil[$a]=$result;
}
return $hasil;
}

Select, Insert, Delete Multiple Data Codeigniter

Wahyu Raja Reply 5:55 AM

1. untuk multiple delete function hapusallterkirim(){ $nis=$this->input->post('check'); $jumlah=count($nis); $hasil=array(); f...

Search

Ikuti Channel Youtube Aku Yaa.. Jangan Lupa di subscribe. Terima kasih.

Google+ Followers

Popular Posts

Translate