プログラミングの最近のブログ記事

<asp:Label ID="lblExcelSel" runat="server" Text="Excelファイル"></asp:Label>&nbsp;

<asp:FileUpload ID="fileExcel" runat="server" />&nbsp;

<asp:Button ID="btnUpFile" runat="server" Text="取込" /> 

    ''' <summary>

    ''' 取込ボタン処理

    ''' </summary>

    ''' <param name="sender"></param>

    ''' <param name="e"></param>

    ''' <remarks></remarks>

    Protected Sub btnUpFile_Click(sender As Object, e As EventArgs) Handles btnUpFile.Click

        ' ファイルがアップロードされていなければ終了

        If (fileExcel.HasFile = False) Then Return

        ' ファイルをメモリーに格納

        Dim data(fileExcel.PostedFile.ContentLength - 1) As Byte

        fileExcel.PostedFile.InputStream.Read(data, 0, fileExcel.PostedFile.ContentLength)

        Dim xlsWorkBookSet As SpreadsheetGear.IWorkbookSet = SpreadsheetGear.Factory.GetWorkbookSet()

        Dim xlsWorkBook As SpreadsheetGear.IWorkbook = Nothing

        Try

            'メモリからワークブックにセット

            xlsWorkBook = xlsWorkBookSet.Workbooks.OpenFromMemory(data)

        Catch ex As Exception

            alert("Excelファイルを読み込めませんでした。（" + ex.Message + "）")

            Return

        End Try

        Dim currentSheet As SpreadsheetGear.IWorksheet = CType(xlsWorkBook.Worksheets(0), SpreadsheetGear.IWorksheet)

＜以下略＞

git --no-optional-locks -c color.branch=false -c color.diff=false -c color.status=false -c diff.mnemonicprefix=false -c core.quotepath=false -c credential.helper=sourcetree push -v --tags origin refs/heads/main:refs/heads/main 

Pushing to ssh://github.com/XXXXXXX/sXXXXXXX.git

git@github.com: Permission denied (publickey).

fatal: Could not read from remote repository.

※ GitHub に登録しているメールアドレスで作成

※ ディフォルトの名前を変更して作成（ケツに GitHub と付ける）

% ssh-keygen -t ed25519 -C "hogehoge@exsample.com"

Generating public/private ed25519 key pair.

Enter file in which to save the key (/Users/hogehoge/.ssh/id_ed25519): /Users/hogehoge/.ssh/id_ed25519_GitHub

Enter passphrase (empty for no passphrase): ＜パスフレーズ＞

Enter same passphrase again: ＜パスフレーズ＞

Your identification has been saved in /Users/hogehoge/.ssh/id_ed25519_GitHub

Your public key has been saved in /Users/hogehoge/.ssh/id_ed25519_GitHub.pub

The key fingerprint is:

SHA256:oKy＜略＞h4 hogehoge@exsample.com

The key's randomart image is:

+--[ED25519 256]--+

|           .=..  |

|           o.+   |

|      .    .=E   |

|   . . . ..++o.  |

|    + o S ..+.+ o|

|   o . + .   = =+|

|  o       .   B.*|

|oo.        . + X+|

|*=.         . =o=|

+----[SHA256]-----+

% eval "$(ssh-agent -s)"

Agent pid 6763

% open ~/.ssh/config

The file /Users/hogehoge/.ssh/config does not exist.

存在していないので空ファイルを作成

% touch ~/.ssh/config

% vi ~/.ssh/config

% cat ~/.ssh/config

Host github.com

  AddKeysToAgent yes

  UseKeychain yes

  IdentityFile ~/.ssh/id_ed25519_GitHub

※ UseKeychain yes 行を書かなければ、キーにパスフレーズを追加しないようにできるらしい

% ssh-add --apple-use-keychain ~/.ssh/id_ed25519_GitHub

Enter passphrase for /Users/hogehoge/.ssh/id_ed25519_GitHub: ＜パスフレーズ＞

Identity added: /Users/hogehoge/.ssh/id_ed25519_GitHub (hogehoge@exsample.com)

% pbcopy < ~/.ssh/id_ed25519_GitHub.pub

※ .pub がついている公開鍵をコピーしよう。俺は .pub のついていない秘密鍵の方をコピーして GitHub から「Key is invalid. You must supply a key in OpenSSH public key format」と叱られた

Web で GitHub にログインし、設定画面を開く→[アクセス] セクションの[SSH キーと GPG キー]を開き、New SSH Key の登録を行う

For Each dr As DataRow In DataTable1.Rows

    HTOld(dr("職種", DataRowVersion.Original).ToString) = dr("人数", DataRowVersion.Original).ToString

    HTNew(dr("職種").ToString) = dr("人数").ToString

Next

System.Data.VersionNotFoundException: 'アクセスする Original データがありません。'

If dr.RowState <> DataRowState.Added Then

    HTOld(dr("職種", DataRowVersion.Original).ToString) = dr("人数", DataRowVersion.Original).ToString

End If

If dr.RowState <> DataRowState.Deleted Then

    HTOld(dr("職種") = dr("人数").ToString

End If

IF hogehoge THEN

    dataGrid1.Columns(1).Frozen = True

ELSE

    dataGrid1.Columns(4).Frozen = True

END IF

IF hogehoge THEN

    dataGrid1.Columns(4).Frozen = False

    dataGrid1.Columns(1).Frozen = True

ELSE

    dataGrid1.Columns(1).Frozen = False

    dataGrid1.Columns(4).Frozen = True

END IF

FOR i AS Integer 0 TO dataGrid1.Columns.Count - 1 

    dataGrid1.Columns(i).Frozen = False

NEXT

（例）

export LC_CTYPE=ja_JP.eucJP; /usr/bin/unzip -OCP932 -d /tmp exsample.zip

export LC_CTYPE=ja_JP.UTF-8

using System;

using System.Collections.Generic;

using System.Data;

using System.Data.SqlClient;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

dbaccess();

        static void dbaccess()

        {

            string dataSource, initCatalog, userId, passWord, connectionString;

            dataSource = "DBSERVER\\MSSQL2019";

            initCatalog = "InazumaDB";

            userId = "sa";

            passWord = "hogepass";

            connectionString = @"Data Source=" + dataSource + ";Initial Catalog=" + initCatalog + ";User ID=" + userId + ";Password=" + passWord;

            string query_s = "SELECT TOMO_ID, TOMO_NAME, TOMO_MEMO FROM InazumaDB.dbo.M_TOMODACHI";

            using (SqlConnection conn = new SqlConnection(connectionString))

            {

                //接続

                conn.Open();

                //SQL文を作成

                SqlCommand command_s = new SqlCommand(query_s, conn);

                using (SqlDataReader reader = command_s.ExecuteReader())

                {

                    //繰り返し読み込み

                    while (reader.Read())

                    {

                        //1～3列目の値を表示

                        Console.WriteLine(String.Format("{0}, {1}, {2}", reader[0], reader[1], reader[2]));

                    }

                }

                conn.Close();

            }

        }

      1, アンモニア治郎, おごってくれるから友達

      2, クロム陽子, かわいいから友達

     14, ばいじん太郎, 事業に失敗したからそろそろ切ろう

RZ10011 Component 'login' starts with a lowercase character. Component names cannot start with a lowercase character.

    var Connection = require('tedious').Connection;  

    var config = {  

        server: 'DBSERVER\\MSSQL2019',

        authentication: {

            type: 'default',

            options: {

                userName: 'sa',

                password: 'hogepass'

            }

        },

        options: {

            encrypt: true,

            database: 'InazumaDB'

        }

    }; 

    var connection = new Connection(config);  

    connection.on('connect', function(err) {  

        if (err) {

            console.log(err);

        } else {

            console.log('CONNECT');

        }

    });

    connection.connect();

C:\Users\shinoda>node connect_test.js

ConnectionError: Failed to connect to DBSERVER\MSSQL2019:1433 - getaddrinfo ENOTFOUND DBSERVER\MSSQL2019

    at Connection.socketError (C:\Users\shinoda\node_modules\tedious\lib\connection.js:1404:28)

    at C:\Users\shinoda\node_modules\tedious\lib\connection.js:1185:14

    at process.processTicksAndRejections (node:internal/process/task_queues:77:11) {

  code: 'ESOCKET',

  isTransient: undefined

}

C:\Users\shinoda>sqlcmd -S DBSERVER\MSSQL2019 -U sa -P hogepass -d InazumaDB

1> SELECT * FROM M_TOMODACHI;

2> GO

TOMO_ID TOMO_NAME             TOMO_MEMO                              

------- --------------------- ---------------------------------------

      1 アンモニア治郎        おごってくれるから友達

      2 クロム陽子            かわいいから友達

     14 ばいじん太郎          事業に失敗したからそろそろ切ろう

(3 行処理されました)

1>

gTimer1.Interval = 1000; // 1秒ごとに処理を行う

gTimer1.Elapsed += Timer_Elapsed; // Elapsedイベントハンドラーを設定

gWmp.settings.volume = 20; // ボリュームを 20に
gWmp.URL = filepath.Text; // MP3ファイルのパスを設定

gWmp.controls.play(); // 再生開始

gTimer1.Start(); // タイマーを開始

private void Timer_Elapsed(object sender, ElapsedEventArgs e)

{

if (gWmp.playState == WMPPlayState.wmppsStopped) { // WMP のステータスが「終了」？

gTimer1.Stop(); // タイマーを終了

＜再生終了時の処理＞

}

}