0
Kayıt Ol

ekle.open sorgum,bag,1,3 Hatası

15

●

1.307

  • 12-09-2010, 01:21:20
    #1
    BlackDare
    BlackDare
    Üyeliği durduruldu
    Arkadaşlar localda çalıştırdım.Şöyle bir hata verdi..

    Script error detected at line 54.
    Source line: ekle.open sorgum,bag,1,3
    Description: Yanlış türdeki değişkenler kabul edilebilir aralık dışında veya bir başkasıyla çakışan bağımsız değişkenler kullanılıyor.

    54. satırda şu var ;
    Response.Write "<b><center><font face=""Arial"" size=""2"" color=""#11B4EB"">Level Atladı"
    Asp'tan anlamıyorum.Gerekli olan başka bir dosya isterseniz onuda atayım.Saolun

    Edit:Yinede dosyayı vereyim.Üstünde düzenlemeler yaparsınız belki ;


    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-9" />
<!-- TemplateBeginEditable name="doctitle" -->
<title>Pokemon'um</title>
<!-- TemplateEndEditable -->
<link href="resimler/css_stil.css" rel="stylesheet" type="text/css" />
<!-- TemplateBeginEditable name="head" --><!-- TemplateEndEditable -->
</head>

<body>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td colspan="2"><img src="resimler/logo.jpg" alt="header" width="806" height="146" /></td>
  </tr>
  <tr>
    <td colspan="2" bgcolor="#333333" class="menu_nav"><a href="default.asp">Anasayfa</a><a href="top100.asp">TOP 100</a><a href="iletisim.asp"> İletişim</a></td>
  </tr>
  <tr>
    <td width="176" valign="top" class="left_column"><!-- TemplateBeginEditable name="left_column" -->


<TABLE><TR>

<TD BACKGROUND="resimler/top10.jpg" width="160" height="220">

<center><b><font color="white">Çok yakında</color></b></center>
</TD></TR></TABLE> 

      <!-- TemplateEndEditable --></td>
    <td width="630" valign="top" class="right_column"><!-- TemplateBeginEditable name="right_column" -->
      <p>
<%
yasaricli=request.Cookies("yasaricli" )("ip" )
yasar=request.servervariables("REMOTE_ADDR" )

if yasaricli=yasar then

Response.Write "Daha önceden bu Pokemon'a yardım ettiniz!"
%>
<%else%>
<!-- #include file="db.asp" -->
<%

set ekle=server.CreateObject("ADODB.recordset" )
sorgum = "Select * from kayit where id = "&id&""
ekle.open sorgum,bag,1,3

ekle("level" )=ekle("level" )+1
ekle("sayi" )=ekle("sayi" )+1

ekle.update
Response.Write "<b><center><font face=""Arial"" size=""2"" color=""#11B4EB"">Level Atladı"
ekle.close
%> 
<%end if%>
</p>
    <!-- TemplateEndEditable --></td>
  </tr>
  <tr>
    <td colspan="2" class="footer">Tasarım &amp; Programlama: CoderWriter <br> Images by suta-raito.com (Resimler &uuml;zerinde suta-raito.com hak sahibidir.)<br>Pokemon'um is in no way affiliated with or related to Nintendo or Game Freak.(Bu sitenin Nintendo ve Game Freak ile alakası yoktur.)</td>
  </tr>
</table>
</body>
</html>
  • 12-09-2010, 13:55:35
    #2
    BlackDare
    BlackDare
    Üyeliği durduruldu
    Arkadaşlar.Lütfen yardım edin.
  • 12-09-2010, 15:34:24
    #3
    denom
    denom
    --bu bölümü --

    set ekle=server.CreateObject("ADODB.recordset" )
    sorgum = "Select * from kayit where id = "&id&""
    ekle.open sorgum,bag,1,3

    ekle("level" )=ekle("level" )+1
    ekle("sayi" )=ekle("sayi" )+1

    ekle.update
    Response.Write "<b><center><font face=""Arial"" size=""2"" color=""#11B4EB"">Level Atladı"
    ekle.close

    -- bununla değiştirip denermisin --

    set ekle=server.CreateObject("ADODB.recordset" )
    sorgum = "Select * from kayit where id = "&id
    ekle.open sorgum,bag,1,3
    if not ekle.eof then
    if ekle("level")<> "" and ekle("sayi")<> "" then
    ekle("level")= ekle("level")+1
    ekle("sayi") = ekle("sayi")+1
    ekle.update
    else
    ekle("level")=1
    ekle("sayi") = 1
    ekle.update
    end if

    Response.Write "<b><center><font face=""Arial"" size=""2"" color=""#11B4EB"">Level Atladı</font></center></b>"

    end if
    ekle.close
    set ekle = nothing
  • 12-09-2010, 15:54:31
    #4
    BlackDare
    BlackDare
    Üyeliği durduruldu
    Yine aynısını diyor.Localda çalıştırıyorum ondanmıdır acaba hocam?
  • 12-09-2010, 15:56:35
    #5
    tolgasen
    tolgasen
    🌐 𝘀𝗼𝗰𝗶𝗳𝗹𝘆.𝗰𝗼𝗺
    level ve sayı sütunlarının türü nedir?
  • 12-09-2010, 15:59:13
    #6
    BlackDare
    BlackDare
    Üyeliği durduruldu
    tolgasen adlı üyeden alıntı: mesajı görüntüle
    level ve sayı sütunlarının türü nedir?
    Hocam affola asp'tan anlamıyorum.İsterseniz istediğiniz dosyayı buraya gönderebilirim.İlk mesajda gönderdim zaten

    DB diyorsanız Tablo şeklinde..
  • 12-09-2010, 16:01:07
    #7
    tolgasen
    tolgasen
    🌐 𝘀𝗼𝗰𝗶𝗳𝗹𝘆.𝗰𝗼𝗺
    set ekle=server.CreateObject("ADODB.recordset" )
    sorgum = "Select * from kayit where id = "&id&""
    ekle.open sorgum,bag,1,3
    ekle("level" )=ekle("level" )+1
    ekle("sayi" )=ekle("sayi" )+1
    ekle.update

    Yazan yeri

    sorgum.execute("Update kayit set level = level + 1, sayi = sayi + 1 where id = "&id&"")

    olarak değiştirirmisin ve onun altındaki

    ekle.close yazan yeri silebilirsin.
  • 12-09-2010, 16:07:55
    #8
    BlackDare
    BlackDare
    Üyeliği durduruldu
    tolgasen adlı üyeden alıntı: mesajı görüntüle
    set ekle=server.CreateObject("ADODB.recordset" )
    sorgum = "Select * from kayit where id = "&id&""
    ekle.open sorgum,bag,1,3
    ekle("level" )=ekle("level" )+1
    ekle("sayi" )=ekle("sayi" )+1
    ekle.update

    Yazan yeri

    sorgum.execute("Update kayit set level = level + 1, sayi = sayi + 1 where id = "&id&"")

    olarak değiştirirmisin ve onun altındaki

    ekle.close yazan yeri silebilirsin.
    Hocam yaptım.Şimdide ekle.close sildim diye
    Script error detected at line 53.
    Source line: else
    Description: 'End' gerekli

    Bu hatayı aldım?
  • 12-09-2010, 16:10:53
    #9
    tolgasen
    tolgasen
    🌐 𝘀𝗼𝗰𝗶𝗳𝗹𝘆.𝗰𝗼𝗺
    Hocam ilk kodlarından değiştir denom hocamıın kodlarından değil.