SISTEM INFORMASI PEMESANAN JASA PENGGUNAAN INTERNET UNTUK MENINGKATKAN PELAYANAN PADA PELANGGAN. (Studi Kasus: Warnet STMIK AMIKOM Yogyakarta)

Seminar Nasional Teknologi 2007 (SNT 2007) Yogyakarta, 24 November 2007

ISSN : 1978 – 9777

SISTEM INFORMASI PEMESANAN JASA PENGGUNAAN INTERNET UNTUK MENINGKATKAN PELAYANAN PADA PELANGGAN (Studi Kasus: Warnet STMIK AMIKOM Yogyakarta)

Khusnawi, Salman Al Farisi STMIK AMIKOM Yogyakarta e-mail : [email protected]

ABSTRAKSI Sering kita menunggu dalam antrian untuk mendapatkan layanan jasa inernet (warnet). Didalam proses antrian kita akan cepat merasakan bosan atau jenuh, apalagi warnet tersebut tidak meyediakan fasilitas pelayanan antrian misalnya hiburan televisi, musik dan sebagainya. Hal ini jarang disadari oleh pengelolah warnet yang akan mengakibatkan berkurangnya penggunaan jasa internet oleh pelanggan karena rendahnya tingkat kepuasan pelanggan. Dan masih jarang warnet yang memberikan pelayanan antrian dalam bentuk pembookingan kursi komputer. Pembookingan disini dapat menggunakan telepon maupun sms. Dalam jurnal ini kita akan bahas proses pembuatan sistem informasi pemesanan jasa internet yang ditujukan kepada pengelolah warnet untuk meningkatkan pelayanan pada pelanggan.

Kata kunci: antrian, pelayanan antrian, pembookingan.

1. PENDAHULUAN Dalam memenangkan persaingan, warnet sekarang dituntut untuk dapat memberikan pelayanan yang baik terhadap pelanggannya. Sistem informasi ini dirancang untuk dapat melayani pelanggan dalam bentuk pembookingan kursi komputer warnet.

Pelanggan dapat melakukan pembookingan melalui telepon atau sms dengan mengetikkan kapan akan menggunakan jasa internet, sistem akan mencari nomor komputer yang masih kosong dan akan merespon dengan membalas sms bahwa komputer sekian siap digunakan. Sistem ini akan bekerja jika pelanggan tersebut sudah terdaftar menjadi member. Selain dapat melakukan

D ‐ 1


ISSN : 1978 – 9777

pembookingan, sistem ini juga dapat melakukan cek deposit member, pembatalan pembookingan melalui sms.

Sistem ini dapat memberikan peringatan kepada user jika ada user lain yang akan memakai dengan catatan sudah melakukan pembookingan terlebih dahulu. Disini akan terjadi masalah pada user yang pertama yang sedang asyik menikmati akses internet ternyata harus berhenti karena ada user lain yang akan memakai. Untuk solusi ini pengolah warnet disarankan tidak dibookingkan semua komputer yang ada, tetapi disisakan beberapa komputer untuk dapat digunakan tanpa melalui pembookingan. Sistem ini juga dapat mengenali komputer lain secara otomatis yang ada dalam satu jaringan dan memasukkannya ke data komputer. Hak akses juga sangat diperhatikan, hak akses ada dua tingkatan yaitu administrator dan operator. Administrator memiliki hak akses untuk memgolah data operator. Sedangkan Operator diijinkan untuk mengolah data member, mengolah data komputer, mengatur settingan sistem, mengolah pembookingan dan pembatalan yang dilakukan secara manual.

2. PEMBAHASAN Perangkat Tambahan Yang Dibutuhkan •

Komponen MobileFBUS1.5. Komponen MobileFBUS merupakan komponen dari situs www.softwarecave.com. MobileFBUS terdiri dari dua versi yaitu verli lite dan versi profesional. Untuk versi profesional kita harus membeli dahulu, sedangkan untuk versi lite disediakan secara gratis dan dapat didownload pada situs tersebut. Untuk dapat menggunakan komponen ini, kita harus mengcopy file MFBUS15.OCA, MFBUS15.ocx, gjfbus15.dll kedalam system32. Kemudian daftarkan kedalam registry windows dengan mengetikkan regsvr32 MFBUS15.ocx pada menu start – run.

Gambar 1. Mendaftarkan Komponen Pada Registry Windows.

Jika berhasil akan muncul pesan sebagai beikut:

D ‐ 2


ISSN : 1978 – 9777

Gambar 2. Pesan Jika Komponen Berhasil Didaftarkan

•

Handphone nokia 3350 Dalam pembuatan sistem ini tidak harus menggunakan handphone nokia seri 3350, tetapi dapat juga menggunakan handphone nokia dengan seri yang lain misal nokia seri 3210,3310,3330,3350,3410,3510,51xx,61xx,6210,6310,7110.

•

Kabel data Untuk dapat mengakses handphone, kabel data ini dihubungkan ke COM1 atau COM2 pada komputer. Kabel data yang digunakan harus sesuai dengan handphone yang digunakan. Kabel data ini bisa didapat pada toko-toko ponsel dan harganya tidak terlalu mahal.

•

Kartu perdana Kartu perdana ini akan digunakan sebagai nomor tujuan pengiriman sms dari para pelanggan. Dan juga sebagai sarana pengiriman balasan kepada para pelanggan. Kartu perdana disini bisa menggunakan tipe prabayar atau pasca bayar.

Perancangan Sistem Dari proses analisis sistem yang ada dan pengembangan sistem yaitu sistem pembookingan dapat dibuat rancangan sistem sebagai berikut:

Gambar 3 Diagram Konteks D ‐ 3


ISSN : 1978 – 9777

Diagram konteks ini menggambarkan hubungan input/output antara sistem dengan dunia luarnya. Dari gambar tersebut dunia luar atau kesatuan luar dari sistem booking kursi komputer warnet Amikom.Net adalah pelanggan atau member, operator, dan manajer.

Gambar 4 Data Flow Diagram Level 0.

DFD level nol ini sudah melihatkan proses-proses yang dilakukan oleh komputer yang merupakan proses bagian dari sistem booking kursi komputerwarnet Amikom.Net secara keseluruhan. Dari 4 proses diatas yaitu cek pelanggan, proses booking dan peringatan, proses pembuatan laporan, proses login dan olah operator hanya proses pembuatan laporan yang tidak memiliki sub sistem. Dan berikut diagram level 1 untuk cek palanggan, proses booking dan peringatan, proses login dan olah operator:

D ‐ 4


Gambar 5 DFD Level 1.1 Cek Pelanggan

Gambar 6 DFD Level 1.2 Proses Booking dan Peringatan

D ‐ 5

ISSN : 1978 – 9777


ISSN : 1978 – 9777

Gambar 7 DFD Level 1.4 Proses Login dan Pengendalian Sistem

Perancangan Tampilan

Gambar 6 Tampilan Form Welcome

D ‐ 6


Gambar 8 Tampilan Form Log In

Gambar 9 Tampilan Form Booking

Gambar 10 Tampilan Form Data Komputer

D ‐ 7

ISSN : 1978 – 9777


Gambar 11 Laporan Jumlah Pembookingan Per Hari

Beberapa Source Code Yang Digunakan Dalam Pembuatan Sistem ‘Source code untuk koneksi handphone Sub konekHP() On Error GoTo pesan MFBUSHP.Connect com1 If MFBUSHP.Connected = True Then lblkonekHP.Caption = "HP Terkoneksi" End If Screen.MousePointer = vbHourglass MFBUSHP.SMS.Refresh Screen.MousePointer = vbDefault

pesan: If Err <> 0 Then cmdkoneksi.Caption = "Koneksi" D ‐ 8

ISSN : 1978 – 9777


lblkonekHP.Caption = "" Timer4.Interval = 0 Timer4.Enabled = False MsgBox "Gagal Terkoneksi", vbInformation + vbOKOnly, "Informasi" End If End Sub

‘source code untuk mendeteksi komputer lain dalam jaringan Option Explicit

Const ERROR_SUCCESS = 0 Const ERROR_MORE_DATA = 234 Const SV_TYPE_SERVER = &H2 Const SIZE_SI_101 = 24

Private Type SERVER_INFO_101 dwPlatformId As Long lpszServerName As Long dwVersionMajor As Long dwVersionMinor As Long dwType As Long lpszComment As Long End Type

D ‐ 9

ISSN : 1978 – 9777


ISSN : 1978 – 9777

Private Declare Function NetServerEnum Lib "netapi32.dll" (ByVal servername As String, _ ByVal level As Long, buffer As Long, ByVal prefmaxlen As Long, entriesread As Long, _ totalentries As Long, ByVal servertype As Long, ByVal domain As String, resumehandle As Long) As Long

Private Declare Function NetApiBufferFree Lib "netapi32.dll" (BufPtr As Any) As Long Private Declare Sub RtlMoveMemory Lib "KERNEL32" _ (hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long) Private Declare Function lstrcpyW Lib "KERNEL32" _ (ByVal lpszDest As String, ByVal lpszSrc As Long) As Long

Private Const NERR_Success As Long = 0& Private Const NERR_BASE = 2100 Private Const NERR_NameNotFound = NERR_BASE + 173 Private Const NERR_NetworkError = NERR_BASE + 36 Private Const ERROR_ACCESS_DENIED = 5 Private Const ERROR_INVALID_PARAMETER = 87 Private Const ERROR_NOT_SUPPORTED = 50

Private Declare Function NetMessageBufferSend Lib "netapi32.dll" (servername As Any, _ msgname As Byte, fromname As Any, buf As Byte, ByVal buflen As Long) As Long '--------------------------------------------------------------

Private Sub Form_Load() Dim pszServer As String, pszDomain As String Dim nLevel As Long, i As Long, BufPtr As Long, TempBufPtr As Long D ‐ 10


ISSN : 1978 – 9777

Dim nPrefMaxLen As Long, nEntriesRead As Long, nTotalEntries As Long Dim nServerType As Long, nResumeHandle As Long, nRet As Long Dim ServerInfo As SERVER_INFO_101

nLevel = 101 BufPtr = 0 nPrefMaxLen = &HFFFFFFFF nEntriesRead = 0 nTotalEntries = 0 nServerType = SV_TYPE_SERVER nResumeHandle = 0

Do nRet = NetServerEnum(pszServer, nLevel, BufPtr, nPrefMaxLen, nEntriesRead, _ nTotalEntries, nServerType, pszDomain, nResumeHandle) If ((nRet = ERROR_SUCCESS) Or (nRet = ERROR_MORE_DATA)) And (nEntriesRead > 0) Then TempBufPtr = BufPtr For i = 1 To nEntriesRead RtlMoveMemory ServerInfo, TempBufPtr, SIZE_SI_101 lst.AddItem PointerToString(ServerInfo.lpszServerName) TempBufPtr = TempBufPtr + SIZE_SI_101 Next i Else MsgBox "NetServerEnum failed: " & nRet End If D ‐ 11


ISSN : 1978 – 9777

NetApiBufferFree (BufPtr) Loop While nEntriesRead < nTotalEntries End Sub ‘source code untuk mengirimkan pesan dalam jaringan Private Sub cmdSend_Click() Dim nRet As Long Dim sTo() As Byte Dim sMsg() As Byte

sTo = lst.List(lst.ListIndex) & Chr(0) sMsg = txtMsg & Chr(0) nRet = NetMessageBufferSend(ByVal 0, sTo(0), ByVal 0, sMsg(0), UBound(sMsg)) Select Case nRet Case NERR_Success: MsgBox "Success" Case NERR_NameNotFound: MsgBox "NameNotFound" Case NERR_NetworkError: MsgBox "NetworkError" Case ERROR_ACCESS_DENIED: MsgBox "ACCESS_DENIED" Case ERROR_INVALID_PARAMETER: MsgBox "INVALID_PARAMETER" Case ERROR_NOT_SUPPORTED: MsgBox "NOT_SUPPORTED" Case Else: MsgBox "Unexpected error" End Select End Sub '-------------------------------------------------------------Private Function PointerToString(lpszString As Long) As String Dim lpszStr1 As String, lpszStr2 As String, nRet As Long

D ‐ 12


ISSN : 1978 – 9777

lpszStr1 = String(1000, "*") nRet = lstrcpyW(lpszStr1, lpszString) lpszStr2 = (StrConv(lpszStr1, vbFromUnicode)) PointerToString = Left(lpszStr2, InStr(lpszStr2, Chr$(0))- 1) End Function

Implementasi Sebelum implementasi sistem ada beberapa hal yang harus diperhatikan yaitu handphone, kartu perdana dan kabel data sudah terpasang pada COM1 atau COM2 di komputer. Setelah perangkat tersebut sudah terpasang langkah selanjutnya adalah menginstal program aplikasi kedalam komputer operator.

Untuk dapat menggunakan sistem ini pelanggan haruslah sudah terdaftar sebagai member warnet. Untuk mendaftar, hubungi operator untuk dicatat data pelanggan dan pelanggan akan mendapatkan kartu member dari warnet. Setelah pelanggan menjadi member baru dapat menggunakan fasilitas pembookingan ini. Member dapat melakukan pembookingan, cek deposit dan pembatalan pembookingan melalui sms. Berikut daftar format untuk sms: •

Untuk melakukan pembookingan Bkg [id member] [password] [tanggal (DD/MM/YYYY)] [jam mulai (HH:MM)] [jam selesai (HH:MM)”

•

Untuk melakukan cek deposit Cek [id member]

•

Untuk melakukan pembatalan Btl [id member] [password] [id booking]

3. KESIMPULAN Dengan adanya sistem pemesanan penggunaan jasa internet ini dapat meningkatkan kepuasan pelayanan warnet kepada para pelanggannya. Dengan demikian akan meningkatkan pendapatan disebabkan banyaknya penggunaan jasa internet. Pelanggan juga tidak perlu melakukan antrian hanya untuk mendapatkan giliran penggunaan jasa internet, tetapi pelanggan cukup mengirimkan

D ‐ 13


ISSN : 1978 – 9777

sms untuk membooking dan langsung menggunakan pada waktu yang ditentukan oleh pelanggan. Dengan demikian pelanggan dapat mengalokasikan waktu untuk kegiatan yang lain.

DAFTAR PUSTAKA Bernalidho I. Hutabarat,MSC. OCP, Pengolahan Basis data, Penerbit Andi Yogyakarta, 2004 Dwi Budicahyanto, ST, Membangun Aplikasi Handphone dengan mobileFbus dan visual basic, Penerbit kerjasama X-Oerang dan Andi Yogyakarta, 2004. Jeffrey L. Whitten, Lonnie D. Bentley, Thomas I.M. Ho, Systems Analysis & Design Methods, (st. Louis:Times Mirrir/Mosby College Publishing, 1986). http://www.ostrosoft.com/vb/projects/

D ‐ 14

SISTEM INFORMASI PEMESANAN JASA PENGGUNAAN INTERNET UNTUK MENINGKATKAN PELAYANAN PADA PELANGGAN. (Studi Kasus: Warnet STMIK AMIKOM Yogyakarta)

Recommend Documents