Etiketler
|
|
|
Ofisi Kaldirip Tekrar Kurdum Kodlar Calismiyor ?
|
Arkadaslarim merhabalar ,
Ofis 2007 yi kaldirdim ve tekrar ayni sekilde ofis 2007 kurdum, VB bilesenlerini yukledim fakat yaptigim veritabanini actigimda formlar felan geliyor ama hic bir islem yapmiyor ? butonlarin gorevleri felan yok olmus gibi sanki.
Yeni bir veritabani aciyorum ve disardan al diyerek yeni veritabanina aliyorum ilk calistridigim anda calisiyor sonra o da ayni sekilde butonlari ve yazdigim hic bir kod calismiyor ne yapmaliyim ? Ilginiz icin tesekkurler.
Saygilarimla.
|
Yazar: SérqeN - Cevaplar: 13 - İzleme: 18156
vB Kodlar İle Veritabanı ve Tablo Oluşturma
|
[Resim: http://img136.imageshack.us/img136/2761/kod.jpg][Resim: http://img136.imageshack.us/img136/4015/kod2.jpg]
Visual Basic 6.0 da Yine Tarafımdan Yapılmış Daha önce verdiğim örneklere göre biraz daha gelişmiş bir program örneği..Programda Bazı Eksiklik veya Hata olabilir..Bunun için Dilerim..Umarım Beğenirsiniz..Saygılarımla ..
By SérqeN
|
tablo özelliklerini ve son tasarım bilgilerini gösteren kodlar
|
tablolarınızın alan ve özelliklerini listeleyen kod ile veritabanınızda bulunun objelerin son değiştirilme zamanlarını gösteren kodlar.
|
bu kodlar neden hata veriyor
|
bu kodlar benim bilsgisyaarımda çalışıyor. Ama okulda iki bilgisayar da denedim hata verdi.
Bu kodlarda hata varmı
Private Sub Form_Load()
Calendar4 = date
End Sub
Denetime uyan kaydı sorgu üzerinden filtreleyerek halledebileceğimi sanıyorum.
Ama Calendar4=date neden hata veriyor
Private Sub Açılan_Kutu5_AfterUpdate()
' Denetime uyan kaydı bul.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[sınıf] = '" & Me![Açılan Kutu5] & "'"
If Not rs.EOF Then Me.Bookmark
|
access 2007'de kodlar çalışmıyor???
|
Merhaba arkadaşlar
Access 2007'de yazdığım hiç bir kod çalışmıyor. Access'i kaldırıp tekrar yükledim yinede olmuyor. sizlerin yardımlarınızı bekliyorum
|
Kodlar ile yeni kayıt oluşturma ve alanlara değer atama
|
Arkadaşlar Merhaba
Ekteki dosyada FIRMAICI formunda bir kayıt açtığımda "KARŞI KAYIT OLUŞTUR" butonuna basıldığında yeni bir kayıt
oluşturmasını ve bu formda, mevcut kayıtta hareket türü "DEPODAN ÜRETİME" ise yeni formda "URETIMDEN DEPOYA",
eğer hareket türü "ÜRETİMDEN DEPOYA" ise yeni kayıtta "DEPODAN ÜRETİME" olmasını istiyorum.
Fakat kodlar ile nasıl yeni kayıt açacağımı ve buradaki alanlara yukarıda anlattığım üzere nasıl değer atayacağımı
bilmiyorum.
Yardım eden ve i
|
Yazar: erkanb - Cevaplar: 2 - İzleme: 1870
Kodlar çalışmyor.
|
Başka bir office 2003 yüklü bilgisayarda çalışan program benim bilgisayarımda çalışmıyor. office updatelerinide yaptım bir sürü şey denedim fakat olmadı. Hatayı ekte gönderiyorum. Yardımcı olur musunuz? Teşekkürler...
|
Rapor açılırken kodlar ile textbox ın çalışması ?
|
herkese merhaba, şimdi ben bir rapor hazırladım ve rapora bir textbox koydum.. istediğim şey raporlara puan vermek belli değerlere göre. bunun için kodda yazdım ve tam istediğim gibi bir kod oldu hiç bir sorunu yok fakat yapamadığım şey şu : rapor açıldığında kod direk çalışsın ve rapora koyduğum textbox in içine puanı yazsın. yani textbox yanına bir buton koyup tıklayınca kod çalışıyor ama benim istediğim butona tıklamadan direk form açılınca kodun çalışması ve textboxa puanını yazması ? örnek
|
Yazar: HSayar - Cevaplar: 4 - İzleme: 3696
kodlar.mdb nin ilceler tablosundan sahıs.mdb nin sahıs vt alanındaki kaydı tamamlamak.
|
tblSAHIS tabllosunun ilcekodu alanı boş, il adı ve ilce adı alnları dolu ise Aynı veritabanında bulunan ytbl_MERNISILCEKOD tablosunda il adı ve ilce adı tblsahıstakilerle eşleşiyorsa ilçe kodunu alıp Tblsahıs.ılcekodu alanını güncelleyen kodları alpeki ve sleadgeab hocalarım sayesinde çözdüm.
ancak genel senaryoda böyle bir şey mümkün değil. MERNISILCEKOD tablosu başka bir veritabanı içinde olsa (idi ki öyle olmalı) mesala (vtKODLAR.MDB) aşağıdaki visiual basic kodları nasıl değişmelidir?
|
vb 2005 de kullanılan kodlar
|
Imports System.Data
Public Class Form1
Dim dt As New DataTable()
Public Sub recordGrid(ByVal resql As String)
Dim connStr As String = "Provider = Microsoft.Jet.OLEDB.4.0;" & _
"Data Source = derspro.mdb"
Dim dataAdapter As New OleDb.OleDbDataAdapter(resql, connStr)
dataAdapter.Fill(dt)
dataAdapter.Dispose()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVa
|