استفاده از دیتابیس در بیسیک 4 جاوا

[arastooms 1,046]

سلام به همه عزیزان
یک دیتابیس ساده mysqlite دارم که تو بیسیک استفاده میکنم در یک برنامه
قصد دارم در جا وا هم برنامه ای براش بنویسم
از اونجایی که در جاوا مبتدی مبتدی هستم 
نمی تونم و با مشکلات زیر روبرو میشم 

 

1- دیتابیس رو میزارم تو پوشه فایل file ولی sql نمیشناسه چون نمیتونم آدرس دهی کنم  محبت میکنید اگر راهنمایی بفرمایید 
2- قصد دارم تعداد رکورد های دیتابیس رو log کنم ببینم چند تا رکورد دارم

3- قصد دارم از ستون id=1 و ستون name بیام و اسمی رو که در خط position=0 و id=1 قرار داده بخونم و log کنم

4- اصلا نمیدونم  cursor چه طوری اینجا تعریف میشه!!!
5- دست شما هم درد نکنه اگر یه 4 خط کد ما رو راهنمایی کنید بتونیم یه رکورد هم اضافه کنیم به دیتابیس 
ممنون میشم

[AMiN.M7892 1,029]

سلام ارسطوجان؛

کار با دیتابیس در B4J هم مثل B4A هست فقط تفاوتش در اسم بعضی کلاس ها و البته اینشیالایز کردن کتابخونه‌ست

به این شکل که بعد از تعریف یک شی از نوع Sql به این شیوه اینشیالایز میکنید:

SQL1.InitializeSQLite(File.DirApp, "MyDb.db", True) 

این مورد رو هم باید اضافه کنید به پروژه:

#AdditionalJar: sqlite-jdbc-3.7.2

فایل این کتابخونه ی نیتیو در لایبراری ها موجود هست به شکل پیشفرض

بعد هم بجای کلاس Cursor باید از ResultSet استفاده کنید

باقی موارد هم دقیقا مثل B4A هست و کوئری های SQL و...

[arastooms 1,046]

سپاس امین جان درست شد

	'=====================================================================================
	'بخش دیتابیس
	If Not(File.Exists(File.DirAssets,"db1.db")) Then
		File.Copy(File.DirAssets,"db1.db",File.DirApp,"db1.db")
		'	اینشیالایز دیتابیس
		sql1.InitializeSQLite(File.DirApp, "db1.db",False)

	Else
		'	اینشیالایز دیتابیس
		sql1.InitializeSQLite(File.DirApp, "db1.db",False)
	End If
	'=====================================================================================


	Dim Cursor As ResultSet
	Cursor = sql1.ExecQuery("SELECT id,verb FROM tbl_master")
	Do While Cursor.NextRow
		Log(Cursor.GetString("id"))
		Log(Cursor.GetInt("verb"))
	Loop
	
	Log(Cursor.ColumnCount)