دیتابیس آنلاین وارد کردن آیتم جدید به دیتابیس آنلاین توسط b4a

[Siaic 88]

سلام

من میخوام یه اپ درست کنم که چند تا ادیت تکست داره

و داخل ادیت تکست id جدید و متن و لینک و... قرار میگیره...

حالا من میخوام یه دکمه بزارم با زدن اون باتن اطلاعات از اپ بره روی دیتابیس و به عنوان یه سطر مستقل قرار بگیره

مثلا id  اضافه بشه و ستون ها با توجه به اطلاعات ارسالی b4a پر بشه

مرسی

[solmos36 69]

در 2 ساعت قبل، Siaic گفته است :

سلام

من میخوام یه اپ درست کنم که چند تا ادیت تکست داره

و داخل ادیت تکست id جدید و متن و لینک و... قرار میگیره...

حالا من میخوام یه دکمه بزارم با زدن اون باتن اطلاعات از اپ بره روی دیتابیس و به عنوان یه سطر مستقل قرار بگیره

مثلا id  اضافه بشه و ستون ها با توجه به اطلاعات ارسالی b4a پر بشه

مرسی

باید برای سمت بانک آنلاینتون کد بزنید با php که بتونید مطالب رو به باkک پست کنید برای سمت بیسیک هم باید با ریجکس کار کنید هر کدوم رو جدا کنید و تک تک به هر ایتم از بانکی که میخواهین پست کنید

[Siaic 88]

در 6 ساعت قبل، solmos36 گفته است :

باید برای سمت بانک آنلاینتون کد بزنید با php که بتونید مطالب رو به باkک پست کنید برای سمت بیسیک هم باید با ریجکس کار کنید هر کدوم رو جدا کنید و تک تک به هر ایتم از بانکی که میخواهین پست کنید

 

سلام

راستش من زیاد حرفه ای نیستم تو این زمینه میشه یه سورس ساده بدید؟

هم برای php

هم b4a

تشکر

 

[حاج حسین 2,098]

اینو ببین دقیقا همین کار میکنه 

آموزش تصویری برقراری ارتباط با دیتابیس آنلاین در بیسیک4اندروید

[shahab.es 5,429]

سلام یه دیتابیس میسازین

با یه جدول به اسم مثلا tbl_test

php

<?php
$conn = new mysqli('localhost','username','pass','dbname');
$id = $_POST["id"];
$name = $_POST["name"];
$age = $_POST["age"];
if($conn->query("insert into tbl_test (id,name.age) values ('$id','$name','$age')")){
    echo "done";
}
?>

بیسیک با httputills

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	'Activity.LoadLayout("Layout1")
	Dim ht As HttpJob
	ht.Initialize("ht1",Me)
'	bad az click roo dokme
	ht.PostString("","id="&edittext1.text&"&name="&eddittext2.text&"&age="&edittext3.text&"")

End Sub


Sub jobdone(job As HttpJob)
	If job.JobName = "ht1" Then
		If job.Success Then
			If job.GetString = "done" Then
				ToastMessageShow("added successfully",False)
			End If
		End If
	End If
End Sub

تست بفرمایید