none
ACCDB 다음 칼럼에 넣기 RRS feed

  • 질문

  • 아래 처럼 하면 쓰기는 됩니다

    다음 칼럼에 넣기가 않됩니다.

    어떻게 다음 칼럼에 넣을수 있을까요

    Imports ADODB
    Imports System.Data.OleDb
    Imports System

    Private StrSQL As String = "Provider=Microsoft.ACE.OLEDB.12.0; _
              Jet OLEDB:Database Password=cSSO3sEEhrM4vY3je0qC;" & _
              "Data Source =" & App_Path() & "\ACCDB\fan_data.accdb"

    Private Sub FAN_그래프_DATA()
            Dim Conn = New OleDbConnection(StrSQL)
            Conn.Open()
            '쓰기
            Dim comm = New OleDbCommand("SELECT * FROM fan_차트", Conn)

            Dim access As String

              access = "UPDATE fan_차트 SET 풍량 = '" & 풍량계산 & _
                                                         "', 정압 = '" & 정압계산 & _
                                                         "', 동력 = '" & 효율계산 & _
                                                         "', 효율 = '" & 동력계산 & "'"
            Next i

            Dim cmd As New OleDbCommand(access, Conn)
            cmd.ExecuteNonQuery()
            Conn.Close()
    end sub

    2014년 11월 4일 화요일 오전 1:29