Membuat notifikasi berjalan di service pada Basic4android

-

strukture B4a untuk membuat notifikasi: buatlah modul service isi script berikut,

Sub Process_Globals
Dim n As Notification
End Sub

Sub Service_Create
n.Initialize
Service.StartForeground(1, n)
        notifikasi
End Sub

Sub notifikasi
n.Sound=False
n.Light=False
n.OnGoingEvent=True
n.SetInfo("info", "hello bos", Main)
n.Icon = "icon"
n.Notify(1)
Log("ini notifikasi")
End Sub

mudah cara membuatnya silahkan mencoba, silahkan komentar anda :

Komentar

Posting Komentar

Postingan populer dari blog ini

cara membuat checkbox pada listview vb.net dan dapat di pilih sesuai checkbox yang dipilih

-
selamat siang agan semua, kali ini saya akan memposting tentang bagaimana sih membuat checkbox di dalam listview vb.net tentunya agan tidak sabar untuk tahu tahap tahapannya, untuk itu ikutilah cara saya membuatnya semoga bermanfaat dan dapat di aplikasikannya ke program yang sedang agan bikin okey kita langsung saja bahas bagaimana konsepnya, 1. buatlah form dan letakan listview komponen pada form 2. letakan kursor pada listview dan ubahlah property checkbox menjadi true 3. buatlah button untuk memilih semua yg akan kita ceklis 4. buatlah button untuk menyimpan hasil ceklis tersebut setelah tahu cara awal mari kita ngoding : buatlah prosedur tampil     Sub tampil()         LV03.BackColor = Color.GhostWhite         LV03.GridLines = True         LV03.CheckBox =True         LV03.View = View.Details     ...
Baca selengkapnya

membuat menu jquery bootstrap tanpa reload page

-
salam, kali ini saya akan berbagi bagaimana cara membuat menu dengan jquery bootstrap tanpa reload, tentunya udah banyak koding yang bertebaran di blog blog yang biasa di kunjungi, tetapi mungkin belum bisa memenuhi keinginan yg agan butuhkan, okey kita langsung ke pembahasan,. untuk kali ini saya menggunakan script jquery dan html biasa simpan dalam satu file dan berinama namafile.html, ini dia koding.a silahkan di copy <!DOCTYPE html> <html class="no-js">     <head>         <title>Administrator</title>         <!-- Bootstrap -->         <link href="<?php echo base_url() ?>assets/css/bootstrap.min.css" rel="stylesheet" media="screen">         <link href="<?php echo base_url() ?>assets/css/bootstrap-responsive.min.css" rel="stylesheet" media="screen">    ...
Baca selengkapnya

cara menghapus string di dalam text file menggunakan vb.net

-
selamat pagi,. sesuai dengan judul yang saya posting saya akan berbagi tentang cara menghapus string atau tulisan pada text file yang tidak dibutuhkan , khususnya untuk vb.net ini scriptnya :         Try             Dim lines As List(Of String) = System.IO.File.ReadAllLines(My.Application.Info.DirectoryPath & "\sms-msg.txt").ToList             For Each line As String In lines                 Dim dts() As String                 dts = line.Split("|")                 If dts(1) = str Then                     id_sms_from = dts(0)                     id_sms_to = dts(1)                     isi_sms = dts(2)       ...
Baca selengkapnya