Welcome to بیسیک فور ایکس

Register now to gain access to all of our features. Once registered and logged in, you will be able to contribute to this site by submitting your own content or replying to existing content. You'll be able to customize your profile, receive reputation points as a reward for submitting content, while also communicating with other members via your own private inbox, plus much more! This message will be removed once you have signed in.

  • 0
mr.edris

لاگین به یک اسکریپت دیگه

سوال

سلام به بچه های باحال انجمن

آقا یه سوال

ببینین این فایل php هستش

<?php

// Get available languages
if (!isset($language_id)) $language_id=0;

$languages=array();
if (!empty($session->_conf_all['allow_language_selection']) && !empty($session->_conf_all['login_language_selection'])) {
  $languages=$l->getLanguages(false);
  // Any language already selected
  if (!empty($language_id)) {
    foreach ($languages as $data) {
      if ($language_id==$data['id'] || $language_id==$data['iso_name']) {
        $preselect_language=$data['id'];
        break;
      }
    }
  }
  if (empty($preselect_language)) {
    // Get proposed by client languages
    $preselect_language=0;
    $accept_languages=!empty($_SERVER['HTTP_ACCEPT_LANGUAGE'])? explode(',', $_SERVER['HTTP_ACCEPT_LANGUAGE']) : array();
    foreach ($accept_languages as $val) {
      $val=strpos($val, ';')? substr($val, 0, strpos($val, ';')) : $val;
      foreach ($languages as $data) {
        if (strtolower(trim($val))==$data['iso_name']) {
          $preselect_language=$data['id'];
          break;
        }
      }
      if (!empty($preselect_language)) {
        break;
      }
    }
  }
  if (empty($preselect_language)) {
    $preselect_language=$session->_conf_all['default_language'];
  }
  $l->setLanguage($preselect_language);
}

_pcpin_loadClass('pcpintpl'); $tpl=new PcpinTpl();
$tpl->setBasedir('./tpl');
$tpl->readTemplatesFromFile('./login.tpl');

$_body_onload[]='initLoginForm('.htmlspecialchars($session->_conf_all['login_length_min']).', '
                                .htmlspecialchars($session->_conf_all['login_length_max']).', '
                                .(!empty($admin_login)? 'true' : 'false')
                                .')';

// JS file for login
$_js_files[]='./js/login.js';

// JS language expressions
$_js_lng[]='username_empty';
$_js_lng[]='email_invalid';
$_js_lng[]='username_length_error';
$_js_lng[]='password_too_short';
$_js_lng[]='passwords_not_ident';

// Add global vars to template
foreach ($global_tpl_vars as $key=>$val) {
  $tpl->addGlobalVar($key, htmlspecialchars($val));
}

// Add language expressions to template
foreach ($tpl->tpl_vars_plain as $var) {
  if (0===strpos($var, 'LNG_')) {
    $var=strtolower($var);
    $tpl->addGlobalVar($var, htmlspecialchars($l->g(substr($var, 4))));
  }
}

$tpl->addVar('main', 'login_maxlength', htmlspecialchars($session->_conf_all['login_length_max']));

$tpl->addVar('guest_login', 'display', empty($hide_account_options) && $session->_conf_all['allow_guests']);
$tpl->addVar('account_options', 'display', empty($hide_account_options));

$tpl->addVars('chat_summary', array('display'=>!empty($session->_conf_all['display_startup_summary']),
                                    'height'=>htmlspecialchars($session->_conf_all['startup_summary_height']),
                                    ));

if (!empty($direct_login) && !empty($login) && !empty($password)) {
  $tpl->addVars('main', array('login_username'=>htmlspecialchars($login),
                              'login_password'=>htmlspecialchars($password),
                              ));
  $_body_onload[]='doLogin()';
}

// Language selection
if (!empty($session->_conf_all['allow_language_selection']) && !empty($session->_conf_all['login_language_selection'])) {
  $tpl->addVar('language_selection', 'display', true);
  foreach ($languages as $data) {
    $tpl->addVars('language_selection_option', array('id'=>htmlspecialchars($data['id']),
                                                     'local_name'=>htmlspecialchars($data['local_name']),
                                                     'selected'=>($data['id']==$l->id)? 'selected="selected"' : '',
                                                     ));
    $tpl->parseTemplate('language_selection_option', 'a');
  }
}

// Display "Register" link
$tpl->addVar('account_options_register', 'display', $session->_conf_all['allow_user_registration']);
?>

متغیر یوزرنیم :$login

متغییر پسورد : $password

البته فکر میکنم که اینجوری باشه

 

حالا اگر با دوتا تکست باکس

و یه باتن از طریق پست  متغییر به این فایل بفرستم جوابگو هستش؟

پسند شده توسط Sina

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

5 پاسخ به این سوال تا کنون داده شده است

  • 0

درود ادریس


می خوای از داخل برنامه نام کاربری و پسورد رو ارسال کنی به این فایل php و اون این کارو انجام بده ؟


پسند شده توسط mr.edris

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

 

درود ادریس

می خوای از داخل برنامه نام کاربری و پسورد رو ارسال کنی به این فایل php و اون این کارو انجام بده ؟

 

دقیقا :DD:

پسند شده توسط H@mid.RS

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

با استفاده از poststring که در کتابخانه httpjob هستش می توانید 'این کار را انجام بدید

پسند شده توسط H@mid.RS و mr.edris

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

با استفاده از poststring که در کتابخانه httpjob هستش می توانید 'این کار را انجام بدید

میدونم میگم مشکل نداره ؟

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

دقیقا :DD:

کتابخانهHttpUltis2 رو تیک بنداز

و با استفاده از کد زیر این کارو می تونی انجام بدی همون poststring

Sub Button1_Click
	Dim Basic4x As HttpJob
	Basic4x.Initialize("job",Me)
	Basic4x.PostString("http://basic4x.ir/insert.php","login="&EditText1.Text&"&password="&EditText2.Text&"")
	ProgressDialogShow("در حال ارتباط با سرور...")
End Sub
Sub jobdone(job As HttpJob)
	If job.Success = True Then
		If job.JobName = "job" Then			
			ProgressDialogHide
			Msgbox("با موفقیت انجام شد","")
			
		End If
	End If
End Sub

تست کن چون من تست نکردمش ولی قانونش همینه

پسند شده توسط Sina و mr.edris

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !


ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید


ورود به حساب کاربری