Hazır Kod Ve Script (İstekler Muhakkak Cevap Bulur) (4. sayfa)

$lang['Forgotten_password'] = 'I forgot my password';

// [+] 'Olympus Style' Login Screen 
  	$lang['olympus_login_BoardIndex'] = 'Board Index'; 
  	$lang['olympus_login_CreateAccount'] = 'Create an Account'; 
  	$lang['olympus_login_ViewFAQ'] = 'View FAQ'; 
  	$lang['olympus_login_Resend_Activation'] = 'Resend Activation'; 
  	$lang['olympus_login_HideOnlineSession'] = 'Hide my online status this session'; 
  	$lang['olympus_login_NewActivationSent'] = 'A new activation key has been sent; please check your e-mail for details on how to activate it.'; 
   
  	$lang['olympus_login_NoAccount'] = 'It appears that this account does not exist'; 
  	$lang['olympus_login_WrongPassword'] = 'It appears that you have entered an incorrect password'; 
  	$lang['olympus_login_InactiveAccount'] = 'It appears that this account is inactive'; 
  	$lang['olympus_login_LoggedIn'] = 'You have successfully logged in'; 
  	 
  	$lang['olympus_login_ActivateAccountMsg'] = 'Click %shere%s to send a new activation code'; 
  	$lang['olympus_login_RegisterAccountMsg'] = 'Click %shere%s to register this account'; 
  	$lang['olympus_login_SendPasswordMsg'] = 'Click %shere%s to send a new password'; 
   
  	$lang['olympus_login_LoginInfo'] = 'In order to login you must be registered.<br />Registering takes only a few seconds but gives you increased<br />capabilies. The board administrator may also grant additional<br />permissions to registered users. Before you login please ensure you<br />are familiar with our terms of use and related policies. Please<br />ensure you read any forum rules as you navigate around the board.'; 
  	$lang['olympus_login_AdminInfo'] = 'To login to the administration panel you must re-authenticate yourself to verify you are really the administrator of the board<br /><br />Once logged in you will be able to access the ACP until your session ends'; 
   
  	$lang['olympus_login_Click_return'] = 'Click %sHere%s to return to the where you were previously'; 
  	$lang['olympus_login_No_send_account_active'] = 'It appears that this account is already active.'; 
  	$lang['oly_adminactivation'] = 'Sorry but this board currently has ADMIN only activation enabled, Your account can only be activated by an administrator'; 
  // [-] 'Olympus Style' Login Screen 

$autologin = ( isset($HTTP_POST_VARS['autologin']) ) ? TRUE : 0;

 
  // [+] 'Olympus Style' Login Screen 
  						$hideonlinestatus = ( isset($HTTP_POST_VARS['hideonline']) ) ? 0 : 1; 
  // [-] 'Olympus Style' Login Screen 
  

if( $session_id )

// [+] 'Olympus Style' Login Screen 
  						$sql = "UPDATE " . USERS_TABLE . " SET user_allow_viewonline = " . $hideonlinestatus . " WHERE user_id = " . $row['user_id']; 
  						if ( !( $result = $db->sql_query( $sql ) ) ) 
  						{ 
  							message_die(GENERAL_ERROR, 'Error in updating online status', '', __LINE__, __FILE__, $sql); 
  						} 
  						if(!isset($HTTP_POST_VARS['admin'])) 
  						{ 
  							if ( empty ( $HTTP_POST_VARS['redirect'] ) ) 
  							{ 
  								$template->assign_vars(array( 
  									'META' => "<meta http-equiv=\"refresh\" content=\"3;url=index.$phpEx\">") 
  								); 
  								$message = $lang['olympus_login_LoggedIn'] . '<br /><br />' . sprintf($lang['Click_return_index'], '<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8454736&url=' . append_sid("index.$phpEx") . '" data-href="' . append_sid("index.$phpEx") . '">', '</a>'); 
  								message_die(GENERAL_MESSAGE, $message); 
  							} 
  							else 
  							{ 
  								$template->assign_vars(array( 
  									'META' => "<meta http-equiv=\"refresh\" content=\"3;url=" . append_sid( $HTTP_POST_VARS['redirect'] ) . "\">") 
  								); 
  								$message = $lang['olympus_login_LoggedIn'] . '<br /><br />' . sprintf($lang['olympus_login_Click_return'], '<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8454736&url=' . append_sid( htmlspecialchars( $HTTP_POST_VARS['redirect'] ) ) . '" data-href="' . append_sid( htmlspecialchars( $HTTP_POST_VARS['redirect'] ) ) . '">', '</a>'); 
  								message_die(GENERAL_MESSAGE, $message); 
  							} 
  						} 
  // [-] 'Olympus Style' Login Screen

						redirect(append_sid($url, true)); 
  					}

// [+] 'Olympus Style' Login Screen 
  					else if ( ! $row['user_active'] ) 
  					{ 
  						$message = $lang['olympus_login_InactiveAccount'] . '<br /><br />' . sprintf($lang['olympus_login_ActivateAccountMsg'], "<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8454736&url=' . append_sid("login.$phpEx") . '" data-href="' . append_sid("login.$phpEx") . '">', '</a>'); 
  						message_die(GENERAL_MESSAGE, $message); 
  					} 
  // [-] 'Olympus Style' Login Screen

						message_die(GENERAL_ERROR, 'Tried to redirect to potentially insecure url.'); 
  					}

// [+] 'Olympus Style' Login Screen 
  					$message = $lang['olympus_login_WrongPassword'] . '<br /><br />' . sprintf($lang['olympus_login_SendPasswordMsg'], "<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8454736&url=' . append_sid("login.$phpEx") . '" data-href="' . append_sid("login.$phpEx") . '">', '</a>'); 
  					message_die(GENERAL_MESSAGE, $message); 
  // [-] 'Olympus Style' Login Screen

				message_die(GENERAL_ERROR, 'Tried to redirect to potentially insecure url.'); 
  			}

// [+] 'Olympus Style' Login Screen 
  			$message = $lang['olympus_login_NoAccount'] . '<br /><br />' . sprintf($lang['olympus_login_RegisterAccountMsg'], "<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8454736&url=' . append_sid("login.$phpEx") . '" data-href="' . append_sid("login.$phpEx") . '">', '</a>'); 
  			message_die(GENERAL_MESSAGE, $message); 
  // [-] 'Olympus Style' Login Screen

		'L_SEND_PASSWORD' => $lang['Forgotten_password']

		// [+] 'Olympus Style' Login Screen 
  			'L_OL_REGISTER' => $lang['olympus_login_CreateAccount'], 
  			'L_OL_INFOLOGIN' => $lang['olympus_login_LoginInfo'], 
  			'L_OL_BINDEX' => $lang['olympus_login_BoardIndex'], 
  			'L_OL_READFAQ' => $lang['olympus_login_ViewFAQ'], 
  			'L_OL_INFOADMIN' => $lang['olympus_login_AdminInfo'], 
  			'L_OL_ACTIVATION' => $lang['olympus_login_Resend_Activation'], 
  			'L_OL_HIDEONLINESTATUS' => $lang['olympus_login_HideOnlineSession'], 
  			'L_OL_OPTIONS' => $lang['Options'], 
   
  			'U_OL_ACTIVATION' => append_sid("profile.$phpEx?mode=resendactivation"), 
  		// [-] 'Olympus Style' Login Screen

			'S_HIDDEN_FIELDS' => $s_hidden_fields) 
  		);

// [+] 'Olympus Style' Login Screen 
  		if( isset( $HTTP_GET_VARS['admin'] ) ) 
  		{ 
  			$template->assign_block_vars('switch_admin_reauth', array()); 
  		} 
  		if($board_config['require_activation'] !== USER_ACTIVATION_ADMIN && !$userdata['session_logged_in']) 
  		{ 
  				$template->assign_block_vars('switch_admin_activation', array()); 
  		} 
  // [-] 'Olympus Style' Login Screen

else if ( $mode == 'activate' ) 
  	{ 
  		include($phpbb_root_path . 'includes/usercp_activate.'.$phpEx); 
  		exit; 
  	}

// [+] 'Olympus Style' Login Screen 
  else if ( $mode == 'resendactivation' ) 
  	{ 
  		include ( $phpbb_root_path . 'includes/usercp_sendactivation.'.$phpEx ); 
  		exit; 
  	} 
  // [-] 'Olympus Style' Login Screen

<form action="{S_LOGIN_ACTION}" method="post" target="_top">

<tr> 
  		<td class="row1" width="50%"><center><span class="gensmall"> 
  				<strong>Giriş yapmanız için üye olmanız lazımdır.<br>üye olamak sadece birkaç saniyenizi alır<br>Lütfen üye olmadan önce kuralları okumayı ihmal etmeyin.</strong>						</span><br><br> 
  		<span class="genmed" align="center"><a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8470146&url=index.php" data-href="index.php">Forum Anasayfası</a> |  
  		<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8470146&url=profile.php?mode=resendactivation" data-href="profile.php?mode=resendactivation">Tekrar aktivasyon kodu gönder</a> |  
  		<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8470146&url=faq.php" data-href="faq.php">SSS ı göster</a></span>  
  		</center></td> 
   
  		<td class="row2"> 
  			<table cellpadding="4" cellspacing="1"> 
  				<tbody><tr> 
  					<td class="row1"><b class="gensmall">Kullanıcı Adı:</b></td> 
  					<td class="row1" width="100%"> 
  						<input class="post" name="username" size="25" maxlength="40" value="" tabindex="1" type="text"><br> 
  						<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8470146&url=profile.php?mode=register" data-href="profile.php?mode=register">Yeni Hesap Oluştur</a> 
  					</td> 
   
  				</tr> 
  				<tr> 
  					<td class="row1"><b class="gensmall">Şifre:</b></td> 
  					<td class="row1" width="100%"> 
  					<input class="post" name="password" size="25" maxlength="25" tabindex="2" type="password"><br> 
  					<a data-test="test" rel="nofollow" style="word-wrap: break-word; text-decoration: underline;" target="_blank" onclick="return dhExternalLinkRedirect(this)" href="/ExternalLinkRedirect?module=pgdcode&messageId=8470146&url=profile.php?mode=sendpassword" data-href="profile.php?mode=sendpassword">Şifremi Unuttum</a> 
  					</td> 
  				</tr> 
   
  				<tr> 
  					<td class="row1"><span class="gensmall"><b>Seçenekler:</b></span></td> 
  					<td class="row1" width="100%"> 
  						<span class="gensmall"> 
  						<input name="autologin" tabindex="5" type="checkbox">Her ziyaretimde otomatik giriş yap						<br> 
  						<input name="hideonline" tabindex="5" type="checkbox">Online olduğumu gizle						</span> 
  					</td> 
   
  				</tr> 
   
           		</tbody></table> 
  		</td> 
  	</tr>

<%  Response.ContentType = "text/vnd.wap.wml"  %> 

 
  <%  
   
  Dim RS, DB, Baglanti ' Değişkenleri tanımlıyoruz 
   
   
   
  'Bağlantı için DRIVER kodunu koyuyoruz. veritabani.mdb yazan 
   
  'yere sizin veritabanınızın dosya ismi gelecek. 
   
  DB = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("veritabani.mdb") &";DefaultDir="& Server.MapPath(".") &";DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5" 
   
   
   
  'Bağlantı için objeleri yaratıyoruz ve bağlantı kuruyoruz. 
   
  Set Baglanti = Server.CreateObject ("ADODB.Connection") 
   
  Set RS = Server.CreateObject ("ADODB.Recordset") 
   
  Baglanti.Open DB 'Bağlantı açıldı 
   
  'SQL statement kullanarak veritabanını sorguluyoruz. 
   
  Set RS= Baglanti.Execute ("SELECT * FROM kitaplar ORDER BY kitapadi ASC") 
   
  %> 

 
  <!-- Standart XML version ve DTD belirtimi --> 
   
  <?xml version="1.0"?> 
   
  <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml"> 
   
  <!-- WML kodumuz başlıyor --> 
   
  <wml> 
   
  <card id="kitapList" title="XYZ Kütüphanesi Kitap Listesi"> 
   
  <%  
   
      Response.Write "<small>" '<small> ile yazıyı küçültüyoruz. 
   
      Do Until RS.EOF 'Kayıtların sonuna kadar döngü yaratıyoruz. 
   
        Response.Write "- " & RS("kitapadi") & "<br/>" 'Sayfaya kayıtları yazdırıyoruz ve her kayıttan sonra <br/> ile alt satıra geçiyoruz. 
   
        RS.MoveNext 'Do Until döngüsünde kayıtların her dönüşte bir ileri gitmesini sağlıyoruz.  
   
      Loop 'Do Until için gerekli olan Loop komutu 
   
      Response.Write "</small>" '<small> kodunu kapatıyoruz. 
   
  %>  
   
  </card> 
   
  </wml> 
   
  <%  
   
  'Bağlantıları kapatıyoruz ki serverımız yorulmasın, rahat etsin...  
   
  RS.Close 
   
  Set RS = Nothing 
   
  Baglanti.Close 
   
  Set Baglanti = Nothing 
   
  %>