Отправка массива данных в PHP на сервер из vb.Net

Question

Отправка массива данных в PHP на сервер из vb.Net

Я не знаю, возможно ли это вообще, и я не могу понять, как этого добиться.

У меня 50 (может быть больше) записей в MS Access База данных, которую я хочу отправить php file на моем сервере для дальнейшей обработки.

До сих пор я реализовал циклический просмотр записей и отправлял их одну за другой. Этот вид требует времени из-за проблем с сетью, некоторые записи будут отправлены, а другие нет, и для каждой отправленной информации придется ждать отчет с сервера, прежде чем будет отправлена следующая.

Есть ли способ, которым я могу отправить все записи один раз, может быть, в массив или что-то и получить доступ к нему на стороне сервера?

Ниже моя схема таблицы.

--------------------------
|  id  |  phone  |  msg  |
--------------------------
|  1   | 09023023|  hi   |
|  2   | 09023024|  hey  |
|  3   | 09023025|  dear |
--------------------------

Спасибо

3

arrays json php vb.net

Решение

Другие решения

не знаю, чего именно вы пытаетесь достичь, но вы можете использовать MYSQL или phpmyAdmin

Вы также можете добавить в файл Excel $id = ( в верхней части столбца, а затем используйте запятые для разделения записей (CTRL + F замена может быть полезна) и завершить столбец );, Вы можете выполнить ту же процедуру с телефоном и MSG, а затем сохранить файл в формате CSV или сделать его в одну строку или, возможно, скопировать данные в текстовом редакторе, и это должно сохранить его в виде массива.

php также использует многомерный массив, который вы можете прочитать и хранить все в одном массиве (не рекомендуется, так как он не эффективен).

0

Источник

Accepted Answer

Я нашел решение для этого. Я не знаю, является ли это лучшим выходом, но это сработало хорошо.

На @Tushar Gupta предложение, я создал Json Array используя третье лицо Json Library найден в http://www.newtonsoft.com/

Я перебрал данные в базе данных и объединил их так:

КОД

    Dim sms As New Sms 'note that this is a class
Dim sms_obj As String = ""

Try
conn.Open()

Dim cmd As OleDbCommand = New OleDbCommand("id, phone, msg FROM sms;", conn)

Dim reader As OleDbDataReader = cmd.ExecuteReader'collate sms
Dim i As Integer = 0
While reader.Read()

sms.id = reader("id").ToString()
sms.member_phone = reader("phone").ToString()
sms.member_message = reader("msg").ToString()If sms_obj = "" Then
sms_obj = sms_obj + JsonConvert.SerializeObject(sms, Formatting.Indented)
Else
sms_obj = sms_obj + "," + JsonConvert.SerializeObject(sms, Formatting.Indented)
End If

End While

sms_obj = "{ ""sms""" + ":" + "[" + sms_obj + "]}" ' this put the json string in an array

'close the connection
conn.Close()If sms.ToString <> "" Then
HelperModule.SendSms(sms_obj)
End IflblSmsState.Text = "sending sms done!"
Catch ex As Exception
msgbox(ex.toString())
conn.Close()
End Try

ВЫХОД

    { "sms":[
{
"id": "1",
"member_phone": "09023023",
"member_message": "hi"},{
"id": "2",
"member_phone": "09023024",
"member_message": "hey"},{
"id": "3",
"member-phone": "09023025",
"member_message": "dear"}

]
}

1