ADNAN GÖKTEN

Final Sınav Tarihleri Açıklandı

Adnan Gökten — Tue, 08 May 2012 17:56:30 +0000

2011-2012 Bahar Yarıyılı Final Sınav Tarihleri Açıklandı.Tüm Öğrencilerime başarılar dilerim.

Tarihler için TIKLAYINIZ

VISUAL BASİC PAKETLEME PÜF NOKTASI

Adnan Gökten — Sun, 29 Apr 2012 20:53:42 +0000

Visual basic 6.0′da paketleme yaparken, karşılaşabileceğimiz en garip durum, paketlemeyi yenilediğimizde dahi eski kurulumun duruyor olmasıdır. Bu durumu ortadan kaldırmak için paketleme yaptıktan sonra paketleme yapılan klasördeki uzantısı “.PDM” olan dosyayı silmek gerekir. Kolay gelsin.

ASPUPLOAD KULLANIMI

Adnan Gökten — Tue, 17 Apr 2012 20:16:39 +0000

Aspupload kullanarak dosya yüklemek için aşağıda basit bir örnek veriyorum. ilk kısımda resim.html dosyası ile upload.asp sayfasına resim dosyasını gönderiyoruz.

Resim.html

Sonra upload.asp dosyası ile gelen dosyayı ilk olarak uzantısı için koşullandırıyoruz. uzantısı “.jpg” veya “.gif” ise dosyayı kabul ediyoruz. Değil ise siliyoruz daha sonra dosyanın büyüklüğünü sonrada boyutlarına göre aynı işlemleri yapıyoruz. sonunda wwwroot içerisindeki resim klasörüne dosyayı kayıt edip, resmin adını da veri tabanına kayıt ediyoruz.

Kolay Gelsin

upload.asp

<%
dim a,b,c
set dosya=server.createobject(“persits.upload”)
set a=server.createobject(“adodb.connection”)
a.open “stok”
set b=server.createobject(“adodb.recordset”)
dosya.overwritefiles=false
dosya.save
for each aa in dosya.files
ads=dosya.form(“ad”)& aa.ext
if aa.ext=”.jpg” or aa.ext=”.gif” then
if aa.size<500000 then
if aa.imagewidth<200 and aa.imageheight<200 then
aa.saveas(“c:\inetpub\wwwroot\resim\” & dosya.form(“ad”) & aa.ext)
c=”insert into resim(isim,resim) values (‘” & dosya.form(“ad”) & “‘,’” & ads & “‘)”
b.open c,a,adopenstatic
else
response.write(“dosya en fazla 200×200 olmalı”)
aa.delete
end if
else
response.write(“Dosya çok büyük”)
aa.delete
end if
else
response.write(“Dosya resim değil”)
aa.delete
end if
next
%>

ASP de BASİT FORM ve LOGİN SAYFASI YAPIMI

Adnan Gökten — Tue, 27 Mar 2012 11:52:14 +0000

Açık kaynak kod yayınlamaya devam ediyorum.Asp kodları kullanarak basit bir form ve login sayfası yaptım.açıklaması ve veritabanı dahil tüm sayfaları aşağıda verilmiştir.Kolay gelsin

Form.html ile gönderilen bilgiler form.asp dosyası yardımı ile ODBC’de form olarak yayınlanmış veri tabanına aktarılıyor. Diğer bir taraftan login.html ile giriş yapan bir şifresi ile girip login.asp dosyasında kullanıcıların gönderdiği tüm mesajları görebiliyor. Onayladığı gönderiler ise mesaj.asp sayfasında yayınlanıyor.

Form.rar indir

YİĞİDİ ÖLDÜR HAKKINI VER

Adnan Gökten — Sat, 17 Mar 2012 17:33:35 +0000

Hiç kimse hırsızları sevmez çünkü hak etmeden bir şeyler kazanırlar hatta başkalarının hakkını alırlar. Ama günümüzde hırsızlık sadece bir şeyler çalmakla olmuyor. Emek hırsızları var benim en çok muhatap olduğum. Hani çocukken bir oyun oynarlardı. Biri tutmuş biri pişirmiş biri yemiş diye şimdi devir değişmiş. Biri tutuyor diğerleri onun payını da yiyor. Bir şeyler oluşurken nedir bilmeden, kaç gün kaç gece neler yaşanıyor ortaya bir şeyler çıksın diye bilmeden uzaktan yada yakından o kadar emeği çöpe atıyorlar. Ben onlara da TEŞEKKÜR EDİYORUM.

ÇOK ÇALIŞMAM LAZIM

Adnan Gökten — Fri, 16 Mar 2012 09:43:33 +0000

Oldukça yoğun bir dönemi geride bırakıyorum. Son zamanlarda etkinlikler ardı ardına geldi. Önce Yüksekokul bülteni, uzun uğraşlar sonunda nihayet ilk sayısını çıkartmayı başardım. Bülten konusunda özellikle sponsor ve baskı aşamasında Sayın Abdurrahman Kütük büyük emeğe sahip, Bülten dağıtımı derken tiyatro grubunun gösterisi geldi çattı, orada da öğrencilerimiz üstün çaba sarf ettiler, birkaç hafta sonu provalarına katıldım. Gerçekten zor şartlarda güzel işler başardılar ve tabii Sayın Öğretim Görevlisi Ömer Faruk Rençber oyunların sergilenme aşamasına gelmesinde önemli katkı sağladı. Hemen Ardından Ç.Ü. Kozan Meslek Yüksekokulu II. Geleneksel Satranç turnuvası yaklaşık 162 sporcu katıldı. Kozan’da satranç ve Sayın Halil Akyürek isimleri ayrılamaz. Kendilerine bir kez daha teşekkür ediyorum. Ve Masa tenisi Turnuvası, Çarşamba akşamları Voleybol maçları yapıyoruz, onlardan birinde küçük bir masa tenisi maçı yapmıştım orada aklıma geldi. Bugün kurumlar arası yaklaşık 50 oyunculu bir turnuvaya dönüştü, yarın bitiyor. Bu turnuvada da Teşekkür edecek o kadar çok kişi varki, Sayın Savcım Yılmaz Kaya, Gençlik Spor Müdürü Yıldırım Kavuklu, Kozan Belediyesi, İlçe Milli Eğitim Müdürlüğü ve tabii Sayın Ayhan Radavuş ve Kasım Dağlı. Bir Hafta Sonra voleybol maçları başlayacak hazırlıklar son aşamada, yaklaşık bir yıldır Birlikte oynuyoruz ortalama bir takımımız var inşallah bu sefer iyi bir derece alırız. Yazdıkça aklıma geliyor Yüksekokulumuzun Öğrenci voleybol ve basketbol takımlarımın oluşturulması gerekli. Yani daha çok işim var.

VISUAL BASIC 6.0 STOK TAKİP PROGRAMI

Adnan Gökten — Tue, 13 Mar 2012 21:42:09 +0000

Vizelere kadar 2 sınıf öğrencilerimle beraber visual basic 6.0 programlama dili kullanarak basit ve en önemlisi açık kaynak olarak bir STOK TAKİP programı taslağı hazırlayıp yazdım. Genellikle internette bu tip paylaşımlara rastlamadığım için bu dosyaları sizlerle paylaşıyorum.

Stoktakip.rar indir

Kolay Gelsin

Taş Yerinde Ağır mış

Adnan Gökten — Tue, 06 Mar 2012 19:35:33 +0000

Aslında bunu yazmak yada yazmamak arasında kaldım.“Taş yerinde ağırdır.”, bu günlerde bu atasözü aklıma takıldı, aslında hemen herkes anlamını biliyor. Ama bana göre bu cümle taş hareket etmesinde kimsenin ayağına çarpmasın diye nasihat olarak söyleniyor. Bence taş her yerde ağırdır.

ASP ile Sayfanıza Sayaç Ekleme

Adnan Gökten — Sun, 19 Feb 2012 17:37:44 +0000

ASP kullanarak sayfanıza veri tabanı kullanmadan sadece not defteri kullanarak basit bir sayaç ekleyebilirsiniz.

<%
set fso=server.createobject(“scripting.filesystemobject”)
set oku = fso.opentextfile(“c:\inetpub\wwwroot\sayac.txt”,1)
sayac=oku.readline
oku.close
sayac=sayac+1
set yaz = fso.opentextfile(“c:\inetpub\wwwroot\sayac.txt”,2)
yaz.writeline sayac
response.write(sayac)
yaz.close
%>

not: Opentextfile ile kullanılan “1″ dosyadan okumayı, “2″ üzerine yazmayı, “8″ eklemeyi ifade eder

yukarıda sarı ile yazılmış response komutunu sitenizin istediğiniz yerinde kullanabilirsiniz.

sayac.txt dosyasını wwwroot dizinine açıp güvenlik sekmesinden everyone yazma yetkisi vermeyi unutmayın.

Javascript ile Form Gönderme

Adnan Gökten — Sat, 04 Feb 2012 21:41:47 +0000

Bazen HTML ile oluşturduğumuz Form sayfasındaki bilgileri Submit butonuna tıklamadan göndermek isteyebiliriz işte o zamanlarda aşağıdaki gibi bir javascript kodu kullanırız.