رفتن به مطلب
  • 0

اضافه و حذف از بانک آنلاین


korosh

سوال

سلام 

من با دستور زیر 

HttpUtils.PostString("Job1", ServerUrl, "SELECT col1,col2 FROM t1")

تونستم اطلاعات رو از دیتابیس آنلاین بخونم و بیارم تو صفحه .

حالا من بخوام دستور insert یا update یا delete را بنویسم اولا نمونه اش چجوریه در بیسیک چون من یک نمونه دستور insert دیدم که ی کمی با اس کیو ال فرق داشت نگارشش !

بعد همینجا دستور رو بنویسیم حله یا باید در این قسمت هم بنویسیم چیزهایی رو :

Sub JobDone (Job As String)
	If HttpUtils.IsSuccess(ServerUrl) Then

ممنون اگر راهنمایی بفرمایید 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

7 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

پی اچ پی در بیسیک 4 اندروید یا کلا پی اچ پی ؟
من خودم نمونه رو با asp دریافت می کنم . 
الان مشکل من اینه بخوام یک دکمه بزارم و بگم از تکس باکس مقدار رو بگیرو وارد دیتابیس کن این قسمت رو مشکل دارم ؟
آیا باید در کد پی اچ پی و یا asp سمت سرور هم تغییراتی داد ؟
نمونه ای که من کار کردم اینه 
این مدل php هست 

<?

$databasehost = "localhost";
$databasename = "xxxx";
$databaseusername ="xxxx";
$databasepassword = "xxxx";

$con = mysql_connect($databasehost,$databaseusername,$databasepassword) or die(mysql_error());
mysql_select_db($databasename) or die(mysql_error());
mysql_query("SET CHARACTER SET utf8");
$query = file_get_contents("php://input");
$sth = mysql_query($query);

if (mysql_errno()) {
    header("HTTP/1.1 500 Internal Server Error");
    echo $query.'\n';
    echo mysql_error();
}
else
{
    $rows = array();
    while($r = mysql_fetch_assoc($sth)) {
        $rows[] = $r;
    }
    print json_encode($rows);
}
?>

اینم asp

<%@ Page Language="C#"%>
<%@ Import Namespace="System.Collections.Generic" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<%@ Import Namespace="System.IO" %>
<%@ Import Namespace="System.Web.Script.Serialization" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
    protected void Page_Load(object sender, EventArgs ec)
    {
        using (SqlConnection cn = new SqlConnection("Database=Test1; User Id=UserName; password=Password")) //change as needed
        {
            using (StreamReader sr = new StreamReader(Request.InputStream, Encoding.UTF8))
            {
                Response.ContentType = "text/plain";
                string c;
                c = Request.QueryString["query"]; //for debugging with the browser
                //you can set the query by adding the query parameter  For ex: http://127.0.0.1/test.aspx?query=select * from table1
                if (c == null)
                    c = sr.ReadToEnd();
                try
                {
                    SqlCommand cmd = new SqlCommand(c, cn);
                    cn.Open();
                    SqlDataReader rdr = cmd.ExecuteReader(CommandBehavior.CloseConnection);
                    List<Dictionary<string, object>> list = new List<Dictionary<string, object>>();
                    while (rdr.Read())
                    {
                        Dictionary<string, object> d = new Dictionary<string, object>(rdr.FieldCount);
                        for (int i =0;i < rdr.FieldCount;i++)
                        {
                            d[rdr.GetName(i)] = rdr.GetValue(i);
                        }
                        list.Add(d);
                    }
                    JavaScriptSerializer j = new JavaScriptSerializer();
                    Response.Write(j.Serialize(list.ToArray()));
                  
                } catch (Exception e)
                {
                    Response.TrySkipIisCustomErrors = true;
                    Response.StatusCode = 500;
                    Response.Write("Error occurred. Query=" + c + "\n");
                    Response.Write(e.ToString());
                  
                }
                Response.End();
            }
        }
    }
</script>

اینم کد b4

Sub Process_Globals
   Dim ServerUrl As String
   ServerUrl = "http://www.example.com/test1.aspx"
End Sub

Sub Globals

End Sub

Sub Activity_Create(FirstTime As Boolean)
   If FirstTime Then
      HttpUtils.CallbackActivity = "Main"
      HttpUtils.CallbackJobDoneSub = "JobDone"
   End If
    
   HttpUtils.PostString("Job1", ServerUrl, "SELECT col1, col2 FROM Table_1")
End Sub

Sub Activity_Resume
   If HttpUtils.Complete = True Then JobDone(HttpUtils.Job)
End Sub

Sub Activity_Pause (UserClosed As Boolean)
 
End Sub

Sub JobDone (Job As String)
   If HttpUtils.IsSuccess(ServerUrl) Then
      Dim parser As JSONParser
      Dim response As String
      response = HttpUtils.GetString(ServerUrl)
      parser.Initialize(response)
      Dim rows As List
      rows = parser.NextArray
    
      'work with result
      'rows is a List. Each item is a Map with the columns names as keys and the db values as the values.
      For i = 0 To rows.Size - 1
         Log("Rows #" & i)
         Dim m As Map
         m = rows.Get(i)
         Log("col1=" & m.Get("col1")) 'log the values of col1 and col2
         Log("col2=" & m.Get("col2"))
      Next
   End If
   HttpUtils.Complete = False
End Sub

الان من می تونم تو یک لیست مقادیر دیتابیس رو بخونم . 

حلا چجوری باید اضافه و ویرایش کنم ؟

لینک ارسال
به اشتراک گذاری در سایت های دیگر

دوست عزیزم یکم در مورد کدهایی که نوشتی توضیح میدی

بیشتر سمت سرورش

ممنون

لینک ارسال
به اشتراک گذاری در سایت های دیگر

اینو یه بار رو خود b4a امتحان کن یه بار هم توی php یا asp آخه من به این سبکی که شما توی b4a سلکت کردی، تاحالا کار نکردم. همیشه با خود php سلکت میکنم.

"DELETE FROM Table_1 where ..."
یا
"DELETE FROM Table_1"

این برای delete بود و برای update و insert هم از همین راه برو.

البته هنوز شک دارم جواب سوالتون این باشه. شاید من درست متوجه نشدم و ...

لینک ارسال
به اشتراک گذاری در سایت های دیگر

شما نمونه ای که خودتون کار کرذی و جواب گرفتی رو میشه بفرستی . 

بیشتر کار من تو بالا روی همون قسمت 

 For i = 0 To rows.Size - 1
         Log("Rows #" & i)
         Dim m As Map
         m = rows.Get(i)
         Log("col1=" & m.Get("col1")) 'log the values of col1 and col2
         Log("col2=" & m.Get("col2"))
      Next

است . اینجا میاد ردیف ها رو میخونه و می زاره تو برنامه .

 

دیگه من تا اینجا بلد شدم . بقیه اش و مدل دیگه که بشه insert کرد و update و شما بفرمایید .

ممنون

لینک ارسال
به اشتراک گذاری در سایت های دیگر

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

موفق باشید

لینک ارسال
به اشتراک گذاری در سایت های دیگر

سلام.

من این کار رو با php انجام میدم.

اگه php بلد هستید، بیشتر توضیح میدم.

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...