اطلاعیه

کاربر گرامی

به انجمن برنامه نویسی AnswerCenter.ir خوش آمدید

 برای استفاده از تمامی امکانات سایت لطفا در انجمن عضو شوید


جستجو در تالار

در حال نمایش نتایج برای برچسب های 'database'.



تنظیمات بیشتر جستجو

  • جستجو بر اساس برچسب

    برچسب ها را با , از یکدیگر جدا نمایید.
  • جستجو بر اساس نویسنده

نوع محتوا


تالار ها

  • بخش اطلاعات اصلی انجمن
    • قوانین تیــم
    • انتقادات و پیشـــنهادات
    • اخبار تـــیم
    • تـولـیـداتـــ انـجـمــن
    • مرتبط با فروشگاه
    • درخواست ارتقا درجه کاربری
  • برنامه نویسی بیسیک4اندروید
    • آموزش های گام به گام برای مبتدی ها
    • پرسش و پاسخ (بیسیک4اندروید)
    • کتابخانه ها (Libraries)
    • درخواست Wrap کردن کتابخانه
    • ســـورس کـــدهـا
    • قطعه کدها (Code Snippets)
    • آموزش های تصویری
    • آموزش های متنی
    • ابزارهای B4A
    • برنامــه هـای سـاختـه شـده توسـط شمــا
  • برنامه نویسی اندروید استودیو
    • آموزش های گام به گام برای مبتدی ها
    • کتابخانه ها (Libraries)
    • ســـورس کـــدهـا
    • قطعه کدها (Code Snippets)
    • آموزش های تصویری
    • آموزش های متنی
    • پرسش و پاسخ (اندروید استودیو)
    • ابزار های اندروید استودیو
    • برنامــه هـای سـاختـه شـده توسـط شمــا
  • برنامه نویسی B4J
    • آموزش
    • پرسش و پاسخ
    • کتابخانه ها
    • قطــــــعه کــــــــد ها
    • ابزار ها
  • مـتـفـرقـه
    • بحث آزاد
    • نقد و بررسی برنامه ها
    • صندلی داغ انجمن
    • مسابقات انجمن
    • مرتبط با برنامه نویسی
    • بخش توسعه دهندگان
  • گرافیک
    • ابزارهای طراحی
    • آموزش گرافیک
    • عکس ها و تصاویر لایه باز
    • درخواست طراحی
    • نمونه کارها
  • HTML & PHP
    • ابزار مورد نیاز برنامه نویسی HTML و PHP
    • آموزش PHP
    • آموزش HTML
    • سوالات مربوط به PHP و Html
  • بخش ویژه (VIP)
    • محـــصولات کــاربران
    • درخواست آموزش
  • آرشیو
    • بایگانی

دسته ها

  • B4J
    • کتابخانه ها
    • سورس کد ها

دسته ها

  • Articles

16 نتیجه پیدا شد

  1. سلام خدمت دوستان گل انجمن راستش دیدم تو انجمن همچین آموزشی وجود نداره پس تصمیم به ساختش گرفتم برای افراد مبتدی که ب دردشون میخوره.... دیگه توضیج زیاد نمیدم توی فیلما به اندازه کافی حرف زدم اپلیکیشن دموی آموزش : دانلود دمو دانلود آموزش : دانلود آموزش نکته : به دلیل اتمام وقت فقط تا قسمت اضافه کردن و نمایش اطلاعات رو تونستم آماده کنم مابقی دستورات مثل دلیت کردن و آپدیت کردن موند که اونارم بعدا اضافه میکنم.... شرمنده
  2. سلام من میخوام یه برنامه بنویسم که همه اطلاعات جدولی از دیتابیس یک رو در جدول دیتابیس دومی کپی کنه. تعداد و نام فیلدهای هر دو جدول مثل هم هستن. فقط میخوام اطلاعات کپی بشه. روشی برای انجام سریع این کار هست؟ یا اینکه باید با حلقه for یکی یکی رکوردها رو از جدول دیتابیس یک select کنم و داخل جدول دیتابیس دومی insert کنم. حدود 70 هزار تا رکورد داره به خاطر همین دنبال روش سریعتری هستم. اگه روشی هست بگید.
  3. دوستان سلام از کدهای زیر برای تشخیص ثبت بودن نام کاربری توی دیتابیس استفاده کردم و میاد بررسی میکنه یوزر نیمی که کاربر توی ادیت تکست وارد کرده قبلا توی دیتابیس ثبت شده یا نه ، ولی در هر صورت فقط کد زیر رو اجرا میکنه : ToastMessageShow("error",False) به نظر میرسه سایر کدهای برنامه اجرا نمیشه کسی دلیلش رو میدونه ؟ کدهای php: <?php $con = mysql_connect("localhost","root",""); mysql_query("SET character_set_results=utf8,character_set_client=utf8,character_set_connection=utf8, character_set_database=utf8,character_set_server=utf8",$con); mysql_select_db("joorkall_nmarket", $con) $uid = mysql_real_escape_string($_GET["user_id"]); if($con->query("SELECT * FROM register WHERE username = '$uid'")->num_rows > 0){ print json_encode ("yes"); } ?> کدهای برنامه: Sub btn_ok_Click Dim strPassword As String = edt_password.Text.Trim strUserID = edt_username.Text.Trim Dim Login As HttpJob Login.Initialize("Login", Me) Login.Download2("http://192.168.1.3/ticketapp/insert_register_data.php", _ Array As String("user_id", strUserID, "password", strPassword)) End Sub Sub JobDone (Job As HttpJob) If Job.Success = True Then Dim ret As String Dim act As String ret = Job.GetString Dim parser As JSONParser parser.Initialize(ret) act = parser.NextValue If act = "yes" Then ToastMessageShow("این نام کاربری قبلا ثبت شده", True) Else ToastMessageShow("error",False) End If Else ToastMessageShow("Error: " & Job.ErrorMessage, True) End If Job.Release End Sub ممنون
  4. سلام من هرکاری میکنم نمی تونم ریسایکلر ویو رو به دیتابیس وصل کنم دوتا آموزش آقای شاهدی رو هم دیدم ولی باز مشکل دارم خیلی وقته درگیرشم اگه لطف کنین کمکم کنین ممنون میشم
  5. سلام به همه ی دوستان خیلی سریع برم سر سوالم وقتی فایل apk برنامه رو تجزیه میکنیم قسمت asset پروژه کاملا مشخص که این اصلا خوب نیست چون اطلاعات برنامه به راحتی قابل مشاهدس(حتی دیتابیس) حالا من میخوام حداقل فقط دیتابیس نمایش داده نشه یا در دسترس کسی که فایل apk رو تجزیه میکنه قرار نگیره. یه جستجو کردم با روش رمزگذاری آشنا شدم که فک کنم اینطوریه که اطلاعات دیتابیسو بصورت متن های کدگذاری شده نشون میده و بعد برنامه اونارو دیکد میکنه که این به دردم نمیخوره. راه دیگه ای هست که کلا به فایل دیتابیس نشه دسترسی پیدا کرد یا نه؟ مرسی از همگی
  6. با سلام بنده اطلاعات دیتابیس رو روی یک اسکرول ویو نشون میدم ک یدونه دکمه برای حذف هرکدام از ایتم ها تعریف کردم دوس دارم بعد از اینکه دکمه حذف رده میشه صفحه خودکار رفرش شده و اطلاعات جدید رو نشون بده توی کد ها بعد دستور حذف دستور لود شدن دیتابیس رو نوشتم اما عمل نمیکنه Sub del_Click sq.ExecNonQuery("DELETE FROM Interest WHERE IDB="&scb.IDB&"") Dim top As Int top=0 c = sq.ExecQuery("SELECT * FROM Interest") For i=0 To c.RowCount-1 p1.Initialize("") ScrollView1.Panel.AddView(p1,0,top,100%x,Panel1.Height) top = top + Panel1.Height+5 ScrollView1.Panel.Height=top p1.LoadLayout("interestpattern") c.Position = i cyn.Text=c.GetString("Cyn") brn.Text=c.GetString("Brn") Next End Sub لطفا کسایی میدونن راهنمایی کنن ممنون
  7. به نام خدا سلام به همه ی دوستان نوروزتون مبارک اموزش قسمت view در دیتابیس رو با هم داریم اینکه اصن کارش چیه، مزیتش چیه و چجوری ازش استفاده کنیم... امیدوارم براتون مفید باشه.... دانلود فیلم اموزشی www.answercenter.ir
  8. با عرض سلام و وقت بخیر من میخوام از اطلاعات موجود در دیتا بیس خروجی به صورت pdf و یا excel بگیرم لطفا راهکار های موجود در این رابطه رو بیان کنید ممنونم
  9. سلام خدمت مهندسین آقا من یه اپلیکیشن میخوام طراحی کنم که با استفاده از دیتابیس ساخته میشه فقط یه چیزی رو نتونستم پیدا کنم و هرکاری کردم درست نشد ، دیتابیس من 8ستون داره میخوام توی 8 لیبل متفاوت نشون داده بشن ، لطفا بگید چیکار کنم که خروجیه هر ستون بیوفته توی یک لیبل
  10. سلام دوستان من بر اساس این اموزش جلو رفتم فقط یک درخواست کوچیک دارم لینک: آموزش اضافه - حذف و ویرایش اطلاعات در دیتابیس حالا من میخوام وقتی روی ایتم لیست ویو کلیک شد بره به اکتیویتی که یک لیبل داره و ستون citiy مربوط به ایتم کلیک شده رو به حای این که توی ادیت تکست نشون بده ،،،، توی لیبل نشون بده
  11. سلام دوستان ، کاربرای زیادی رو دیدم که با محدود کردن آیتم های لیست ویوو به منظور افزودن پرداخت درون برنامه بازار به برنامشون مشکل داشتن این آموزش به صورت ساده برای نرم افزارهای دارای دیتابیس شما هست و شما در ابتدا باید کتابخانه ی پرداخت درون برنامه که در فروشگاه همین انجمن فروخته میشه رو داشته باشید. در ابتدا احتمالا طریقه دریافت کلید RSA از کافه بازار و ساخت یک محصول رو طبق آموزش زیر یاد گرفتید: http://answercenter.ir/topic/3837-%DA%A9%D8%AA%D8%A7%D8%A8%D8%AE%D8%A7%D9%86%D9%87-%D8%AF%D8%B1%D9%88%D9%86-%D9%BE%D8%B1%D8%AF%D8%A7%D8%AE%D8%AA-%D8%A8%D8%A7%D8%B2%D8%A7%D8%B1/ خب ابتدا یه ستون به دیتابیستون اضافه میکنید (مثلا با نام kharid ) و بزارید به صورت پیشفرض همون string (عددی) باشه بعد مثلا اگه کتابتون 20 تا مطلب داره و میخواید فقط 6 تا از اونا رایگان باشه مقدار اون 6 تا مطلب رو توی دیتابیس 1 قرار بدید و مقدار سایر مطالب رو 0 بزارید (اولین تصویر پیوست) دقت کنید که حتما یه ستون دارید که شماره آیتم های لیست ویووتون رو مشخص میکنه که مثلا من اسمش رو id گذاشتم ( تصویر پیوست شده دوم) خب میریم سراغ کد نویسی این قسمت ها توی تاپیکی که آدرسش رو دادم هست ولی منم میگم : بعد از زدن تیک کتابخانه در قسمت Globals کلید RSA رو به صورت زیر وارد میکنیم : Sub Globals Dim pardakht As BillingManager_b4a_org dim key as string = "کلید RSA که از بازار گرفتید رو در این قسمت paste کنید" End Sub میریم سراغ Initialize کردن : Sub Activity_Create(FirstTime As Boolean) pardakht.Initialize("pardakht",key) End Sub حالا طریقه محدود کردن آیتم های لیست ویوو رو میگیم : Sub ListView1_ItemClick (Position As Int, Value As Object) Dim cur As Cursor cur=SQL1.ExecQuery("SELECT * FROM table1") cur.Position=Value-1 If cur.GetInt("kharid")=1 Then StartActivity(matlab) Else Dim p As Int p = Msgbox2("تنها با پرداخت 1500 تومان از سایر مطالب جذاب کتاب لذت ببرید","پرداخت درون برنامه","پرداخت ","انصرف","",LoadBitmap(File.DirAssets ,"pay.png")) If p=DialogResponse.POSITIVE Then pardakht.RequestPayment("inapppay","inapp","pardakht1") End If End If End Sub خب در خصوص کد بالا بگم که با کلیک بر روی هر مطلبی که باز باشه به صفحه matlab میرن و اگه مطلب نیاز به خرید داشته باشه هم یه MessageBoxبراشون نمایش داده میشه و میگه برای مشاهده سایر مطالب باید مبلغی رو پرداخت کنید و اگه روی گزینه پرداخت کلیک کنن صفحه پرداخت براشون باز بشه و اینکه اسم table من هم توی دیتابیس table1 وهمچنین اسم محصول من توی بازار inapppay هستش که شاید برای شما فرق داشته باشه (تصویر پیوست شده سوم ) در قسمت آخر میگیم که اگه پرداخت کرد سایر مطالب هم براش نمایش داده بشه Sub pardakht_PurchaseCompleted (Success As Boolean, Product As Purchase) Dim cur As Cursor cur=SQL1.ExecQuery("SELECT * FROM table1") If Success=True Then For j=0 To cur.RowCount SQL1.ExecNonQuery("update table1 set kharid=1 where id="&j) Next ToastMessageShow("پرداخت با موفقیت انجام شد",False) Else ToastMessageShow("پرداخت انجام نشد",False) End If End Sub این کد میگه که اگه پرداخت به درستی انجام شد مطالبی که نیاز به خرید داشتن باز بشن و اگه به درستی انجام شد هم یه ToastMessageShow نمایش بده و بگه پرداخت انجام نشده -------------------------------------------------------- پی نوشت : سعی کردم به ساده ترین صورت توضیح بدم ! امیدوارم مفید واقع بشه همچنین اطلاعات داده شده مربوط به برنامه اولین ها هست که توی امضام دربارش توضیح دادم
  12. سلام دوستان گلم طبق این آموزش چندتا سؤال دارم: http://answercenter.ir/topic/3952-%D8%A2%D9%85%D9%88%D8%B2%D8%B4-%D9%82%D8%B1%D8%A7%D8%B1-%D8%AF%D8%A7%D8%AF%D9%86-%D8%B9%DA%A9%D8%B3-%D8%AF%D8%B1-%D8%AF%DB%8C%D8%AA%D8%A7%D8%A8%DB%8C%D8%B3-%D9%81%D9%88%D9%82-%D9%85%D9%87%D9%85/ من قبلا یه پروژه رو تا لیست ویو پیش رفته بودم به این شکل: اسپلش ----> صفحه منو ----> لیست ویو بعد به گزینه اول لیست ویو طبق این کد: Sub ListView1_ItemClick (Position As Int, Value As Object) If Position=0 Then StartActivity("L1") End If End Sub بعد طبق همون آموزش توی ماژول L1 اطلاعات دیتابیس رو وارد کردم و به چندتا مشکل خوردم: Sub Process_Globals 'These global variables will be declared once when the application starts. 'These variables can be accessed from all modules. Dim s As SQL End Sub Sub Globals 'These global variables will be redeclared each time the activity is created. 'These variables can only be accessed from this module. Private ScrollView1 As ScrollView End Sub Sub Activity_Create(FirstTime As Boolean) 'Do not forget to load the layout file created with the visual designer. For example: Activity.LoadLayout("L1") If File.Exists(File.DirInternal,"L1.db")=False Then File.Copy(File.DirAssets,"L1.db",File.DirInternal,"L1.db") End If If s.IsInitialized=False Then s.Initialize(File.DirInternal,"L1.db",False) End If show End Sub Sub Activity_Resume End Sub Sub Activity_Pause (UserClosed As Boolean) End Sub Sub show Dim sh As Int sh=0 Dim cur As Cursor cur=s.ExecQuery("Select * from L1") Dim h As Int h=5%y For i=0 To cur.RowCount-1 cur.Position=i If cur.GetInt("type")=0 Then Dim lbl As Label lbl.Initialize("") lbl.Text=cur.GetString("value") lbl.Gravity=Gravity.RIGHT lbl.TextSize=15 lbl.TextColor=Colors.Black ScrollView1.Panel.AddView(lbl,2%x,h,96%x,0) Dim su As StringUtils lbl.Height=su.MeasureMultilineTextHeight(lbl,lbl.Text) h=h+lbl.Height+2%y sh=sh+lbl.Height ScrollView1.Panel.Height=sh Else Dim img As ImageView img.Initialize("") img.Bitmap=Namayesh(i) Dim bp As BitmapExtended bp.initialize("") ScrollView1.Panel.AddView(img,0,h,bp.getwidth(img.Bitmap),bp.getheight(img.Bitmap)) h=h+bp.getheight(img.Bitmap)+2%y sh=sh+bp.getheight(img.Bitmap) ScrollView1.Panel.height=sh End If ScrollView1.Panel.Height=ScrollView1.Panel.Height+10%y Next End Sub Sub Namayesh(position As String) As Bitmap Dim cur As Cursor cur=s.ExecQuery("Select Value from L1") cur.position=position Dim bytes() As Byte bytes=cur.GetBlob("value") Dim input As InputStream input.InitializeFromBytesArray(bytes,0,bytes.Length) Dim b As Bitmap b.Initialize2(input) input.Close Return(b) End Sub 1- یکی اینکه عکسی که بین دوتا متن قرار دادم اندازش مناسب با کادر نیست و از دو طرف کادر زده بیرون 2- توی لایوت L1 برای اون قسمت بک گراند عکس قرار دادم و وقتی روی گزینه اول لیست ویو کلیک میکنم لایوت L1 با اون بکگراند برای چند میلی ثانیه ظاهر میشه بعد این متن ها و اطلاعات دیتابیس با یه بک گراند کااااملا سفید سریع میاد روشو میپوشونه (امیدوارم خوب توضیح داده باشم ) 3- اینکه رنگ و فونت این متن ها رو چجوری میشه تغییر داد ؟؟؟ :nemidoonam: سرتونو درد آوردم شرمندم بخدا ...
  13. سلام میخوام یه اندازه از دیتابیس فراخوانی کنم و کدم هم به این شکل هست که میدونم اشتباه هست: ImageView1.Height=cur.GetString("size") داده های ستون size توی دیتابیس هم مثلا به این صوت هست: 40%x و با ارور روبه رو مواجه میشم : invalid double : "40%x" چطور این اندازه رو فراخوانی کنم ممنون
  14. مشکل در نمایش عکس

    سلام من کد زیر رو در برنامه وارد کردم Sub Namayesh(List As String) As Bitmap Dim cur As Cursor cur=menu1.SQL1.ExecQuery("SELECT * FROM Tbl1 WHERE id="&menu1.Fasl) cur.Position=0 Dim bytes() As Byte bytes=cur.GetBlob("image") Dim input As InputStream input.InitializeFromBytesArray(bytes,0,bytes.Length) Dim b As Bitmap b.Initialize2(input) input.Close Return(b) End Sub و در قسمت Activity_Create For i = 0 To cur.RowCount -1 cur.Position = i ImageView1.Bitmap=Namayesh(cur.GetString("fasl")) Next بعد از کامپایل کردن برنامه روی صفحه گوشی در صفحه مورد نظر این ارور نمایش داده میشه : an error has occured in sub : java.lang.illegalargumentexception:column 'image' does not exist یه عکس از دیتابیسم ررو هم پیوست کردم مشکل چیه چیکار کنم؟
  15. سلام دوستان فقط میخوام بگین کجای این کد زیر اشتباه است و باید چه جوری باشه کدهای زیر مربوط به ایجاد یه edittext برای سرچ در اکتیویتی لیست ویوو هستش که من برای ایجادش فقط عکس آیتم های لیست ویوو رو نمیتونم نمایش بدم مشکلم هم مربوط به خط هفتم کد زیر هست احتمالا cur= sql1.ExecQuery("select * from mytable") For i = 0 To cur.RowCount -1 cur.Position = i esm=cur.GetString("list") famil=cur.GetString("id") Dim b As Bitmap b.Initialize(File.DirInternal,namayesh(cur.GetString("list"))) ListView1.AddTwoLinesAndbitmap(esm,famil,b) و این هم کد قسمت نمایش که توی قسمت بالا میبینیم: Sub namayesh(List As String) As Bitmap Dim cur As Cursor cur=sql1.ExecQuery("SELECT image FROM mytable WHERE list='"& List & "'") cur.Position=0 Dim bytes() As Byte bytes=cur.GetBlob("image") Dim input As InputStream input.InitializeFromBytesArray(bytes,0,bytes.Length) Dim b As Bitmap b.Initialize2(input) input.Close Return(b) End Sub امیدوارم منظورم رو فهمیده باشید
  16. سلام دوستان یه سوال من یه لیست ویوو ساختم که فرض کنید 10تا آیتم داره (مثل یه کتاب اندرویدی که 10 تا داستان داره) ، و روی هر آیتم کلیک کنیم صفحه جدیدی باز بشه و متن مربوط به اون آیتم نمایش داده بشه من به برنامه گفتم که به ترتیب عناوین آیتم های لیست ویوو رو از دیتابیس بگیره و نمایش بده که این کار رو به خوبی انجام میده به این شکل : ListView1.AddTwoLinesandbitmap(cur.GetString("list"),cur.GetString("id"),Namayesh(cur.GetString("list"))) و یه عکس از دیتابیسم هم که پیوست کردم... خب حالا مشکل اینجاس که فرض کنید ما روی آیتم پنجم کلیک میکنیم و میخوایم که توی صفحه جدید متن مربوط به آیتم پنجم نمایش داده بشه اما باز هم متن مربوط به آیتم اول نمایش داده میشه (روی هر آیتمی کلیک میکنیم متن آیتم مربوط به آیتم اول نمایش داده میشه ) طبق این کد من که البته اشتباه هست : text= File.ReadString(cur.GetString("matn")) (کد بالا توی صفحه دومی هست که بعد از کلیک روی هر آیتم نمایش داده میشه) به نظر شما من چه جوری به برنامه میتونم بگم که هر متن رو توی صفحه دوم طبق شماره آیتمش بگیره و نمایش بده ممنون