Intergrasi Flash Dengan Ms.Acces


Kembali lagi ama saya dengan sebuah topic intergrasi Flash dengan Ms.Acces atau dengan singkatnya kita bisa menghubungkan antara database Ms.Acces dengan Flash.Jika Anda terus mengikuti Topic ini anda akan menemukan Sebuah Program Yang berfungsi Untuk Interface antara Flash Dengan Ms.Acces.Untuk Lebih Mempersingkat Waktu saya langsu Kasih Tau Alat Dan Bahan nya.oh iya saya lupa,pada tutorial ini saya akan membuat sebuah Aplikasi Peminjaman Alat Lab Komputer Yang ada Di sekolah saya. Ya kita Langsung aja.

Alat Dan Bahan:
1.Aplikasi Macromedia Flash 8 (Supaya Sama Dengan Yang saya Pake)
2.Aplikasi Ms.Acces
3.Aplikasi MDM Zinc Versi nya bebas (yang penting ada perintah Connec to Ms.acces)
4.Musik Supaya Gak Stress.

Langkah-Langka:

1.Instalkan Semua Alat Dan Bahan Yang Telah saya kasih Tadi.
2.Buka Macromedia Flash Nya Seperti Biasa Dan Pilih Flash Document Seperti Ini.
Gambar 01
3.Lalu Anda Pilih Windows > Components Lalu Akan Keluar Tampilan Seperti Berikut
Gambar 02
4.Tambahkan Beberapa component yang ke Library,component nya yaitu :Button,Data
Grid,Label,Dan Text Input.
Gambar 03
5.Lalu Anda Desain Sebuah Tampilan Aplikasi Anda Seperi Biasa,Untuk memudahkan Buat
Yang simpel Aja dan Klo Bisa Pake Satu Frame Dan Satu Layer.Contoh.
Gambar 04 Dan 05
6.Dan Jangan Lupa Masukan Component Yang ada Di Library Ke Lembar Kerja Yang Talah
Kamu Desain.
7.Sorot Frame 1 Layer 1 Dan Masuk ke Menu Action Script.
8.Disinilah Bagian Yang Pusing Karena Semua Action Yang Kita Tulisa Akan Dianggap
Variable Oleh Flash Jadi Jika Ada Kesalaha Logika Atau Penulisan Kita Tidak Akan Tau.
9.Masukan Action Script Dibawah ini Pada Frame.
----------------------------------------------------------------------------------------
_level0.populate.enabled=false;

listenerObject = new Object();
listenerObject.cellEdit = function(evt_obj){
var fieldName="";
if (evt_obj.columnIndex==0) {fieldName="No"}
if (evt_obj.columnIndex==1) {fieldName="Jamke"}
if (evt_obj.columnIndex==2) {fieldName="Nama"}
if (evt_obj.columnIndex==3) {fieldName="Kelas"}
if (evt_obj.columnIndex==4) {fieldName="Komputer"}
if (evt_obj.columnIndex==5) {fieldName="CPU"}
if (evt_obj.columnIndex==6) {fieldName="Keyboard"}
if (evt_obj.columnIndex==7) {fieldName="Mouse"}
var fieldID=evt_obj.target.selectedItem["No"];
var fieldNewValue=evt_obj.target.selectedItem[fieldName];
var newQuery="UPDATE mytable SET "+fieldName+" = \""+fieldNewValue+"\" WHERE No="+fieldID;
mdm.Database.MSAccess.runQuery(newQuery);
mdm.Dialogs.prompt("Row with ID:"+fieldID+" has been Updated in the Database");

}
_level0.myDataGrid.addEventListener("cellEdit", listenerObject)



stop();
“Jika Diatas Ada Kata {fieldName=Jamke”}Itu adalah Variabel yang berada di database”

10.Klo Pada Desain Yang saya Buat saya Punya 3 Button Dengan Nama Menghubungi
Admin,Meminjam,Login.Menghubungi Admin Berguna Untuk Reconect Ke
Database,Meminjam Berfungsi Untuk Masuk Ke Database,Login Berfungsi Untuk Keluar
Dan Menyimpan Dara yang telah dimasukan ke database.
11.Masuk Ke Action Script milik Menghubungi admin lalu masukan Action Berikut.
----------------------------------------------------------
on (release) {
//Connect to our Database
var pass = "";
mdm.Database.MSAccess.connectAbs(mdm.Application.path+"base.mdb", pass);
dbsuccess = mdm.Database.MSAccess.success();
if (dbsuccess == true) {
mdm.Dialogs.prompt("Hubungan Berhasil");
// Disable this button
_level0.dbconnect.enabled = false;
// Enable the Populate DataGrid Button
_level0.populate.enabled = true;
} else {
mdm.Dialogs.prompt("Terdapat kesalahan!! mohon Hubungi Admin");
}
}
---------------------------------------------------------
Penjelasan:
Bagian Ini Adalah Sebuah Action Untuk Mengubungkan Ke Database Dan Pemberitahuan Status apakah berhasil atau gagal.

12.Setelah itu Masuk ke Action Script Milik Meminjam Lalu Isikan Action Berikut.
--------------------------------------------------------------------
on (release) {
//Here we are populating the Datagrid with the data from a specific table in the database.
_level0.myDataGrid.addColumn("No");
_level0.myDataGrid.addColumn("Jamke");
_level0.myDataGrid.addColumn("Nama");
_level0.myDataGrid.addColumn("Kelas");
_level0.myDataGrid.addColumn("Komputer");
_level0.myDataGrid.addColumn("CPU");
_level0.myDataGrid.addColumn("Keyboard");
_level0.myDataGrid.addColumn("Mouse");
mdm.Database.MSAccess.select("SELECT * FROM mytable");
var dataSet = mdm.Database.MSAccess.getData();
var rows:Number = 0;
var numOfRecords:Number = dataSet.length;
for (rows=0; rows var item:Object = {};
item.No = dataSet[rows][0].toString();
item.Jamke = dataSet[rows][1].toString();
item.Nama = dataSet[rows][2].toString();
item.Kelas = dataSet[rows][3].toString();
item.Komputer = dataSet[rows][4].toString();
item.CPU = dataSet[rows][5].toString();
item.Keyboard = dataSet[rows][6].toString();
item.Mouse = dataSet[rows][7].toString();
_level0.myDataGrid.addItem(item);
}
// Set the column widths
_level0.myDataGrid.getColumnAt(0).width = 50;
_level0.myDataGrid.getColumnAt(1).width = 150;
// Make ID Column Read-Only
_level0.myDataGrid.getColumnAt(0).editable = false;
_level0.populate.enabled = false;
}
------------------------------------------------------------------

Penjelasan:
Action Di atas Adalah Action Untuk Membandingkan antara Variable Database Dan Perintah Yang Akan di Eksekusi.

13.Masuk Ke Action Script Milik Login Lalu Masukkan Action Berikut.
--------------------------
on (click)
{
mdm.Application.exit();
}
--------------------------
Penjelasan:
Action Diatas Memerintahkan Untuk Keluar Dari Database.

14.Setelah Itu Anda Simpan File Project Anda Dengan Exetention .fla dalam sebuah folder.
15.Buka Ms.Acces
16.Buat Table Dengan Isi Yang Sama Dengan Variable Meminjam.dengan nama table mytable Contoh

_level0.myDataGrid.addColumn("Jamke"); Berarti Action Disamping Akan Menambahkan Column ke DaraGrid Flash Dengan Variable Jamke Yang harus Sama Dengan Variable yang ada di dalam table Ms.acces yang berisikan Jamke (Case Sensitif).

17.Simpan file dengan Exetention .mdb dengan nama bebas (harus ada yang dirubah di
action) atau defaultnya dengan nama base.mdb.
18.semuah bahan telah siap lalu anda buka MDM zinc.sebelum itu anda buat .sfw dari file
.fla yang tadi telah di simpan dalam satu folder.
19.lalu Pilih Sourch File dan anda pilih Nama fike swf yang telah anda buat tadi
20.pilih lokasi target untuk menyimpan file .exe
21.untuk defaultnya anda tinggal pilih build tapi bila anda ingin menambahkan bebrapa
kontent anda bisa melakukan otu di aplikasi MDM zinc ini.

Perhatian.
Simpan File .mdb dan .exe nya dalam satu folder.

Mungkin itu sebuah tutorial yang sederhana yang saya kasih semua itu bisa anda kembangkan dengan bebas sesuka hati anda.

Diposting oleh Ario-Gokil-Abis Jumat, 24 April 2009 0 komentar

Membuat game dengan m Flash 8
1.Buka aplikasi Flash 8
2.Pilih Create New Flash Document
3.Ubahlah besar kertas dengan ukuran 300 x 400 pixels
Berilah script Stop ()
4.Pada lembar kerja buatlah dua garis di pinggir kertas.. seperti ini yang kiri kasih instance name 1 dan yang kanan 2 berikan script:
onClipEvent (enterFrame) {
if (hitTest(_root.bola)) {
_root.bola.kecepatany = -_root.bola.kecepatany;
}
}
onClipEvent (enterFrame) {
if (Key.isDown(Key.UP)) {
// bergerak ke kiri jika panah atas ditekan
_x -= 10;
}
if (Key.isDown(Key.DOWN)) {
// bergerak ke kanan jika panah bawah ditekan
_x += 10;
}
}

Untuk Kotak yang atas

onClipEvent (enterFrame) {
if (hitTest(_root.bola)) {
_root.bola.kecepatany = -_root.bola.kecepatany;
}
}
onClipEvent (enterFrame) {
if (Key.isDown(Key.LEFT)) {
// bergerak ke kiri jika panah kiri ditekan
_x -= 10;
}
if (Key.isDown(Key.RIGHT)) {
// bergerak ke kanan jika panah kanan ditekan
_x += 10;
}
}

5.Kemudian ubah kedua garis tersebut kedalam bentuk movie clip dengan menekan F8
6.Buat kembali 2 garis untk dijadikan sebagai pemukul dan kemudian ubah kembali gambar tersebut ke dalam bentuk movie clip.. player 1 kasih instance name “horizontal” dan player 2 “vertikal” , dan berikan script:
onClipEvent (enterFrame) {
if (hitTest(_root.bola)) {
_root.bola.kecepatanx = -_root.bola.kecepatanx;
}
}

7.Sekarang tinggal membuat bola. jangan lupa ubah menjadi movie clip
8.Buatlah garis di luar layar dan beri instance name yang kanan kasih “player 1” dan yang kiri player 2
9.Buatlahlembar kerja anda
10.Sekarang tinggal memberi action Script

Simpan action script ini di BOLA
onClipEvent (load) {
kecepatanx = 10;
kecepatany = 10;
}
onClipEvent (enterFrame) {
_x += kecepatanx;
_y += kecepatany;
}


Ini script untuk player 1

onClipEvent (enterFrame) {
if (hitTest(_root.bola)) {
_root.bola.kecepatany = -_root.bola.kecepatany;
}
}
Ini untuk player 2
onClipEvent (enterFrame) {
if (hitTest(_root.bola)) {
_root.bola.kecepatanx = -_root.bola.kecepatanx;
}
}


Untuk tombol beri script
on(release){
gotoAndStop(1)
}
Dan ditiap layer beri script stop();

nikmati permainan dengan control
Player 1 : key Left untuk kekiri dan key Right untuk kekanan
Player 2 : CTRL untuk kekiri dan Space untuk kekanan

untuk mendownload game ini klik disini

Diposting oleh Ario-Gokil-Abis 0 komentar

Diposting oleh Ario-Gokil-Abis Selasa, 10 Maret 2009 0 komentar

Pertama diumumkan saya diterima atau tidak di SMK N 2 Bandung, saya sangat tegang untuk menanti hasil pengumumannya. Ternyata setelah saya menerima hasil pengumuman dan saya melihatnya, ternyata saya pun diterima di SMK N 2 Bandung di Jurusan Teknik Komputer Jaringan.

Setelah saya diterima di sekolah ini, saya pun mengikuti kegiatan yaitu di OSPEK, dengan di latih MPLS, dan LDDT. Inti dari semua itu adalah bagaimana kita dapat berdisiplin, dan bertanggung jawab dalam setiap hal.

Setelah kegiatan tersebut selesai, saya pun memulai kegiatan pembelajaran di Jurusan Teknik Komputer Jaringan. Hampir sebagian besar Guru-guru yang mengajar di Teknik Komputer Jaringan berkata, sekolah di jurusan ini mah harus siap mental dan fisik. Ada yang berkata bahwa di Jurusan TKJ, biasa sapaan untuk Jurusan Teknik Kompuer Jaringan tersebut, mengatakan bahwa di TKJ mah akan banyak ada tugas, kalau tak mau banyak tugas, ya jangan sekolah. Ada juga yang bilang di TKJ akan ada banyak tugas tak henti-hentinya seperti shootgund. Ada juga yang bilang sekolah di TKJ mah adalah jurusan neraka. Pokonya semua tentang yang pahit-pahit di TKJ diceritakan terlebih dahulu oleh Guru-guru di TKJ.

Setelah mendengar perkataan tersebut, saya pun merasa tegang dan tertekan. Lalu Pak Sukarna sebagai Ketua Jurusan memberikan satu pilihan, dengan pertanyaan. Siapa yang tidak siap?, silakan mengundurkan dari!. Dan ternyata ada beberapa siswa yang mengundurkan diri, dan pindah ke Jurusan Lain.

Setelah hari demi hari ku lalui, ternyata apa-apa yang pernah dikatakan oleh Guru-guru menjadi kenyataan.Sekolah di Jurusan TKJ memang banyak sekali tugas-tugas, tugas-tugas tersebut menanti kita, bahkan tak henti-hentinya.Tapi APA DAYA TANGAN TAK SAMPAI. NASI TELAH MENJADI BUBUR. Saya pun telah masuk ke dalam Jurusan ini (Teknik Komputer Jaringan).Ya saya nikmat saja,walaupun saya banyak mengeluh ,dan merenung. Tapi lama-kelamaan, itu pun menjadi sebuah kebiasaan.Jadi rasanya hidup ini hampa bila tak ada tugas. Tapi saya pun menyadari bahwa semua itu adalah yang terbaik bagi saya, agar dapat bersaing di dunia pekerjaan nantinnya.

Dan ada juga yang menjadi ciri khas di TKJ, bahwa setiap akhir pembelajaran di setiap semester akan diadakan Uji Kompetensi, yang biasa disebut dengan SIDANG. Ini merupakan pengalaman pertama bagi saya. Tenyata sangat menegangkan, bagaimana tidak, karena di Ujinya pun dengan cara di tes secara lisan oleh para penyidangnya tersebut. Tapi tentunya semua itu akan menjadi pelajaran, dan pengalaman yang berharga bagi saya pribadi.

Di TKJ pun ada suka dan dukannya. Sukannya yaitu di TKJ lebih ditekekan kebersamaan, dan dapat memahami apa itu arti kebersamaan. Dukannya yaitu kita lebih banyak biberi tugas-tugas oleh Guru-guru, dan dapat belajar untuk bagaimana kita dapat berdisiplin, dan bertanggungjawab. Tapi semua itu akan saya hadapi dengan senagh hati, dan akan menjadi cobaan yang siap untuk saya hadapi.

Diposting oleh Ario-Gokil-Abis Rabu, 25 Februari 2009 0 komentar

Subscribe here