Click here to Skip to main content
12,064,633 members (32,883 online)
Rate this:
Please Sign up or sign in to vote.
See more: VB XML database VB.NET convert , +
when I just execute this program error notification will be shown:

Sub insert()
      Dim ds As New DataSet
      Dim xmlFile As XmlReader
      Dim sql As String
      Dim id As String
      Dim company As String
      Dim datecom As Date
      Dim time As String
      Dim place As String
      Dim address As String
      Dim type As String
      Dim hidden As String
      xmlFile = XmlReader.Create("../../XML/datacoba.xml", New XmlReaderSettings())
      Dim i As Integer
      For i = 0 To ds.Tables(0).Rows.Count - 1
          id = ds.Tables(0).Rows(i).Item(0)
          '<on this line will be shown error "cannot find column 1" >
          company = ds.Tables(0).Rows(i).Item(1)
          datecom = (ds.Tables(0).Rows(i).Item(2))
          time = (ds.Tables(0).Rows(i).Item(3))
          place = ds.Tables(0).Rows(i).Item(4)
          address = ds.Tables(0).Rows(i).Item(5)
          type = ds.Tables(0).Rows(i).Item(6)
          hidden = ds.Tables(0).Rows(i).Item(7)
          sql = "insert into seminar_insert values(" & id & ",'" & company & "'," & datecom & "," & time & "," & place & "," & address & "," & type & "," & hidden & ")"
          'Command = New SqlCommand(sql, connection)
          cmd.CommandType = CommandType.Text
  End Sub
and this is xml files:
<?xml version="1.0" encoding="utf-8"?>
<!--XML Files datakonsumen-->
        <!--Start record-->
        <company>PT rubungjaya</company>
        <company>Pemkab malang</company>
        <place>Gedung graha cakra</place>
        <address>Jl melati, Malang</address>
        <company>PT alca</company>
        <id />
        <company />
        <date />
Posted 24-May-13 17:36pm

1 solution

Rate this: bad
Please Sign up or sign in to vote.

Solution 1

You have an improper SQL statement, if you don't specify data for EVERY column, you must identify the columns you are inserting into.[^]

Otherwise how can the data driver know what columns you are trying to use?
Helmi Avicenna 24-May-13 23:19pm
I mean before execute the insert query.
error message shown on this line: company = ds.Tables(0).Rows(i).Item(1)

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

  Print Answers RSS
Top Experts
Last 24hrsThis month

Advertise | Privacy | Mobile
Web02 | 2.8.160204.4 | Last Updated 24 May 2013
Copyright © CodeProject, 1999-2016
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100