رفتن به مطلب
بیسیک فور ایکس

hocein

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

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

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

  • روز های برد

    2

2 دنبال کننده

درباره hocein

  • تاریخ تولد 9 مهر 1371

Profile Information

  • جنسیت
    مرد
  • محل زندگی
    گرگان

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

558 بازدید کننده نمایه
  1. hocein

    برنامه نویس ios

    درود ببخشید جای مناسب برای این درخواست پیدا نکردم. یک برنامه نوشتم اندروید و الان به یک برنامه نویس ios نیاز دارم که همان پروژه را برای ios بنویسه . اگر کسی هست با من در ارتباط باشه . سپاس
  2. hocein

    مشگل در لیمت دادن در مولتی پنل

    بین این دو تا اینو قرار بده اگر جواب نداد خواستی پروژه رو بزار چک کنم . ScrollView1.Panel.Height = top + 3%y
  3. hocein

    مشگل در لیمت دادن در مولتی پنل

    کداتون رو ویرایش کردم چند جاش خطا داشت مثلا اینجا عکسی ک فرستادی برنامت موقعیت درست حلقه رو نمیفهمید بعد شما از sql.exequery استفاده کردی که باید از exequery2 استفاده میکردی به هرحال کد هایی ک گذاشتم رو ببینید امیدوارم مشکل حل بشه Sub Process_Globals Dim sql As SQL Dim matn As String End Sub 'Sina Sub Globals Private ScrollView1 As ScrollView Private Label1 As Label Dim cur As Cursor Dim top As Int = 2%y Dim TenRecordPlus As String = "10" Dim total As Int = 10 End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("l1") If FirstTime Then If File.Exists(File.DirInternal,"Mydb.db") = False Then File.Copy(File.DirAssets,"Mydb.db",File.DirInternal,"Mydb.db") End If If sql.IsInitialized = False Then sql.Initialize(File.DirInternal,"Mydb.db",True) 'sql.Initialize(File.DirInternal,"Mydb.db",True) End If cur = sql.ExecQuery2("SELECT * FROM tbl ORDER BY ID LIMIT ?",Array As String(10)) 'cur = sql.ExecQuery("SELECT * FROM tbl") For i = 0 To cur.RowCount -1 cur.Position = i Dim pnl As Panel pnl.Initialize("") ScrollView1.Panel.AddView(pnl,2%x,top,96%x,30%y) pnl.LoadLayout("multi") Label1.Text = cur.GetString("Titr") Label1.Tag = cur.GetInt("id") Label1.TextSize = 20 Label1.TextColor = Colors.Yellow Label1.Gravity=Gravity.CENTER top = top + 15%y ScrollView1.Panel.Height = top + 3%y Next ' به دست اوردن اخرین رکورد جدول Dim ax As String 'Dim Cursor As Cursor ' Cursor = sql.ExecQuery("SELECT * FROM tbl") cur = sql.ExecQuery("SELECT * FROM tbl LIMIT 10") ax=cur.RowCount-1 LogColor(ax,Colors.Magenta) End If End Sub Sub sv_ScrollChanged(Position As Int) If ScrollView1.ScrollPosition + ScrollView1.Height = ScrollView1.Panel.Height Then cur = sql.ExecQuery2("SELECT * FROM tbl OFFSET LIMIT ?,?",Array As String(TenRecordPlus,10)) total = total + 10 '========================================================== For i = 0 To cur.RowCount -1 cur.Position = i Dim pnl As Panel pnl.Initialize("") ScrollView1.Panel.AddView(pnl,2%x,top,96%x,30%y) pnl.LoadLayout("multi") Label1.Text = cur.GetString("Titr") Label1.Tag = cur.GetInt("id") Label1.TextSize = 20 Label1.TextColor = Colors.Yellow Label1.Gravity=Gravity.CENTER top = top + 15%y ScrollView1.Panel.Height = top + 3%y Next '========================================================= cur.Close DoEvents If IsNumber(TenRecordPlus) = True Then TenRecordPlus = TenRecordPlus + 10 End If ProgressDialogHide End If End Sub Sub Label1_Click Dim l As Label l = Sender matn = l.Tag LogColor(matn,Colors.Red) StartActivity(text) End Sub
  4. hocein

    اتصال به دیتابیس سایت

    دو تا راه دارید! با گت المنت بیاین این کار رو بکنین یا اگر به گفته خودتان پی اچ پی بلد هستید باید یه Api بنویسید ک ب دیتابیس متصل کنید و با بیسیک کاملش کنید. یکی از راهها را انتخاب کنید و صفحه سابت رو بفرستین تا راهنمایتون کنم
  5. hocein

    سورس کد سمت سرور ثبت نام و ورود کاربر در Basic4Android +PHP

    درود. داداش پیگیر نشدین این موضوع رو؟ من خیلی نیاز ضروری دارم بهش کلا یه پروژه ام لنگ همین موضوعه
  6. hocein

    آردوینو چه کار می تواند بکند؟

    درود از کجا میشود قطعات مربوطش را خرید؟
  7. hocein

    درخواست کد واسه بخش ادامه مطالعه

    برای درک بهتر قسمت علاقه مندی کتابها رو ببین متوجه میشی.
  8. hocein

    درخواست کد واسه بخش ادامه مطالعه

    میتونم فقط ایده بدم بهت. اینک بیای یه قسمت تو دیتابیس ایجاد کنی مثلا resume و عین علاقه مندی باشه بعد بیای بگی هروقت طرف یه قسمت از متن رو باز کرده مثلا فصل یک متن 5 رو ک باز کرد resume=1 بشه و بقیه resume ها همشون مقدار صفر بگیرند. بعد طرف ک نرم افزار رو باز کرد اول چک کنه اگ resume=1 بود اول اون رو باز کنه ... من زیاد با کتاب و اینا آشنا نیستم وگرنه واست سورس رو مینوشتم. ولی مطمعنم با این الگوریتم میتونی جواب بگیری.
  9. hocein

    ارور در برنامه

    شما ret رو به چه متغیری تعریف کردی؟ dim ret رو بعدش چی نوشتی
  10. hocein

    سورس کد سمت سرور ثبت نام و ورود کاربر در Basic4Android +PHP

    درود وقت بخیر. من با هر اسمی لاگین میشم وارد میشه. میشه راهنمایی کنید؟ نامی ک ثبت نام هم نباشه بزنی وارد میشه
  11. hocein

    پروژه فول متریال

    مشکل از کتابخانه appcompat بود درست کردم. ممنون
  12. hocein

    پروژه فول متریال

    UNEXPECTED TOP-LEVEL EXCEPTION: java.lang.IllegalArgumentException: already added: Lde/amberhome/objects/appcompat/ACActionBar; at com.android.dx.dex.file.ClassDefsSection.add(ClassDefsSection.java:122) at com.android.dx.dex.file.DexFile.add(DexFile.java:161) at com.android.dx.command.dexer.Main.processClass(Main.java:615) at com.android.dx.command.dexer.Main.processFileBytes(Main.java:570) at com.android.dx.command.dexer.Main.access$2(Main.java:546) at com.android.dx.command.dexer.Main$2.processFileBytes(Main.java:514) at com.android.dx.cf.direct.ClassPathOpener.processArchive(ClassPathOpener.java:284) at com.android.dx.cf.direct.ClassPathOpener.processOne(ClassPathOpener.java:166) at com.android.dx.cf.direct.ClassPathOpener.process(ClassPathOpener.java:144) at com.android.dx.command.dexer.Main.processOne(Main.java:537) at com.android.dx.command.dexer.Main.processAllFiles(Main.java:449) at com.android.dx.command.dexer.Main.runMonoDex(Main.java:236) at com.android.dx.command.dexer.Main.run(Main.java:206) at com.android.dx.command.dexer.Main.main(Main.java:179) at com.android.dx.command.Main.main(Main.java:103) 1 error; aborting اون رو وارد کردم خطای جدید گرفتم.
  13. hocein

    پروژه فول متریال

    درودوقت بخیر. این فایل رو کم داره rebound-0.3.8.jar بررسی کنید Cannot find: C:\Program Files (x86)\And\Basic4android\libraries\rebound-0.3.8.jar
  14. hocein

    دانلود نرم افزار Basic4Android نسخه نهایی 6.8

    مشکلش اینه که کرک نکردین نرم افزار رو فایلارو از داخل پوشه در بیار بریز محل نصب یعنی برو داخل پوشه که اکسترکت کردی و سه تا فایل رو کپی کن و replace کن تو محل نصب بیسیک License & DLL.zip
  15. hocein

    ارسال ایمیل با PHP

    درود وقت بخیر. یه نمونه کد php که با اون میتونید به دوستان خود ایمیل بفرستین نام گیرنده موضوع متن ایمیل. این سورس صرفا برای آموزش میباشد و هرگونه سواستفاده بر عهده فرد میباشد. منبع Basic4x.ir <?php error_reporting(E_ALL); $message = ''; if (isset($_POST['email']) && !empty($_POST['email'])){ if (mail($_POST['email'], $_POST['subject'], $_POST['body'], "from: hocein.ab@gmail.com")){ $message = "Email has been sent to <b>".$_POST['email']."</b>.<br>"; }else{ $message = "Failed sending message to <b>".$_POST['email']."</b>.<br>"; } }else{ if (isset($_POST['submit'])){ $message = "No email address specified!<br>"; } } /*if (!empty($message)){ $message .= "<br><br>n"; }*/ ?> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=UTF-8"> <title> Mail test </title> </head> <body> <?php echo $message; ?> <form method="post" action=""> <table> <tr> <td> e-mail </td> <td> <input name="email" value="<?php if (isset($_POST['email']) && !empty($_POST['email'])) echo $_POST['email']; ?>"> </td> </tr> <tr> <td> subject </td> <td> <input name="subject"> </td> </tr> <tr> <td> message </td> <td> <textarea name="body"></textarea> </td> </tr> <tr> <td> &nbsp; </td> <td> <input type="submit" value="send" name="submit"> </td> </tr> </table> </form> </body> </html> سوالی داشتید بپرسید. موفق باشید.
×