رفتن به مطلب

hamedafrough

کاربر عادی
  • تعداد ارسال ها

    46
  • تاریخ عضویت

  • آخرین بازدید

اعتبار در سایت

3 متوسط

درباره hamedafrough

  • درجه
    کاربر باسابقه
  • تاریخ تولد تعیین نشده

آخرین بازدید کنندگان نمایه

بلوک آخرین بازدید کننده ها غیر فعال شده است و به دیگر کاربران نشان داده نمیشود.

  1. دمتون گرم ممنونم امتحان میکنم ایشالا که کارم راه بیافته لطف کردید
  2. سلام دوستان من یه مولتی پنل آنلاین دارم که با لانگ کلیک روی لیبل داخل اون یه مسیج میده که گزینه های حذف رکورد و ویرایش رکورد درش هست ممنون میشم راهنماییم کنید کدشونو چطور بنویسم که عملیات درست اجرا بشه ممنونم
  3. سلام اقای شاهدی
    خداقوت
    من برای ساخت منوی پاپ آپ به مشکل خوردم
    یکی از دوستان کتابخونه شما رو برای ساخت منوی پاپ آپ توصیه کرد
    میشه این کتابخونه رو بهم بدید؟
    توی سایت انسر گشتم پیدا نکردم

    ممنونم

  4. hamedafrough

    منوی پاپ آپ

  5. hamedafrough

    منوی پاپ آپ

    کلا با ریسایکلر کار نکردمزیاد اشنایی ندارم من برای کلیک ساده تگ و سندر زدم تا با کلیک روی نام کاربر صفحه جدید باز بشه و اطلاعات بیشتری از کاربر نمایان بشه اما سر لانگ کلیکش موندم چطوری بهش پاپ اپ بدم چون تو اموزش ها همه جدای از ویوهای دیگه یه دکمه مخصوص پاپ اپ می سازن و روی ویوهای خاص منو ندادن لانگ کلیک رو میشناسم اما میخوام وقتی کاربر روی لیبل مولتی پنل لانگ کلیک کرد یک منو پایین صفحه باز بشه
  6. hamedafrough

    منوی پاپ آپ

    سلام دوستان خداقوت من یه مولتی پنل دارم که با کلیک ساده روی اون اکتیویتی جدید باز میشه و ریز اطلاعات کاربرها رو نمایش میده اما برای لانگ کلیکش میخوام گزینه های حذف و ویرایش رو قرار بدم که براش منوی پاپ آپ رو در نظر گرفتم ممنون میشم کدش رو بهم آموزش بدید چون کدهایی که تا الان دیدم رفع اشکال بودن نه کدنویسی همچنین من نمی خوام یه دکمه جدا بسازم می خوام وقتی روی لیبل مولتی پنل لانگ کلیک شد برنامه واکنش نشون بده ممنون میشم راهنمایی کنید.
  7. سلام دوستان طاعاتتون قبول من دو تا صفحه دارم که با کلیک بر روی مولتی پنل صفحه اول، اطلاعات بیشتری در صفحه دوم نمایش داده میشه. قبلاسوال گذاشتم اینجا و به کمک دوستان خصوصا آقا مرتضی مشکل تا حد زیادی برطرف شد، یعنی وقتی روی نام کاربر در ص اول کلیک میشه، صفحه دوم با اطلاعات همون کارب رنمایش داده میشه اما مشکل اینه که جدول من ۲۳ فیلد داره اما صفحه دوم فقط فیلد نام، نام خانوادگی و کد عضیت رو نشون میده. کدهامو میذارم ممنون میشم بهم بگید مشکل از کجاست. ضمنا ادرس php هم اطلاعاتو نشون میده فقط برنامه اس که نمایش نمیده صفحه اول Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("lkoleaza") ff.Initialize("ff") Main.ht1.Initialize("ht1",Me) ProgressDialogShow("درحال برقراری با سرور. لطفا صبر کنید...") Main.ht1.Download("http://hamedafrough.ir/misaq/m_koleaza.php") End Sub Sub jobdone (job As HttpJob) #region slv-beporsam If job.Success=True Then ProgressDialogHide jp.Initialize(job.GetString) Main.list=jp.NextArray For i=0 To Main.list.Size-1 Dim p As Panel p.Initialize("p") slvaza.Panel.AddView(p,0%x,top,95%x,45%y) p.LoadLayout("lkoleaza_mpinfo") p.Tag=i top=top+7%y+0%x Main.map_title=Main.list.Get(i) Dim plusname As String=Main.map_title.Get("famili")&" "&Main.map_title.Get("nam") lblmp_id.Text=Main.map_title.Get("id") lblmp_nam.Text=plusname lblmp_nam.Tag=i Next slvaza.Panel.Height=top Else ToastMessageShow("خطا در برقراری ارتباط با سرور",False) End If Main.ht1.Release End Sub Sub lblmp_nam_Click Activity.Finish Dim btn_tag As Label btn_tag=Sender Main.map_title = Main.list.get(btn_tag.tag) StartActivity(lkoleaza_slvlbl) End Sub صفحه دوم Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("lkoleaza_slvlbl") slvaza.Panel.Height=160%y Main.ht2.Initialize("show_ht",Me) Main.ht2.Download("http://hamedafrough.ir/misaq/m_allaza.php") End Sub Sub JobDone(Job As HttpJob) #region job ProgressDialogHide If Job.Success=True Then Dim res As String res = Job.GetString jp.Initialize(res) Main.list=jp.NextArray Dim p As Panel p.Initialize("p") slvaza.Panel.AddView(p,0%x,top,95%x,45%y) p.LoadLayout("lkoleaza_lbldata") top=top+15%y+0%x lblfamili.Text= Main.map_title.Get("famili") lblnam.Text= Main.map_title.Get("nam") lblozvkod.Text= Main.map_title.Get("ozvkod") lblsemat.Text= Main.map_title.Get("semat") lblbirth.Text= Main.map_title.Get("birth") lblshenas.Text= Main.map_title.Get("shenas") lblkodemeli.Text= Main.map_title.Get("kodemeli") lblsadere.Text= Main.map_title.Get("sadere") lblmob1.Text= Main.map_title.Get("mob1") lblmob2.Text= Main.map_title.Get("mob2") lbltel1.Text= Main.map_title.Get("tel1") lbltel2.Text= Main.map_title.Get("tel2") lblfax.Text= Main.map_title.Get("fax") lblmeil.Text= Main.map_title.Get("meil") lblmanzel.Text= Main.map_title.Get("manzel") lblkar.Text= Main.map_title.Get("kar") lbltelegram.Text= Main.map_title.Get("telegram") lblinsta.Text= Main.map_title.Get("insta") lblbale.Text= Main.map_title.Get("bale") lblsoroosh.Text= Main.map_title.Get("soroosh") lblozviat.Text=Main.map_title.Get("ozviat") lblvaziat.Text=Main.map_title.Get("vaziat") lbltozih.Text=Main.map_title.Get("tozih") slvaza.Panel.Height=top Else ToastMessageShow("لطفا اتصال برنامه به اینترنت را بررسی کنید",False) End If Main.ht2.Release End sub این هم ادرس جدولمه http://hamedafrough.ir/misaq/m_allaza.php
  8. سلام دوستان خداقوت میشه راهنمایی کنید چطور باید طبق سشن در پی اچ پی کدهای بیسیک رو بنویسیم؟
  9. ممنونم از جوابتون منظورم اینه که مشخصات فردی کاربر وقتی گرفته میشه میخوام در صفحه اصلی فقط نام و نام خانوادگیش نمایش داد بشه و وقتی روی نامش کلیک شد سایر مشخصاتش نشون داده بشه منتها این مستلزمه تنظیم دقیق تگ و سندره که نتونستم
  10. سلام دوستان عیدتون مبارک من یه مولتی پنل آنلاین ساختم که در بخش تگ و سندرش برای دریافت ریز اطلاعات به مشکل خوردم هر کاری میکنم نمیتونم ارتباط بین اطلاعات و جداول رو برقرار کنم روال برنامم اینطوری هست که 1. در صفحه نشون دادن اعضا نام و نام خانوادگی رو بههمراه شماره آی دی نشون میده که این صفحه در دو لایه هست (یکی لایه اسکرول و یکی لایه جزییات مولتی پنل) 2. وقتی روی لیبل نام و نام خانوادگی کلیک میشه وارد اکتیویتی دوم میشه که این اکتیویتی هم دو لایه داره (یکی لایه اسکرول و یکی لایه فیلدهای ریز مشخصات) 3. وقتی روی لیبل نام و نام خانوادگی لانگ کلیک میشه وارد اکتیویتی ویرایش اطلاعات میشه که این اکتیویتی هم دو لایه داره (یکی اسکرول و یکی فیلدهای ویرایش اطلاعات) و البته این اکتیویتی ادیت تکس داره که هم ازش برای درج اطلاعات جدید استفاده میکنم هم برای ویرایش اطلاعات حالا بین این چند اکتیویتی و لایه نمی تونم ارتباط برقرار کنم که با کلیک روی هر لیبل مشخصات همون فرد نمایش داده بشه ممنون میشم کمکم کنید کدهای اکتیویتی اول Sub jobdone (job As HttpJob) #region slvaza If job.Success=True Then ProgressDialogHide jp.Initialize(job.GetString) Dim list As List= jp.NextArray For i=0 To list.Size-1 Dim p As Panel p.Initialize("p") slvaza.Panel.AddView(p,0%x,top,95%x,45%y) p.LoadLayout("lkoleaza_mpinfo") ' pnlmain.Tag=i p.Tag=i top=top+7%y+0%x Main.map_title =list.Get(i) Dim plusname As String=Main.map_title.Get("famili")&" "&Main.map_title.Get("nam") lblmp_id.Text=Main.map_title.Get("id") lblmp_nam.Text=plusname ' lblmp_id.Tag=i lblmp_nam.Tag=i lblmp_id.Tag=Main.map_title.Get("id") lblmp_nam.Tag=plusname Next slvaza.Panel.Height=top Else ProgressDialogHide ToastMessageShow("خطا در برقراری ارتباط با سرور",False) End If Main.ht1.Release end sub Sub lblmp_nam_Click Activity.Finish Dim btn_tag As Label btn_tag=Sender ' ToastMessageShow(btn_tag.Tag,False) StartActivity(lkoleaza_slvlbl) lblmp_id.Tag=Main.map_title.Get("id") End Sub کدهای اکتیویتی دوم Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("lkoleaza_slvlbl") slvaza.Panel.LoadLayout("lkoleaza_lbldata") slvaza.Panel.Height=160%y Main.ht2.Initialize("show_ht",Me) Main.ht2.Download("http://hamedafrough.ir/misaq/mainapp/tabels/koleaza.php") end sub Sub JobDone(Job As HttpJob) ProgressDialogHide If Job.Success=True Then jp.Initialize(Job.GetString) Dim list As List=jp.NextArray For i=0 To list.Size-1 Main.map_title=list.Get(i) Dim p As Panel p.Initialize("p") slvaza.Panel.AddView(p,0%x,top,95%x,45%y) p.LoadLayout("lkoleaza_lbldata") p.Tag=i top=top+15%y+0%x Dim fn As String fn=Main.map_title.Get("famili")&" "&Main.map_title.Get("nam") lblid.Text=Main.map_title.Get("ID") lblfamili.Text= Main.map_title.Get("famili") lblnam.Text= Main.map_title.Get("nam") lblozvkod.Text= Main.map_title.Get("ozvkod") lblbirth.Text= Main.map_title.Get("birth") lblshenas.Text= Main.map_title.Get("shenas") lblkodemeli.Text= Main.map_title.Get("kodemeli") lblsadere.Text= Main.map_title.Get("sadere") lblmob1.Text= Main.map_title.Get("mob1") lblmob2.Text= Main.map_title.Get("mob2") lbltel1.Text= Main.map_title.Get("tel1") lbltel2.Text= Main.map_title.Get("tel2") lblfax.Text= Main.map_title.Get("fax") lblmail.Text= Main.map_title.Get("mail") lblmanzel.Text= Main.map_title.Get("manzel") lblkar.Text= Main.map_title.Get("kar") lbltelegram.Text= Main.map_title.Get("telegram") lblinsta.Text= Main.map_title.Get("insta") lblbale.Text= Main.map_title.Get("bale") lblsoroosh.Text= Main.map_title.Get("soroosh") lblozviat.Text=Main.map_title.Get("ozviat") lblvaziat.Text=Main.map_title.Get("vaziat") lbltozih.Text=Main.map_title.Get("tozih") Next slvaza.Panel.Height=top Else ToastMessageShow("لطفا اتصال برنامه به اینترنت را بررسی کنید",False) End If Main.ht2.Release end sub کدهای اکتیویتی سوم Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("lkoleaza_adddata") slvaza.Panel.LoadLayout("lkoleaza_data") slvaza.Panel.Height=190%y Main.ht1.Initialize("insert_ht",Me) Main.ht1.PostString("http://hamedafrough.ir/misaq/mainapp/tabels/insertdata.php","") end sub Sub lblsave_Click If txtfamili.Text="" Or txtnam.Text="" Or txtozvkod.Text="" Or txtmob1.Text="" Then ToastMessageShow("لطفا همه گزینه‌های ضروری را تکمیل کنید",False) txtfamili.HintColor=Colors.Red txtnam.HintColor=Colors.Red txtozvkod.HintColor=Colors.Red txtmob1.HintColor=Colors.Red Return Else Dim info1 As String info1="&famili=" &txtfamili.Text & "&nam=" &txtnam.Text & "&ozvkod=" &txtozvkod.text & "&birth=" & txtbirth.Text & "&shenas=" & txtshenas.text &"&kodemeli=" & txtkodemeli.text &"&sadere=" & txtsadere.text & "&tel1="& txttel1.Text & "&tel2=" & txttel2.text & "&mob1=" &txtmob1.Text & "&mob2=" & txtmob2.text & "&fax=" &txtfax.Text & "&mail=" & txtmail.text & "&manzel=" &txtmanzel.Text & "&kar=" & txtkar.text & "&telegram=" &txttelegram.Text & "&insta=" & txtinsta.text & "&bale=" &txtbale.Text & "&soroosh=" & txtsoroosh.text & "&ozviat=" &txtozviat.Text & "&vaziat=" & txtvaziat.text & "&tozih=" & txttozih.Text Main.ht1.PostString("http://hamedafrough.ir/misaq/mainapp/tabels/insertdata.php",info1) End If End Sub Sub jobdone(job As HttpJob) If job.Success=True Then ToastMessageShow("اطلاعات جدید وارد شد",False) End If End Sub
  11. سلام خداقوت من این آموزشو تهیه کردم و کارم راه افتاد از این بابت از دوستان ممنونم اما در این اموزش از تگ و سندر حرفی نبود چون این مبحث هنوز برام جا نیافتاده ممنون میشم راهنمای بفرمایید
  12. سلام خداقوت میشه نمونه کد استفاده از کتابخونه رو هم بدید یاد بگیرم؟ من تازه کارم و بلد نیستم ممنونم
  13. سلام اقای ایزدی
    خداقوت
    من به تازگی آموزش شما مربوط به ایجاد ارتباط با دیتابیس آنملاین رو تهیه کردم

    اما در بخش کدنویسی پی اچ پی، وقتی فایل ها رو روی هاستم بارگذاری می کنم همشون ارر میدن خصوصا به فایل دی بی و عملا کاری از پیش نبدم
    سررشته هم از پی اچ پی ندارم که خودم متوجه ارر بشم
    ممنون میشم برای رفع مشکل کمکم کنید
    اپم لنگ مونده

    1. Mr Mansour

      Mr Mansour

      سلام دوست عزیز

      برای گرفتن جواب لطفا تاپیک رو در پخش مورد نظر ایجاد کنید

      تا دوستان کمکتون کنند.

    2. hamedafrough

      hamedafrough

      سلام داداش
      ممنونم از راهنماییتون

  14. داداش متن خطا اینه Warning: Use of undefined constant MYSQL_ASSOC - assumed 'MYSQL_ASSOC' (this will throw an Error in a future version of PHP) in /home/hamedafr/public_html/misaq/userslist.php on line 21 Warning: mysqli_fetch_array() expects parameter 2 to be integer, string given in /home/hamedafr/public_html/misaq/userslist.php on line 21 {"result":[]}
  15. جسارتا اینم کدهای پی اچ پی من طبق اون اموزشه اما ارر میده توی مرورگر توی قسمت وایل ارر میده <? $databasehost = "localhost"; $databasename = "hamedafr_misaq"; $databaseusername ="*****"; $databasepassword = "*****"; $con = mysqli_connect($databasehost,$databaseusername,$databasepassword) or die(mysqli_error($con)); mysqli_select_db($con,$databasename) or die(mysqli_error($con)); mysqli_query($con,"SET CHARACTER SET utf8"); $sql = "SELECT DISTINCT ID,nam,semat,kod FROM `tblusers` "; $result = mysqli_query($con,$sql); if (!$result) { echo $result.'n'; echo mysqli_error($con); exit; } else { $rows = array(); while($row=mysqli_fetch_array($result,MYSQL_ASSOC)){ $temp["ID"]=$row['ID']; $temp["nam"]=$row['nam']; $temp["semat"]=$row['semat']; $temp["kod"]=$row['kod']; $rows[]=$temp; } print json_encode(array("result"=>$rows),JSON_UNESCAPED_SLASHES); } ?>
×
×
  • جدید...