Dim cr As Cursor
cr= Main.sqlite.ExecQuery("SELECT * FROM basket")
ht1.Initialize("ht1", Me)
For i= 0 To cr.RowCount-1
cr.Position=i
products = "customer="& "ali" & "&product="&cr.GetString("name") & "&price="& cr.GetString("price")
ht1.PostString("http://mydomin.ir/submit.php",products)
Next
cr.Close
باسلام
من توی برنامه وقتی میخوام رکورد های یکی از جدول های دیتابیس آفلاینمو برای دیتابیس آنلاینم بفرستم تا اونجا ذخیره بشه، فقط رکورد آخر رو ذخیره میکنه، یعنی حلقه کار میکنه و به تعداد رکورد های جدول اطلاعات میفرسته ولی فقط رکورد آخر رو چند بار سیو میکنه
سوال
snoorana 13
Dim cr As Cursor cr= Main.sqlite.ExecQuery("SELECT * FROM basket") ht1.Initialize("ht1", Me) For i= 0 To cr.RowCount-1 cr.Position=i products = "customer="& "ali" & "&product="&cr.GetString("name") & "&price="& cr.GetString("price") ht1.PostString("http://mydomin.ir/submit.php",products) Next cr.Close
باسلام
من توی برنامه وقتی میخوام رکورد های یکی از جدول های دیتابیس آفلاینمو برای دیتابیس آنلاینم بفرستم تا اونجا ذخیره بشه، فقط رکورد آخر رو ذخیره میکنه، یعنی حلقه کار میکنه و به تعداد رکورد های جدول اطلاعات میفرسته ولی فقط رکورد آخر رو چند بار سیو میکنه
کدها رو گذاشتم لطفا کمکم کنید
مرسی
لینک ارسال
به اشتراک گذاری در سایت های دیگر
3 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.