テックメモ – ページ 68 – 自分用のメモです。内容が間違っていたり、作りかけで動作しないコードなどあるのでご注意ください。

2016-09-292016-12-23

XMLHttpRequest.send ()でのパラメータについて

主にVBAでの利用。自作の関数で半角を全角に変更して渡す。

URLエンコードされているので+はスペースになった。 +は要エンコ
&はパラメータの区切りがずれてしまう。&は要エンコ
空白は問題なかった。一応エンコ
=も平気みたい。恐らく&以降最初の=でkeyとvalueを結んでいるっぽい。一応エンコ
色々なサイトにある記述してはいけない記号類も上記以外は問題なく入った。
%は単独なら問題ない。エクセルが%を計算式と認識している場合や、%といくつかの数字が連続すると登録されない場合がある。計算式はそのまま渡さない。

2016-09-292020-05-06

JSONメモ

正しいコンテンツタイプ
header(“Content-Type: application/json; charset=utf-8”);

ただ、ダウンロードされてしまうので、開発時以下。
header(“Content-Type: text/javascript; charset=utf-8”);

拡張子は *.json
データ型は6つある。
キーはダブルクォーテーション囲い、キーと値は:(コロン)で区切る。

文字列(2重引用符)
数値(10進数のみ)
true/false
null
オブジェクト {“key”: “value”}
配列 [1,2,3,”A”,”B”,”C”]

2016-09-292026-04-02

中小製造業の内製DXシリーズ ── 記事一覧

受注生産・多品種少量の中小製造業で、社内SEとして内製DXに取り組んできた経験をもとに書いた記事シリーズです。高額なパッケージ導入ではなく、自社の業務を理解した上で、身の丈に合った仕組みを内製で作るという考え方を軸にしています。

こんな課題を抱えていませんか

業者にシステムを入れてもらったが業務に合わず、結局Excelに戻っている
原価・納期・在庫の数字を出すのに毎回手作業が発生している
社内にITがわかる人がおらず、ツールの選定や業者との会話に困っている
VBAやExcelで回している業務があるが、作った人が辞めたら誰も触れない

内製DXの伴走サポート

数十人〜百人規模の中小製造業（受注生産・多品種少量）に特化した、月額定額の相談サポートです。業務の課題を整理し、身の丈に合った仕組みを一緒に考えます。

高額なパッケージの導入提案ではなく、今あるデータ・今ある環境から始められる形で進めます。原価・納期・在庫の見える化、Excel業務の整理、ツール選定、AIを活用した内製ツールの設計など、業務とITの両面から対応できます。

生産管理10年＋社内SE10年の現場経験があるため、「あるべき姿」の提案で終わりません。今ある業務データから何が見えるかを判断し、実際に動く仕組みを作るところまで一貫して対応します。

内製DXの方針

内製DXとは何か、どういう方針で進めるべきかについての記事です。

内製DXの進め方

どう判断して、どう動くかについての記事です。

業務の仕組み化

ワークフロー、データ収集、定着と弱点についての記事です。

原価管理・経営の見える化

原価計算、在庫管理、簡易PLなど、経営判断に必要な数字を見えるようにする方法です。

値決め・営業

中小製造業の価格決定と営業にまつわる構造的な問題と、内製DXが効く場面です。

生産計画・スケジューリング

受注生産における現実的な生産計画の立て方と、見積もりデータの活用です。

データの持ち方・設計

Excelやデータベースでデータをどう構造化し、つなげるかについての記事です。

品質管理

品質管理をデータ管理の視点から捉えた記事です。

品質管理の正体はデータ管理 ── 中小製造業のトレーサビリティと統計管理を阻むもの

Excel VBA・開発ツール

Excel VBAの使いどころや開発ツールの選び方についての記事です。

インフラ・セキュリティ

クラウド、OSS、セキュリティなど、IT環境の構築と防御の考え方です。

現場の運用・コミュニケーション

ファイル管理、連絡手段、入力デバイスなど、現場で日常的に使う仕組みです。

組織・人・現場との関わり

属人化、コミュニケーション、経営者との連携など、人に関わるテーマです。

AI活用

中小製造業がAIとどう付き合うべきかについての記事です。

考え方

社内SEとして10年働く中で辿り着いた、仕事の進め方や知識との付き合い方についての記事です。

情報発信・広報

中小製造業がどう情報を届けるか、HPや広報活動についての記事です。

著者について

中小製造業（受注生産・多品種少量）で生産管理を10年、社内SEを10年やってきました。現場で業務の流れを一通り覚えてから社内SEに転じたため、「今あるデータから何が見えるか」を業務の文脈で判断することを得意としています。

大手テック系企業の広報チームに参画し、メディアアプローチやプレスリリースを担当した経験があり、HPや社外向けの情報発信まで、ものづくりの文脈から一緒に考えられます。

連絡先：
連絡先メールアドレス

2016-09-292017-07-12

Electronの使い方

Electronを前に一度使った時のメモ。まったく忘れしまったが一応その時のメモを残しておく。

Nodeインストール

nodejs.orgからNode.jsをインストール

node -v

npm -v
必要ならバージョンアップ、
npm install -g npm　（gはグローバルでパスが通る）
npm update -g npm

~~npm -g install electron-prebuilt (初回のみ)~~
npm install electron
これを実行したフォルダにインストールされる。

appフォルダを作成し、appフォルダの中で、
npm init -y

package.jsonの中の、”main”: “index.js”がエントリーポイントとなるので、
appフォルダの中にindex.jsを作成する。
さらにappのフォルダの中にindex.htmlを作る。

ここまでできたら electron .　と記述で立ち上がる。
appフォルダで上記を実行する。

index.js

var app = require('app');
var BrowserWindow = require('browser-window'); 
require('crash-reporter').start();
var mainWindow = null;
app.on('window-all-closed', function() {
    app.quit();
});
app.on('ready', function() {
  mainWindow = new BrowserWindow({
  	width: 1000,
  	height: 850,
  	frame: false
  	});
  mainWindow.loadUrl('file://' + __dirname + '/index.html');
  mainWindow.on('closed', function() {
    mainWindow = null;
  });
});

var app = require('app');

var BrowserWindow = require('browser-window');

require('crash-reporter').start();

var mainWindow = null;

app.on('window-all-closed', function() {

app.quit();

});

app.on('ready', function() {

mainWindow = new BrowserWindow({

width: 1000,

height: 850,

frame: false

});

mainWindow.loadUrl('file://' + __dirname + '/index.html');

mainWindow.on('closed', function() {

mainWindow = null;

});

index.html

<!DOCTYPE html>
<html>
<head>
  <meta charset="shift-jis">
  <title>Hello Electron</title>
  <style>
      body {
      -webkit-app-region: drag;
      -webkit-user-select: none;
    }  
  </style>
</head>
<body>
</body>
</html>

<!DOCTYPE html>

<html>

<head>

<title>Hello Electron</title>

<style>

body {

-webkit-app-region: drag;

-webkit-user-select: none;

}

</style>

</head>

<body>

</body>

</html>

アーカイブ化

npm install -g asar (初回のみ)

asar pack . ./bin.asar (appフォルダで)

electron bin.asar で立ち上がる。

ここから配布用

npm i electron-packager -g　(初回のみ)

electron-packager . bin –platform=win32 –arch=ia32,x64 –version=0.36.1　

appフォルダで実行　何かインストールしている模様

(環境特有のファイルをインストールしている模様で初回だけ時間がかかるアーキテクチャとかバージョンを変えたらまた時間かかるかも)

そのた

メニュー追加

var Menu = require('menu');
var menu = Menu.buildFromTemplate([
{
label: 'Sample',
submenu: [
{label: 'About'},
{label: 'Quit'}
]
},
{
label: 'File',
submenu: [
{label: 'New File'},
{label: 'Paste'}
]
},
{
label: 'Edit',
submenu: [
{label: 'Copy', accelerator: 'Command+C', selector: 'copy'},
{label: 'Paste', accelerator: 'Command+V', selector: 'paste'}
]
}
]);
Menu.setApplicationMenu(menu);

var Menu = require('menu');

var menu = Menu.buildFromTemplate([

{

label: 'Sample',

submenu: [

{label: 'About'},

{label: 'Quit'}

]

{

label: 'File',

submenu: [

{label: 'New File'},

{label: 'Paste'}

]

{

label: 'Edit',

submenu: [

{label: 'Copy', accelerator: 'Command+C', selector: 'copy'},

{label: 'Paste', accelerator: 'Command+V', selector: 'paste'}

]

}

]);

Menu.setApplicationMenu(menu);

index.js内で以下のように指定
mainWindow.loadUrl(‘http://electron.atom.io/’);

2016-09-292020-09-03

WordPress テーマ作成メモ

・保存先
wp-content\themes
の中に作成する。

・最小の構成
index.php
style.css
の２つのみ。

style.cssには最低限
/* Theme Name : テストテーマ */
が必要。

Theme Name以外にも、
Theme URL
Description
Version
など記述できる。

・サムネイル

880x660pxで、
screenshot.png
という画像をThemesフォルダに入れる。

・フック

functions.phpに書くことが多い。

apply_filters()
add_filter()
do-action()
add_action()

・wp_head(), wp_footer()

</head>タグの上に、
<?php wp_head(); ?>

</body>タグの上に、
<?php wp_footer(); ?>

・jQueryについて

WordPress標準のjQueryを呼び出す場合、$は使わずjQueryと置き換える。

・index.phpの分割

get_header()
を使うと、
header.php
を呼び出す。

get_footer()
を使うと、
footer.php
を呼び出す。

get_sidebar()
を使うと、
sidebar.php
を呼び出す。

・テンプレートの種類

home.php
front-page.php
トップページ

archive.php
アーカイブページ

category.php
カテゴリページ

tag.php
タグページ

date.php
投稿日ページ

search.php
検索結果ページ

single.php
投稿ページ

page.php
固定ページ

404.php
404ページ

該当するテンプレートがない場合index.phpを使う。

・基本的なループ

<?php
query_posts('posts_per_page=10');
 
if(have_posts()):
	while(have_posts()):
		the_post();
		echo "<h1>";
		the_time('Y-m-d');
		echo "<a href='";
		the_permalink();
		echo "'>";
		the_title();
		echo "</a></h1>";
		echo "<br>";
		echo "<section>";
		the_content();
		echo "</section>";
	endwhile;
endif;
?>

<?php

query_posts('posts_per_page=10');

if(have_posts()):

while(have_posts()):

the_post();

echo "<h1>";

the_time('Y-m-d');

echo "<a href='";

the_permalink();

echo "'>";

the_title();

echo "</a></h1>";

echo "<br>";

echo "<section>";

the_content();

echo "</section>";

endwhile;

endif;

ページ判定の関数

is_home() //トップページ

is_category(),is_archive() //カテゴリ別アーカイブ

is_tag(),is_archive() //タグ別アーカイブ

is_date(),is_archive() //投稿日別アーカイブ 

is_month(),is_date(),is_archive()//月別アーカイブ

is_year(),is_date(),is_archive() //年別アーカイブ

is_search() //検索結果

is_single() //投稿

is_page() //固定

is_404() //404

is_home() //トップページ

is_category(),is_archive() //カテゴリ別アーカイブ

is_tag(),is_archive() //タグ別アーカイブ

is_date(),is_archive() //投稿日別アーカイブ

is_month(),is_date(),is_archive()//月別アーカイブ

is_year(),is_date(),is_archive() //年別アーカイブ

is_search() //検索結果

is_single() //投稿

is_page() //固定

is_404() //404

パーツテンプレート呼び出し方

get_header()

get_sidebar()

get_footer()

get_template_part(“xxx.php”)

get_header()

get_sidebar()

get_footer()

get_template_part(“xxx.php”)

テンプレタグ

bloginfo(“name”)　//サイトタイトル

bloginfo(“description”)　//キャッチフレーズ

home_url()　//トップページのURL

wp_title()　//現在のページタイトル

get_template_directory_uri()　//テンプレートファイルのディレクトリ

get_stylesheet_uri()　//テーマで使われているCSS

//以下はループの中で利用する。

the_title()　//投稿のタイトル

the_permalink()　//パーマリンク

has_post_thumbnail() //投稿にアイキャッチがあるか

the_post_thumbnail()　//アイキャッチのimgタグ

the_category()　//属するカテゴリ

the_time()　//投稿日時

the_content()　//本文

the_excerpt() //抜粋

bloginfo(“name”)　//サイトタイトル

bloginfo(“description”)　//キャッチフレーズ

home_url()　//トップページのURL

wp_title()　//現在のページタイトル

get_template_directory_uri()　//テンプレートファイルのディレクトリ

get_stylesheet_uri()　//テーマで使われているCSS

//以下はループの中で利用する。

the_title()　//投稿のタイトル

the_permalink()　//パーマリンク

has_post_thumbnail() //投稿にアイキャッチがあるか

the_post_thumbnail()　//アイキャッチのimgタグ

the_category()　//属するカテゴリ

the_time()　//投稿日時

the_content()　//本文

the_excerpt() //抜粋

2016-09-292021-08-30

Ubuntu(ローカル環境) 初期設定

VirtualBoxの場合

・ホストキー
ファイル＞環境設定＞システム

右Ctrlがないので、
ファイル＞環境設定＞入力＞仮想マシン＞ホストキーの組み合わせ
という部分をAltに変更しておく。

これでAltで抜けれる。

・ネットワーク
仮想マシン＞設定＞ネットワーク＞アダプター 1

ホストオンリーアダプタ
ホストOSにアタッチされている仮想NICを利用する。
ゲストから外部に出られない、ホストからゲストにはアクセスできる。

NAT
ゲストは外部に出られるが、ホストからゲストはポートフォーワーディングが必要。

ポートフォワーディングを設定する場合、
仮想マシン＞設定＞ネットワーク＞アダプター 1＞高度＞ポートフォワーディング

ルールを追加し、ホストポートとゲストポートに22というように必要な番号を入力するだけ。必要なら80や443も追加する。

ブリッジアダプタ
ゲストがホストと同じネットワークになる。

ブリッジアダプタを使う場合、ゲストOSはDHCP自動でも手動固定でもOK。固定にする場合、右上のネットワークのEdit Connectionsから直接指定する。

ログインをコンソールへ

サーバ用途などの場合

sudo vi /etc/default/grub

quiet splashをtextに書き換える
GRUB_CMDLINE_LINUX_DEFAULT=”text”

書き換えたら以下を実行
sudo update-grub

コンソールで立ち上がるので、GUIを起動したい場合
startx
でGUIが起動する。

Ctrl+Alt+F1
でコンソールに戻る。
（このときxは起動している）

CUIで
Alt + F7
を押すとGUIを開く
（xが起動していないと違う画面にいく、そこからCtrl+Alt+F1で戻ってこれる）

Vim

sudo apt-get update
sudo apt-get install vim

.vimrcをホームディレクトリにコピーする。

set t_Co=256

autocmd VimEnter,ColorScheme * highlight cursorline cterm=none ctermbg=darkblue | highlight pmenu ctermbg=darkgrey | highlight pmenusel ctermbg=grey

colorscheme pablo
syntax enable

set enc=utf8
set ignorecase
set incsearch
set hlsearch
set showmatch
set number
set visualbell
set cursorline

set autoindent
set shiftwidth=2
set tabstop=2
set softtabstop=0

set nowritebackup
set nobackup
set noswapfile

set completeopt=menuone

for k in split("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ",'\zs')
exec "imap " . k . " " . k . "<C-N><C-P>"
endfor

set t_Co=256

autocmd VimEnter,ColorScheme * highlight cursorline cterm=none ctermbg=darkblue | highlight pmenu ctermbg=darkgrey | highlight pmenusel ctermbg=grey

colorscheme pablo

syntax enable

set enc=utf8

set ignorecase

set incsearch

set hlsearch

set showmatch

set number

set visualbell

set cursorline

set autoindent

set shiftwidth=2

set tabstop=2

set softtabstop=0

set nowritebackup

set nobackup

set noswapfile

set completeopt=menuone

for k in split("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ",'\zs')

exec "imap " . k . " " . k . "<C-N><C-P>"

endfor

キーバインド

xmodmapをホームディレクトリにコピーする。
(VirtualBoxやGUIで直接アクセスしない場合不要)

ホームディレクトリの.profileにxmodmap .xmodmapと記述する。上手く読み込まれない場合はGUIで自動起動するアプリケーションに追加する。

Bash

.bashrcに以下を書き込む

if [ x${WINDOW} = x ]; then
  :
else
  export PS1='\u@\h[ ${WINDOW} ]:\w\$ '
fi

alias f='clear;pwd;stat --format "%a %U:%G %n" * '
alias l="clear;pwd;ls -lh --color=always | less -F -R -S -X"
alias d="dirs -v"
alias h="clear;history | sort -r | less -F -R -S -X"

function c(){
  pushd $1 > /dev/null
  l
}

export HISTSIZE=2000
export HISTCONTROL=ignoredups:erasedups
export PROMPT_COMMAND='history -a; history -c; history -r'
export HISTIGNORE='?:??:???:????'
shopt -u histappend

if [ x${WINDOW} = x ]; then

else

export PS1='\u@\h[ ${WINDOW} ]:\w\$ '

alias f='clear;pwd;stat --format "%a %U:%G %n" * '

alias l="clear;pwd;ls -lh --color=always | less -F -R -S -X"

alias d="dirs -v"

alias h="clear;history | sort -r | less -F -R -S -X"

function c(){

pushd $1 > /dev/null

}

export HISTSIZE=2000

export HISTCONTROL=ignoredups:erasedups

export PROMPT_COMMAND='history -a; history -c; history -r'

export HISTIGNORE='?:??:???:????'

shopt -u histappend

2016-09-282016-09-28

C# シェイプの追加と線の追加

ボタンをクリックしたら四角のシェイプを追加。
マウスをクリックしたら線を追加してみる。

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace dia
{
    public partial class Form1 : Form
    {
        Shape s;
        DllImpClass1 d;

        bool pos_chk = false; //最初のクリックでtrue
        int pos_x = 1;
        int pos_y = 1;

        protected void frm_click(object sender, EventArgs e)
        {
            if (!pos_chk)
            {

                //g.DrawLine(Pens.Black, Cursor.Position.X, Cursor.Position.Y, Cursor.Position.X, Cursor.Position.Y);
                //g.DrawLine(Pens.Black, Cursor.Position.X, Cursor.Position.Y, Cursor.Position.X,Cursor.Position.Y);

                pos_x = PointToClient(Cursor.Position).X;
                pos_y = PointToClient(Cursor.Position).Y;

                pos_chk = true;

                Graphics g = CreateGraphics();

                MouseMove += new MouseEventHandler((object MouseSender, MouseEventArgs MouseArgs) => {
                    if (pos_chk)
                    {

                        g.Clear(Color.White);
                        g.DrawLine(Pens.Black, pos_x, pos_y, PointToClient(Cursor.Position).X, PointToClient(Cursor.Position).Y);
                        
                    }
                });
                
            }
            else
            {
                pos_chk = false;
            }

        }

        /*
        protected override void OnPaint(PaintEventArgs e)
        {
            base.OnPaint(e);

            if (pos_chk)
            {
                Graphics g = CreateGraphics();
                g.DrawLine(Pens.Black, pos_x, pos_y, Cursor.Position.X, Cursor.Position.Y);
            }
        }
        */

        public Form1()
        {

            InitializeComponent();

            button1.Click += new EventHandler((object sender, EventArgs e) => {

                s = new Shape();
                s.Location = new Point(1, 1);
                s.Size = new System.Drawing.Size(200, 200);
                //s.Visible = true;
                Controls.Add(s);
                s.DoubleClick += new EventHandler(shape_click);

            });

            d = new DllImpClass1(); // DllImpClass1のコンストラクタでGetDCを呼んでいる。
            //d.Location = new Point(1, 1);
            //d.Size = new System.Drawing.Size(200, 200);
            //Controls.Add(d);

            Click += new EventHandler(frm_click);
            
        }

        /*
        protected override void OnPaint(PaintEventArgs e)
        {
            base.OnPaint(e);
            d._fill();

        }
        */

        private void shape_click(object sender, EventArgs e)
        {
            inp i = new inp();
            i.ShowDialog();

            //MessageBox.Show(i.val);
            s.Text = i.val;
            
            //i.Dispose();
            //このdisposeを入れるとクリックしたシェイプじゃないのに文字列が入ったりする。

            //ボタンを押すたびにインスタンスができている。
            //formの中のsはひとつしかないのに、複数あるシャイプはどうなっているのだろう。
            //とはいえ、s.text にいれた場合それぞれのインスタンスにはいるので、
            //同名の変数で管理しているといえしっかりそれぞれのインスタンスは管理されているのだろうけど。

            //なんかクリックしたシャイプ以外に値が入ることがある。
            //同名のインスタンスが複数ある場合の処理を調べないとダメだな。

            this.Refresh();

        }

        /*
        WndProcがメッセージを受け取る。WN_PAINTは0x000Fだった。
        これでWN_PAINTメッセージを受け取ったら_fillを実行しているはずだが。。。
        描画のたびに書き換わってないっぽい。
        */ 

        protected override void WndProc(ref Message m)
        {

            base.WndProc(ref m);

            if (m.Msg == 0x000F)//WN_PAINT
            {
                //d._fill();
            }
        }
        
        private void button1_Click(object sender, EventArgs e)
        {

        }
        
    }
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

using System.Windows.Forms;

namespace dia

{

public partial class Form1 : Form

{

Shape s;

DllImpClass1 d;

bool pos_chk = false; //最初のクリックでtrue

int pos_x = 1;

int pos_y = 1;

protected void frm_click(object sender, EventArgs e)

{

if (!pos_chk)

{

//g.DrawLine(Pens.Black, Cursor.Position.X, Cursor.Position.Y, Cursor.Position.X, Cursor.Position.Y);

//g.DrawLine(Pens.Black, Cursor.Position.X, Cursor.Position.Y, Cursor.Position.X,Cursor.Position.Y);

pos_x = PointToClient(Cursor.Position).X;

pos_y = PointToClient(Cursor.Position).Y;

pos_chk = true;

Graphics g = CreateGraphics();

MouseMove += new MouseEventHandler((object MouseSender, MouseEventArgs MouseArgs) => {

if (pos_chk)

{

g.Clear(Color.White);

g.DrawLine(Pens.Black, pos_x, pos_y, PointToClient(Cursor.Position).X, PointToClient(Cursor.Position).Y);

}

});

}

else

{

pos_chk = false;

}

protected override void OnPaint(PaintEventArgs e)

{

base.OnPaint(e);

if (pos_chk)

{

Graphics g = CreateGraphics();

g.DrawLine(Pens.Black, pos_x, pos_y, Cursor.Position.X, Cursor.Position.Y);

}

public Form1()

{

InitializeComponent();

button1.Click += new EventHandler((object sender, EventArgs e) => {

s = new Shape();

s.Location = new Point(1, 1);

s.Size = new System.Drawing.Size(200, 200);

//s.Visible = true;

Controls.Add(s);

s.DoubleClick += new EventHandler(shape_click);

});

d = new DllImpClass1(); // DllImpClass1のコンストラクタでGetDCを呼んでいる。

//d.Location = new Point(1, 1);

//d.Size = new System.Drawing.Size(200, 200);

//Controls.Add(d);

Click += new EventHandler(frm_click);

}

protected override void OnPaint(PaintEventArgs e)

{

base.OnPaint(e);

d._fill();

}

private void shape_click(object sender, EventArgs e)

{

inp i = new inp();

i.ShowDialog();

//MessageBox.Show(i.val);

s.Text = i.val;

//i.Dispose();

//このdisposeを入れるとクリックしたシェイプじゃないのに文字列が入ったりする。

//ボタンを押すたびにインスタンスができている。

//formの中のsはひとつしかないのに、複数あるシャイプはどうなっているのだろう。

//とはいえ、s.text にいれた場合それぞれのインスタンスにはいるので、

//同名の変数で管理しているといえしっかりそれぞれのインスタンスは管理されているのだろうけど。

//なんかクリックしたシャイプ以外に値が入ることがある。

//同名のインスタンスが複数ある場合の処理を調べないとダメだな。

this.Refresh();

}

WndProcがメッセージを受け取る。WN_PAINTは0x000Fだった。

これでWN_PAINTメッセージを受け取ったら_fillを実行しているはずだが。。。

描画のたびに書き換わってないっぽい。

protected override void WndProc(ref Message m)

{

base.WndProc(ref m);

if (m.Msg == 0x000F)//WN_PAINT

{

//d._fill();

}

private void button1_Click(object sender, EventArgs e)

{

}

2016-09-282016-12-23

Javascript punycode.jsを使う

日本語ドメインを使う場合、たまに必要になる。

<!DOCTYPE html>
<html lang="ja">
<head><meta charset="UTF-8"></head>
<script src="punycode.js"></script>
<script>

!function(){

//http://punycode.jp/ とは違う英数字がでる。アクセス解析で出ている値はこのURLと同じでJSのライブラリとは違う。
//JSのライブラリでxserverからの英数字をデコードしても文字化けする。

var e = Punycode.encode("テスト");
alert(e + "\n" + Punycode.decode(e));

}();

</script>

<!DOCTYPE html>

!function(){

//http://punycode.jp/ とは違う英数字がでる。アクセス解析で出ている値はこのURLと同じでJSのライブラリとは違う。

//JSのライブラリでxserverからの英数字をデコードしても文字化けする。

var e = Punycode.encode("テスト");

alert(e + "\n" + Punycode.decode(e));

}();

</script>

2016-09-282017-01-15

VBAでPOSTしてPHPでJANを発行してMySQLに登録する

以前、Web、バーコードを使って何か作ろうとしたことがあった。

<?php

/*
create database vba_post;
use vba_post
create table post_tb(id int not null primary key auto_increment, value varchar(255));
*/

Application::main();

class Application{
	
	static function con(){
		return new PDO("mysql:dbname=vba_post;host=localhost;charset=utf8","root","123");
	}
	
	static function h($s){
		return htmlspecialchars ($s,ENT_QUOTES);
	}
	
	static function jan($s){
		
		$buf = "20" . str_pad($s, 10, "0", STR_PAD_LEFT);
		$o = $buf[0] + $buf[2] + $buf[4] + $buf[6] + $buf[8] + $buf[10];
		$e = $buf[1] + $buf[3] + $buf[5] + $buf[7] + $buf[9] + $buf[11];
		$e *= 3;
		$digi = 10 - substr(($e + $o),-1);
		if($digi == 10){ $digi = 0; }
		
		return $buf . $digi;
	}
	
	static function main(){
		
		if(array_key_exists("update",$_POST) && $_POST["update"] === "save"){
			
			$d = self::con();
			$d->setAttribute(PDO::ATTR_ERRMODE, PDO::ERRMODE_EXCEPTION);
			
			try{
				
				$d->beginTransaction();

				$s = $d->query("show table status like 'post_tb'"); 
				$id = $s->fetch();

				$p = $d->prepare("insert into post_tb (value) values (:v)");
				$p->execute(array(
					":v" => self::h($_POST['value'])
				));

				$d->commit();
				echo self::jan($id['Auto_increment']);
				
			}catch(PDOException $e){
				
				$d->rollback();
				echo "false";
				
			}	
			
		}
		
	}
	
}

<?php

create database vba_post;

use vba_post

create table post_tb(id int not null primary key auto_increment, value varchar(255));

Application::main();

class Application{

static function con(){

return new PDO("mysql:dbname=vba_post;host=localhost;charset=utf8","root","123");

}

static function h($s){

return htmlspecialchars ($s,ENT_QUOTES);

}

static function jan($s){

$buf = "20" . str_pad($s, 10, "0", STR_PAD_LEFT);

$o = $buf[0] + $buf[2] + $buf[4] + $buf[6] + $buf[8] + $buf[10];

$e = $buf[1] + $buf[3] + $buf[5] + $buf[7] + $buf[9] + $buf[11];

$e *= 3;

$digi = 10 - substr(($e + $o),-1);

if($digi == 10){ $digi = 0; }

return $buf . $digi;

}

static function main(){

if(array_key_exists("update",$_POST) && $_POST["update"] === "save"){

$d = self::con();

$d->setAttribute(PDO::ATTR_ERRMODE, PDO::ERRMODE_EXCEPTION);

try{

$d->beginTransaction();

$s = $d->query("show table status like 'post_tb'");

$id = $s->fetch();

$p = $d->prepare("insert into post_tb (value) values (:v)");

$p->execute(array(

":v" => self::h($_POST['value'])

));

$d->commit();

echo self::jan($id['Auto_increment']);

}catch(PDOException $e){

$d->rollback();

echo "false";

}

VBAでPOSTする

Private Sub CommandButton1_Click()

Dim url As String
url = "http://192.168.1.4/request/index.php"

Dim xmlhttp As Object
Set xmlhttp = CreateObject("msxml2.xmlhttp")

Dim paramStr As String
Dim retCd As String

On Error GoTo e

For i = 2 To ActiveSheet.UsedRange.Rows.Count

    paramStr = "&update=save&value=" & Cells(i, 1).Value
    xmlhttp.Open "POST", url, False
    xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
    xmlhttp.send (paramStr)
    
    Cells(i, 2).Value = xmlhttp.Status
    Cells(i, 3).Value = xmlhttp.responseText

Next i

Set xmlhttp = Nothing
MsgBox "done!"

Exit Sub

e:

    Set xmlhttp = Nothing
    MsgBox i & "行目でエラーが発生しました。"

End Sub

Private Sub CommandButton1_Click()

Dim url As String

url = "http://192.168.1.4/request/index.php"

Dim xmlhttp As Object

Set xmlhttp = CreateObject("msxml2.xmlhttp")

Dim paramStr As String

Dim retCd As String

On Error GoTo e

For i = 2 To ActiveSheet.UsedRange.Rows.Count

paramStr = "&update=save&value=" & Cells(i, 1).Value

xmlhttp.Open "POST", url, False

xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

xmlhttp.send (paramStr)

Cells(i, 2).Value = xmlhttp.Status

Cells(i, 3).Value = xmlhttp.responseText

Next i

Set xmlhttp = Nothing

MsgBox "done!"

Exit Sub

Set xmlhttp = Nothing

MsgBox i & "行目でエラーが発生しました。"

End Sub

おまけ

Sub test()

Set xh = CreateObject("msxml2.xmlhttp")
Set sc = CreateObject("ScriptControl")
sc.Language = "JScript"
sc.AddCode "function jsonParse(s) { return eval('(' + s + ')'); }"

xh.Open "POST", "http://xxx.com/index.php", False
xh.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xh.send ("&save=do")

If xh.Status = 200 Then

    Set js = sc.CodeObject.jsonParse(xh.ResponseText)
    MsgBox js.Name
    
End If

End Sub

Sub test()

Set xh = CreateObject("msxml2.xmlhttp")

Set sc = CreateObject("ScriptControl")

sc.Language = "JScript"

sc.AddCode "function jsonParse(s) { return eval('(' + s + ')'); }"

xh.Open "POST", "http://xxx.com/index.php", False

xh.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

xh.send ("&save=do")

If xh.Status = 200 Then

Set js = sc.CodeObject.jsonParse(xh.ResponseText)

MsgBox js.Name

End If

End Sub

2016-09-282020-05-05

PHP SQLiteに接続

<?php

Class User{
	
    static public $salt = "mwefCMEP28DjwdW3lwdS239vVS";
	
}

class Db{

    public static $d;
    static public function con(){
        
        $passwd = md5("1234" . User::$salt);
        
        try{
			
            self::$d = new PDO('sqlite::memory:',null,null);
            self::$d->setAttribute(PDO::ATTR_ERRMODE,PDO::ERRMODE_EXCEPTION);
            
            self::$d->exec("create table if not exists tbl(id, user, password)");
            self::$d->exec("insert into tbl (id,user,password) values (1,'taro','$passwd')");
            
        }catch(PDOException $e){
			
            self::$d = null;
            exit($e->getMessage());
			
        }   
    }
}

class Main{
	
    function __construct(){
        
        Db::con();
        
        if(isset($_POST["user"]) && isset($_POST["password"])){

            $passwd = md5($_POST["password"] . User::$salt);
            
            $stmt = Db::$d->prepare("select * from tbl where password = ?"); // ここで where password = '?'　としていたらエラー。
            $stmt->execute(array($passwd));
			
            $res = $stmt->fetchAll(PDO::FETCH_BOTH);
            
            if(isset($res[0]["password"])){
                
                echo "ログイン中", $res[0]["user"], "さん";
                
            }else{
                
                sleep(2);
                echo "ログイン失敗";
                echo '<form method="POST" action="">';
                echo '  <input type="text" name="user">';
                echo '  <input type="password" name="password">';
                echo '  <input type="submit">';
                echo '</form>'; 
                
            }
            
        } else {
            
            echo '<form method="POST" action="">';
            echo '  <input type="text" name="user">';
            echo '  <input type="password" name="password">';
            echo '  <input type="submit">';
            echo '</form>';
            
        }
    }
}

new Main();

<?php

Class User{

static public $salt = "mwefCMEP28DjwdW3lwdS239vVS";

}

class Db{

public static $d;

static public function con(){

$passwd = md5("1234" . User::$salt);

try{

self::$d = new PDO('sqlite::memory:',null,null);

self::$d->setAttribute(PDO::ATTR_ERRMODE,PDO::ERRMODE_EXCEPTION);

self::$d->exec("create table if not exists tbl(id, user, password)");

self::$d->exec("insert into tbl (id,user,password) values (1,'taro','$passwd')");

}catch(PDOException $e){

self::$d = null;

exit($e->getMessage());

}

class Main{

function __construct(){

Db::con();

if(isset($_POST["user"]) && isset($_POST["password"])){

$passwd = md5($_POST["password"] . User::$salt);

$stmt = Db::$d->prepare("select * from tbl where password = ?"); // ここで where password = '?'　としていたらエラー。

$stmt->execute(array($passwd));

$res = $stmt->fetchAll(PDO::FETCH_BOTH);

if(isset($res[0]["password"])){

echo "ログイン中", $res[0]["user"], "さん";

}else{

sleep(2);

echo "ログイン失敗";

echo '<form method="POST" action="">';

echo ' <input type="text" name="user">';

echo ' <input type="password" name="password">';

echo ' <input type="submit">';

echo '</form>';

}

} else {

echo '<form method="POST" action="">';

echo ' <input type="text" name="user">';

echo ' <input type="password" name="password">';

echo ' <input type="submit">';

echo '</form>';

}

new Main();