UtamaBeritaTutorialBlogTool

Google
Web ilmuit.com
Tutorial Kategori Menghantar Mesej dalam Rangkaian dengan vbscript

Menghantar Mesej dalam Rangkaian dengan vbscript

Oleh ali
Dikirim pada Tuesday 05 June 2007



KOD
Option Explicit

Const MyApp = "Send Network Message"
Const Netsend = "%COMSPEC% /C %SystemRoot%\system32\NET.EXE SEND"
Const WindowStyle = 0
Const WaitOnReturn = False

Dim sCommand, sSendto, sMessage
Dim oSh

On Error Resume Next

If Not IsWinnt() Then
Wscript.Echo "Jalankan skrip ini dalam Windows berasaskan NT"
Wscript.Quit(1)
End If

sSendto = InputBox("Taipkan nama komputer atau alamat IP, atau gunakan karakter * untuk menghantar mesej secara" & _
" broadcast ke dalam domain", MyApp)
If sSendto = "" Then Wscript.Quit(1)
sCommand = Netsend & " " & sSendto

sMessage = InputBox("Mesej Anda:", MyApp)
If sMessage = "" Then Wscript.Quit(1)
sCommand = sCommand & " " & sMessage

Set oSh = CreateObject("Wscript.Shell")
oSh.Run sCommand, WindowStyle, WaitOnReturn
Set oSh = Nothing


Private Function IsWinnt()

Const OSNT = "Windows_NT"
Dim oSh
Dim sOS

IsWinnt = False

Set oSh = CreateObject("Wscript.Shell")
sOS = oSh.ExpandEnvironmentStrings("%OS%")
Set oSh = Nothing

If sOS = OSNT Then IsWinnt = True

End Function


Halaman Berkaitan
Menghantar Mesej dalam Rangkaian







email to someone printer friendly
Senarai tutorial dalam kategori ini
Kembali ke laman utama tutorial

Penilaian
Belum ada penilaian dibuat setakat ini


Sila Log-in untuk menghantar komen. Daftar jika belum menjadi ahli.





Artikel Terbaru

Tips Melindungi Komputer Dari Ancaman Virus
5 tips untuk anda melindungi komputer anda dari ancaman virus dan malware.

Mencipta Laman Kelab Peminat di Facebook
Langkah-langkah dan cara membuat laman peminat Facebook atau Fanpage. Facebook merupakan salah satu alat pemasaran dan penjenamaan yang paling efektif sekiranya anda gunakannya dengan bijak. Gunakan halaman Facebook untuk mempromosikan laman web atau blog anda.

Periksa Pautan Rosak dalam Wordpress
Dengan plugin Broken Link Checker, ia mampu untuk mengesan semua pautan-pautan rosak yang terdapat di dalam blog anda.

Lebih Dari Satu Homepage di Firefox
Menetapkan lebih dari satu halaman rumah (Homepage) di Mozilla Firefox untuk membuka lebih dari satu laman web sekaligus.

Memasang Rangkaian Wayarles (Wireless)
Panduan ini akan menunjukkan kepada anda langkah-langkah bagaimana untuk memasang rangkaian wayarles (wireless) yang selamat, mudah, cepat dan murah di rumah, makmal sekolah atau di pejabat.

Cara Pasang Plugin di Wordpress
Cara-cara memasang plugin di blog Wordpress menggunakan kaedah papan pemuka (Dashboard) dan kaedah FTP (File Transfer Protocol)

Ubah Wajah dengan Perfect365
Berikan imej baru ke atas wajah anda dengan perisian Makeover Perfect365.

Mengatasi Masalah Perkakasan dengan Troubleshooter
Sekiranya anda mendapati Windows 7 atau Windows Vista menghadapi isu perkakasan atau peranti, anda boleh menjalankan utiliti Troubleshooter. Troubleshooter akan secara automatik mencuba untuk mengenal pasti dan menyelesaikan masalah yang ada.

Kemaskini PC berasaskan Intel
Menggunakan utiliti Intel Driver Update untuk mengemaskini sistem anda secara automatik.

Mengaktif File History dalam Windows 8
Sebelum melakukan pendua (backup) ke atas data-data persendirian, anda perlu mengaktif terlebih dahulu opsyen File History. Tutorial ini akan menunjukkan cara-cara mengaktif File History dalam Windows 8.








Hakcipta terpelihara, © IlmuIT.com.
Semua artikel yang terkandung di dalam web ini dikreditkan kepada penulis asal.
Jumlah Ahli: 2659 | Jumlah Artikel: 455
Tutorial - Reviu - Blog - Tool - Carian - Direktori - Google Button
Kredit :: Hubungi ::Iklan :: Polisi :: Rakan :: Forum :: RSS
Facebook Bahan RSS Twitter Youtube
Advertise on this site
Render time: 0.0652 second(s).