C# と VB.NET の質問掲示板

■No42942 (nao さん) に返信
> ss = "SELECT * INTO test_naoa FROM OPENROWSET("'" & appfile "'", [Sheet1$])"
> と、しているのですが、Sheet1でもエラーメッセージ、appfileでもエラーとなってしまいます。

どのようなエラーなのでしょうか。


excel の DataTable を元に SQL Server への Insert クエリーを発行するという手もあります。

Public Sub insertFromExcel(ByVal excelTable As DataTable)
    Using connection As New SqlConnection(connectionString)
        Using insertCommand = New SqlCommand( _
            "INSERT INTO [namer] ( name ) VALUES( @name )", connection)

            Dim nameParameter As SqlParameter = _
                insertCommand.Parameters.Add("@name", SqlDbType.NVarChar)

            connection.Open()

            For Each excelRow As DataRow In excelTable.Rows
                nameParameter.Value = excelRow(0)
                insertCommand.ExecuteNonQuery()
            Next

            connection.Close()
        End Using
    End Using
End Sub

■No91405 (虎夫 さん) に返信

こんな感じで

Sub Main()
    Dim ffMpeg = New NReco.VideoConverter.FFMpegConverter()
    Dim stream = New System.IO.MemoryStream()

    ffMpeg.GetVideoThumbnail("test.mp4", stream, 4.5F)

    Dim bytes = stream.ToArray()
    System.IO.File.WriteAllBytes("test.jpg", bytes)
End Sub