2015-03-08 08:44
浏览 156


I don't know if this is even possible, and I can't figure how to achieve this.

I have 50 (can be more) records in MS Access database that I wish to send to a a php file at my server for further processing.

What I have implemented so far is that I loop through the records and send them one by one. This kind of takes time cause of network issues, some records will be sent and others won't and each data sent will have to wait for report from server before the next one will be sent.

Is there a way I can send all records once, maybe in an array or something and be able to access it at the server side?

Below is my table schema.

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


图片转代码服务由CSDN问答提供 功能建议


我在 MS Access 数据库中有50条(可以更多)记录,我希望在我的服务器上发送到 php file 以进一步 处理。

到目前为止我实现的是我遍历记录并逐个发送。 这种花费时间导致网络问题,一些记录将被发送而其他记录将不会发送,每个发送的数据都必须等待服务器报告,然后才能发送下一个。



  -------------------  ------- \ N |  id | 电话|  msg | 
 |  1 |  09023023 | 嗨| 
 |  2 |  09023024 | 嘿| 
 |  3 |  09023025 | 亲爱的|  


  • 写回答
  • 好问题 提建议
  • 关注问题
  • 收藏
  • 邀请回答

2条回答 默认 最新

  • douchuose2514 2015-04-15 10:37

    I found a solution for this. I don't know if it is the best way out there but it worked well.

    On @Tushar Gupta suggestion, I created a Json Array using a third party Json Library found at

    I looped through the data in the database and concatenated them like so:


        Dim sms As New Sms 'note that this is a class
        Dim sms_obj As String = ""
            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()
       = 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)
                    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
            If sms.ToString <> "" Then
            End If
            lblSmsState.Text = "sending sms done!"
        Catch ex As Exception
        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"
    解决 无用
    打赏 举报
  • dqc2017 2015-03-24 00:27

    not sure what you are exactly trying to achieve but you could use MYSQL or phpmyAdmin

    you could also in the excel file add $id = ( at the top of the column and then use commas to separate the records (CTRL + F replace may be useful) and end the column with );. You may want to follow the same procedure with phone and msg too, then save the file as a CSV or make it into single line or perhaps copy the data in your text editor and that should save it as an array.

    php also makes use of multi dimensional array, which you can read up and can store everything in one array (not recommended as not efficient).

    解决 无用
    打赏 举报

相关推荐 更多相似问题