İyinet'e Hoşgeldiniz!

Türkiye'nin En Eski Webmaster Forum'una Hemen Kayıt Olun!

Kayıt Ol!

Bu ne yaa

K

kubilayerkec

0
İyinet Üyesi
Katılım
19 Ağustos 2006
Mesajlar
496
Reaction score
0
Konum
Ankara
arkadaşlar kullandığım bi online destek scripti aşağıdaki hatayı veriyor..

ADODB.Recordset error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/chat/chat/Default.asp, line 29

default.asp komple:

Kod: 
<%
Dim strQ
strQ = Request.querystring("Q")
IF strQ = "1" THEN strQ = strTxtAdminRequest ELSE strQ = "" END IF
%>
<%
'Set some variables
Dim rsChatRequest2 'Chat request record sheet

'Open a new connection to the database
adoCon.Open cString

'Create new SQL string
StrSQL="SELECT * FROM tblActiveUsers WHERE IP='" & strIPAddress & "';"

'Create new record sheet
set rsChatRequest2	=Server.CreateObject("ADODB.Recordset")

'Set cursor and locktypes
rsChatRequest2.CursorType = 2
rsChatRequest2.LockType = 3

'Open row data where the logged in users IP equals the IP in the database
rsChatRequest2.open StrSQL, CString

'Set
rsChatRequest2.fields("ChatRequest")=0

rsChatRequest2.Update

'Close record sheet and clean up
rsChatRequest2.Close
Set rsChatRequest2 = Nothing
%>

<%
	'Redirect the administrator if the password in query string matches the one in the database
	IF strAdminPass	 = QstrAdminPass THEN Response.redirect("chat.asp?addpass="&strAdminPass&"&ID="&intUsrID)
%>
<html>
	<head>
		<title>
			<%=strCompanyName%> <%=strTxtLiveSupport %>
		</title>
		<!--#include file="style/style.asp" -->
	</head>
	<body background="<%=img_bg%>" style="margin: 0" topmargin="0" leftmargin="0" rightmargin="0" marginwidth="0" marginheight="0">
		<Center>
			<table  width="100%" border="0" cellspacing="0" cellpadding="0" height="45">
				<tr>
					<td>
					</td>
				</tr>
			</table>
			<table  width="300" border="0" cellspacing="0" cellpadding="0">
				<tr>
					<td><img src="<%=img_top_left_curve%>"></td>
					<td class="header" align="center" bgcolor="#000000" width="100%">
						<b><%=strCompanyName%></b>
					</td>
					<td><img src="<%=img_top_right_curve%>"></td>
				</tr>
			</table>
			<table  width="300" border="0" cellspacing="0" cellpadding="0">
				<tr>
					<td align="center">
						<table  width="100%" border="0" cellspacing="1" cellpadding="1" bgcolor="#000000">
							<tr>
								<td bgcolor="#ffffff" align="center">
									<table  width="100%" border="0" cellspacing="0" cellpadding="0">
										<tr>
											<td align="center">	
												<table  width="100%" border="0" cellspacing="2" cellpadding="0">
													<tr>
														<td>
															<table  width="100%" border="0" cellspacing="1" cellpadding="1" bgcolor="#000000">
																<tr>
																	<td bgcolor="<%=img_bg_colour%>" <% IF strColourScheme <> "white" THEN Response.write("class=header")%> align="center">
																		<b>
																			 <% IF strColourScheme="white" THEN%><font color="#808080"><%ELSE%><%END IF%><%=strTxtLogin%>
																		</b>
																	</td>
																</tr>
																<tr>
																	<td bgcolor="#ffffff" class="main" align="center"><font color="#008040"><b><%=strQ%></b></font>
																		<table  width="100%" border="0" cellspacing="0" cellpadding="2">
																			<tr>
																				<td class="main" align="center">
																					<BR>
																					<form action="chat_sort.asp" method="post">
																						Adınız ve Soyadınız:
																						<input type="text" name="login" size="15" class="textbox"><p>
																						<input type="submit" value="<%=strTxtEnter%>" class="button">
																					</p>
																					</form>
																					<b>
																						<%=strOperatorName%>
																					</b>
																					<%=strTxtWelcome%>
																			 		<BR>
																					<BR>																					
																				</td>
																			</tr>
																		</table>																		
																	</tr>
																</table>
															</td>
														</tr>
													</table>					
												</td>
											</tr>
										</table>										
									</td>
								</tr>
							</table>
						</td>
					</tr>
				</table>
				<table  width="300" border="0" cellspacing="0" cellpadding="0" height="15">
					<tr>
						<td width="15"><img src="<%=img_bottom_left_curve%>" width="15" height="15"></td>
						<td class="header" align="center" bgcolor="#000000">
							© <a href="http://www.ileripc.com/" class="whitelink" target="_blank">İleri Bilgisayar</a>
						</td>
						<td width="15"><img src="<%=img_bottom_right_curve%>" width="15" height="15"></td>
					</tr>
					<tr>
						<td>
						</td>
					</tr>
				</table>
			</center>
		</body>
	</html>
 
K

kubilayerkec

0
İyinet Üyesi
Katılım
19 Ağustos 2006
Mesajlar
496
Reaction score
0
Konum
Ankara
Kod: 
<% 
    set conn = CreateObject("ADODB.Connection") 
    conn.open <connection string> 
    set rs = conn.execute(<sql>) 
    if not rs.eof then 
        do while not rs.eof 
            ' process 
            rs.movenext 
        loop 
    else 
        response.write "No matches." 
    end if 
    ' ... 
%>
bunu yapmamız gerektiğini söylüyor, ama verdiğim kodlara bunu nasıl eşleştireceğim
 
T

trextra

0
İyinet Üyesi
Katılım
4 Mart 2005
Mesajlar
5,290
Reaction score
0
Konum
Kadıköy
Biraz daha kibar olalım lütfen. Konu açarken başlık en önemli şeyken, gelişi güzel şeyler yazmayın.
 
K

kubilayerkec

0
İyinet Üyesi
Katılım
19 Ağustos 2006
Mesajlar
496
Reaction score
0
Konum
Ankara
yahu sanki küfür mü yazdım ne sanki, bu ne ya yazıyor biri güceniyor mu buna
 
K

Komikdunya.com

0
İyinet Üyesi
Katılım
27 Haziran 2005
Mesajlar
0
Reaction score
0
sorguda boş gelen kaydı güncellemey çalışıyorsun diyor.


rsChatRequest2.open StrSQL, CString

'Set

if not rsChatRequest2.eof then
rsChatRequest2.fields("ChatRequest")=0

rsChatRequest2.Update
end if

'Close record sheet and clean up
rsChatRequest2.Close
Set rsChatRequest2 = Nothing

Yazdığım gibi kodu güncelle
 
K

kubilayerkec

0
İyinet Üyesi
Katılım
19 Ağustos 2006
Mesajlar
496
Reaction score
0
Konum
Ankara
şimdi oldu ama bu seferde girişte hata veriyor...

asp den anlayan bi arkadaş msn den ilgilenirse güzel olur.. Scripti veririm kendisine o kısmı hallederse çok sevinirim
 
Cevap yazmak için giriş yap yada kayıt ol.

Türkiye’nin ilk webmaster forum sitesi iyinet.com'da forum üyeleri tarafından yapılan tüm paylaşımlardan; Türk Ceza Kanunu’nun 20. Maddesinin, 5651 Sayılı Kanununun 4. maddesinin 2. fıkrasına göre, paylaşım yapan üyeler sorumludur.

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

Üst