• 21-04-2020, 21:42:47
    #1
    merhaba herkese kolay gelsin.

    if request("add")<>"" then
    Rs.ActiveConnection = bag
    Sorgu="SELECT * FROM contact_trans WHERE id="& id &""
    rs.open "contact_trans",bag,3,2
    rs.addnew


    bu şekilde mysql e veri giremiyorum burada sql sorgusumu yanlış bağlantı kodu mu yanlış? yada başka bir yerdemi hata?

    tıkandım yine

    şimdiden teşekkür ederim.



    if request("add")<>"" then
    Rs.ActiveConnection = bag
    Sorgu="SELECT * FROM contact_trans WHERE id="& id &""
    rs.open "contact_trans",bag,3,2
    rs.addnew
    rs.fields ("workspace")=request("workspace")
    rs.fields ("contact_id")=request("contact_id")
    rs.fields ("description")=request("description")
    rs.fields ("amount")=request("amount")
    rs.fields ("debt")=request("debt")
    rs.fields ("credit")=request("credit")
    rs.fields ("_right")=request("_right")
    rs.fields ("trans_type")=request("trans_type")
    rs.fields ("trans_date")=request("trans_date")
    rs.fields ("trans_dir")=request("trans_dir")
    rs.fields ("trans_year")=request("trans_year")
    rs.fields ("trans_month")=request("trans_month")
    rs.fields ("exc_code")=request("exc_code")
    rs.fields ("exc_rate")=request("exc_rate")
    rs.fields ("exc_equivalent")=request("exc_equivalent")
    rs.fields ("insert_by")=request("insert_by")
    rs.fields ("insert_at")=request("insert_at")
    rs.fields ("update_by")=request("update_by")
    rs.fields ("update_at")=request("update_at")
    rs.fields ("version")=request("version")
    rs.fields ("receipt_no")=request("receipt_no")
    rs.fields ("maturity")=request("maturity")
    rs.fields ("trans_no")=request("trans_no")
    rs.fields ("trans_source_id")=request("trans_source_id")
    rs.fields ("trans_point_id")=request("trans_point_id")
    rs.fields ("private_code_id")=request("private_code_id")
    rs.fields ("ref_module")=request("ref_module")
    rs.fields ("ref_id")=request("ref_id")
    
    rs.update
    rs.close
    set rs=nothing
    Response.Redirect("muhasebe_cari_acilis_ekle.asp")
    end if
    End If
  • 22-04-2020, 05:32:57
    #2
    salsa77 adlı üyeden alıntı: mesajı görüntüle
    merhaba herkese kolay gelsin.

    if request("add")<>"" then
    Rs.ActiveConnection = bag
    Sorgu="SELECT * FROM contact_trans WHERE id="& id &""
    rs.open "contact_trans",bag,3,2
    rs.addnew


    bu şekilde mysql e veri giremiyorum burada sql sorgusumu yanlış bağlantı kodu mu yanlış? yada başka bir yerdemi hata?

    tıkandım yine

    şimdiden teşekkür ederim.



    if request("add")<>"" then
    Rs.ActiveConnection = bag
    Sorgu="SELECT * FROM contact_trans WHERE id="& id &""
    rs.open "contact_trans",bag,3,2
    rs.addnew
    rs.fields ("workspace")=request("workspace")
    rs.fields ("contact_id")=request("contact_id")
    rs.fields ("description")=request("description")
    rs.fields ("amount")=request("amount")
    rs.fields ("debt")=request("debt")
    rs.fields ("credit")=request("credit")
    rs.fields ("_right")=request("_right")
    rs.fields ("trans_type")=request("trans_type")
    rs.fields ("trans_date")=request("trans_date")
    rs.fields ("trans_dir")=request("trans_dir")
    rs.fields ("trans_year")=request("trans_year")
    rs.fields ("trans_month")=request("trans_month")
    rs.fields ("exc_code")=request("exc_code")
    rs.fields ("exc_rate")=request("exc_rate")
    rs.fields ("exc_equivalent")=request("exc_equivalent")
    rs.fields ("insert_by")=request("insert_by")
    rs.fields ("insert_at")=request("insert_at")
    rs.fields ("update_by")=request("update_by")
    rs.fields ("update_at")=request("update_at")
    rs.fields ("version")=request("version")
    rs.fields ("receipt_no")=request("receipt_no")
    rs.fields ("maturity")=request("maturity")
    rs.fields ("trans_no")=request("trans_no")
    rs.fields ("trans_source_id")=request("trans_source_id")
    rs.fields ("trans_point_id")=request("trans_point_id")
    rs.fields ("private_code_id")=request("private_code_id")
    rs.fields ("ref_module")=request("ref_module")
    rs.fields ("ref_id")=request("ref_id")
    
    rs.update
    rs.close
    set rs=nothing
    Response.Redirect("muhasebe_cari_acilis_ekle.asp")
    end if
    End If
    aldığınız hata ne hocam

    Sorgu="SELECT * FROM contact_trans WHERE id="& id &""burayı
    Sorgu="SELECT * FROM contact_trans"yapın birde
    rs.fields ("trans_date")=......
    yerine
    rs("trans_date")=......
    şeklinde yapın bakalım
  • 22-04-2020, 19:14:14
    #3
    oktayman adlı üyeden alıntı: mesajı görüntüle
    aldığınız hata ne hocam

    Sorgu="SELECT * FROM contact_trans WHERE id="& id &""burayı
    Sorgu="SELECT * FROM contact_trans"yapın birde
    rs.fields ("trans_date")=......
    yerine
    rs("trans_date")=......
    şeklinde yapın bakalım



    500 iç sunucu hatası alıyorum ne yaptıysam asp hatalarını gösteremedim. sunucu yöneticilerine de bir türlü anlatamadım. 500 iç sunucu hatası vermeye devam ediyor verdiğiniz düzenlemeler ile de aynı sonuç..



    yanlız aynı kodlar ile farklı tablolara veri yazabiliyorum. saha önce buna benzer bir hata yaşamıştım çalışan saayfalar sunucu değişince çalışmaz olmuştu. veritabanındaki tinyint türündeki alanları int oalrak değiştiridim düzelmişti.

    şimdi bu tablodaki tek dğeişik alan "double" türündeki alanlar ama aynı veritabanını muhasebe programı kulanndığı için veritabanında düzenleme yapmak istemiyorum. program bozulmasın sonra.

    contact_trans tablosunda bazı alanlar double türünde. bu alanlara girilen veriler ücret türleri. double nedir diye baktım virgüllü büyük sayılar diyor google bey amca...

    şimdi bu double alanlarını int yapsak belki düzelecek ama program bozulur sonra sıkıntı olur diye korkuyorum. ama mysql in özelliği olan bir türü neden kullanamıyorum onu anlamış değilim.
  • 23-04-2020, 00:27:49
    #4
    asp de cdbl() komutu ile verileri doubleye çevirebilirsiniz ama hatayı net göremeden çözmek zor. 500 iç sunucu hatası alıyorsanız muhtemelen localde çalışmıyorsunuz. tavsiyem localde çalışan dosyaları siteye atmayınız. olmazsa veritabanınızın bir yedeğini alın önce o şekilde denersiniz.
    localde çalışıyorsanız https://www.keykubad.com/windows-iis...ida-gostermek/ şunu okuya bilirsiniz