asp bi satırlık sorun

ZoMBiE_8 · 26 Kasım 2007

<%
response.redirect "bayi.asp?islem=duzenle&ID="<%=RsBayi("BayiID")%>"
%>

bu satır nasıl yazılacak

koyu olan kısım doğrumu acaba bayi tablosunda bayiID sütunu için

webrlis · 26 Kasım 2007

<%
response.redirect "bayi.asp?islem=duzenle&ID=" & RsBayi("BayiID")
%>

ZoMBiE_8 · 27 Kasım 2007

hocam çok teşekkürler yanlız bi sorum daha olacak

ID=Request.QueryString("ID")
RsBayi.Open "SELECT * FROM Bayi Where BayiID=' " & id & " ' ",Conn, 1, 3

GİRİŞ İŞLEMLERİ

response.redirect "bayi.asp?islem=duzenle&ID=" & RsBayi("BayiID")

" & RsBayi("BayiID") burasını hep ilk kullanıcının idsi olarak alıyor..

3 satırdan ikinci olanı içinde sürekli aşağıdaki hatayı veriyor.
[Microsoft][ODBC Microsoft Access Sürücüsü] 'BayiID=' sorgu ifadesi içindeki Sözdizimi hatası (eksik işleç)
teşekkürler

webrlis · 27 Kasım 2007

RsBayi.Open "SELECT * FROM Bayi Where BayiID= " & ID ,Conn, 1, 3
bu şekilde denesen bi

ZoMBiE_8 · 27 Kasım 2007

yok hocam aynı hatayı verdi..
RsBayi.Open "SELECT * FROM Bayi Where BayiID= " & ID ,Conn, 1, 3
bu satırda bayiID den sonrasını kaldırsak (&ID). başka biyolla asagıdaki satırın sonundaki RsBayi("BayiID") sayısal değerini yazdırabilirmiyiz
response.redirect "bayi.asp?islem=duzenle&ID=" & RsBayi("BayiID")

webrlis · 27 Kasım 2007

set conn=server.createobject("adodb.connection")
conn.open "Provider=Microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("xxx.mdb")
set RsBayi= Server.CreateObject("ADODB.RecordSet")
SQL="select * from Bayi where BayiID="&request("BayiID")
RsBayi.open SQL,conn,1,3

bu şekildede yapablirsin bağlantıyı

ama az önceki şekildede sorun çıkartmaması gerekiyodu neden yaptı anlamadım

ZoMBiE_8 · 28 Kasım 2007

hocam 4-5 sayfalık bölüm 1-2 saatte bitti ama sadece bu satırlarla 4. günüm nerde hata anlamadım gene hata aldım acaba çelişen bu durummu var.. tüm kodlar asagıda..

<%
ID=Request.QueryString("ID")
RsBayi.Open "SELECT * FROM Bayi Where BayiID="&ID&"",Conn, 1, 3
if request.form("func") = "Giris" then

strkullanici = Temizle(Trim(request.form("Bayikullanici")))
strsifre = Temizle(Trim(request.form("Bayisifre")))

Set Conn = Server.CreateObject ("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(""&DbYolu&"")
Set Rec = Server.CreateObject ("ADODB.Recordset")

sql = "Select Bayikullanici, Bayisifre from Bayi WHERE Bayikullanici = '"& strkullanici & "' AND Bayisifre = '"& strsifre & "'"
Rec.Open sql,Conn,1,3

if Rec.eof then
response.write "<center> Hatalı Giriş Yaptınız. </center>"
Else
Session("site_username") = Temizle(Trim(Rec("Bayikullanici")))
Session("site_password") = Temizle(Trim(Rec("Bayisifre")))
response.redirect "bayi.asp?islem=duzenle&ID=" & RsBayi("BayiID")
end if
end if

%>

kodların eski halini koydum...

MadDriver · 28 Kasım 2007

ilk olarak şunu dene:

PHP:

<%
ID=Request.QueryString("ID")
response.write "<br>ID Numarasi: "&ID&"<br>
response.end
RsBayi.Open "SELECT * FROM Bayi Where BayiID="&ID&"",Conn, 1, 3
if request.form("func") = "Giris" then

strkullanici = Temizle(Trim(request.form("Bayikullanici"))) 
strsifre = Temizle(Trim(request.form("Bayisifre")))

Set Conn = Server.CreateObject ("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(""&DbYolu&"")
Set Rec = Server.CreateObject ("ADODB.Recordset")

sql = "Select Bayikullanici, Bayisifre from Bayi WHERE Bayikullanici = '"& strkullanici & "' AND Bayisifre = '"& strsifre & "'"
Rec.Open sql,Conn,1,3

if Rec.eof then
response.write "<center><br><br><b><em>Hatalı Giriş Yaptınız.</em></b><br></center>"
Else 
Session("site_username") = Temizle(Trim(Rec("Bayikullanici")))
Session("site_password") = Temizle(Trim(Rec("Bayisifre")))
response.redirect "bayi.asp?islem=duzenle&ID=" & RsBayi("BayiID")
end if
end if 

%>

Bunu denediğinde id numarası düzgün gelip gelmediğini görebilirsin. Eğer düzgün geliyorsa
ID=Request.QueryString("ID")
yerine
ID=cint(Request.QueryString("ID"))
yaparak dene.

işlemim garanti olsun diyosan şunu kullanabilirsin

PHP:

<%
ID=Request.QueryString("ID")
if ID <> "" and isnumeric(ID)=true then
RsBayi.Open "SELECT * FROM Bayi Where BayiID="&ID&"",Conn, 1, 3
if not RsBayi.eof then
if and request.form("func") = "Giris" then

strkullanici = Temizle(Trim(request.form("Bayikullanici"))) 
strsifre = Temizle(Trim(request.form("Bayisifre")))

Set Conn = Server.CreateObject ("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(""&DbYolu&"")
Set Rec = Server.CreateObject ("ADODB.Recordset")

sql = "Select Bayikullanici, Bayisifre from Bayi WHERE Bayikullanici = '"& strkullanici & "' AND Bayisifre = '"& strsifre & "'"
Rec.Open sql,Conn,1,3

if Rec.eof then
response.write "<center><br><br><b><em>Hatalı Giriş Yaptınız.</em></b><br></center>"
Else 
Session("site_username") = Temizle(Trim(Rec("Bayikullanici")))
Session("site_password") = Temizle(Trim(Rec("Bayisifre")))
response.redirect "bayi.asp?islem=duzenle&ID=" & RsBayi("BayiID")
end if
end if 
end if
end if
%>

ZoMBiE_8 · 28 Kasım 2007

id göstermedi hocam.. ama bunun için yonetim paneli vardı orda bi sorun çıkmıyordu.. hatta ordaki kodları kullanayım dedim hata vermişti.. anlamadım gitti.

MadDriver · 29 Kasım 2007

id göstermediyse çağırdığın sayfada sorun var. hangi sayfadan çağırıyorsan o sayfaya bak oradaki adreste id= den sonraki bölümü kontrol et

asp bi satırlık sorun

0

0

0

0

0

0

0

0

0

0

Backlink ve Tanıtım Yazısı için iletişime geçmek için Skype Adresimiz: .cid.1580508955483fe5