AltınSoft Makale Arşivi

Anasayfa | Toplu SMS | Video | Web Hosting | Makale Ara | Anketler | Sitene Ekle | RSS Kaynağı

Kayıt güncelleme

Kayıt güncelleme

Kategori	: Asp.NET
Yorum Sayısı	: 0
Okunma	: 294
Tarih	: 15 Aralık 2007 00:24

 Dim a As String
        a = listem.SelectedValue
        Dim durumm As String
        durumm = "İptal"
        Dim baglan As String
        baglan = ConfigurationManager.AppSettings("baglanti").ToString
        Dim con As New Data.SqlClient.SqlConnection(baglan)
        con.Open()
        Dim sql2 As String = "update siparisler set durum=@ab where siparisno=@aa"
        Dim cmd2 As New Data.SqlClient.SqlCommand(sql2, con)
        cmd2.Parameters.AddWithValue("@aa", a)
        cmd2.Parameters.AddWithValue("@ab", durumm)
        cmd2.ExecuteNonQuery()
        con.Close()
        Response.Redirect("siparisler.aspx")

54321

© 2004-2009 Tüm Hakları Saklıdır
RSS Kaynağı

AltınSoft Bilişim Teknolojileri

Altyapı: MyDesign Haber Sistemi