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

2016-09-292016-12-23

C# Excel操作①

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;

using System.Drawing.Printing;

using Excel = Microsoft.Office.Interop.Excel;
// using Microsoft.Office.Interop; この書き方でもいけるかと思ったけどダメだった。

namespace Dia
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();

            Button b = new Button();
            b.Text = "Click Me";
            b.Location = new Point(2, 2);
            b.Size = new Size(100,20);
            Controls.Add(b);

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

                PrintDocument pd = new PrintDocument();

                pd.PrintPage += new PrintPageEventHandler((object psender, PrintPageEventArgs pe)=> {

                    MessageBox.Show(pe.PageBounds.ToString());

                });

                pd.Print();

            });
           
        }

        private void button1_Click(object sender, EventArgs e)
        {

            test_script();

            return;

            //参照「Microsoft Exce xx.x Object Library」
            Microsoft.Office.Interop.Excel.Application xl = new Microsoft.Office.Interop.Excel.Application();
            xl.Visible = true;
            System.Threading.Thread.Sleep(1000);
            xl.Quit();
            System.Runtime.InteropServices.Marshal.ReleaseComObject(xl);

        }

        private void test_script()
        {
            // 必要な変数は try の外で宣言する
            Excel.Application xlApplication = null;

            // COM オブジェクトの解放を保証するために try ～ finally を使用する
            try
            {
                xlApplication = new Excel.Application();

                // 警告メッセージなどを表示しないようにする
                xlApplication.DisplayAlerts = false;

                Excel.Workbooks xlBooks = xlApplication.Workbooks;

                try
                {
                    Excel.Workbook xlBook = xlBooks.Add(string.Empty);

                    try
                    {
                        Excel.Sheets xlSheets = xlBook.Worksheets;

                        try
                        {
                            Excel.Worksheet xlSheet = (Excel.Worksheet)xlSheets[1];

                            try
                            {
                                Excel.Range xlCells = xlSheet.Cells;

                                try
                                {
                                    Excel.Range xlRange = (Excel.Range)xlCells[6, 4];

                                    try
                                    {
                                        // Microsoft Excel を表示する
                                        xlApplication.Visible = true;

                                        // 1000 ミリ秒 (1秒) 待機する
                                        System.Threading.Thread.Sleep(1000);

                                        // Row=6, Column=4 の位置に文字をセットする
                                        xlRange.Value2 = "あと 1 秒で終了します";

                                        // 1000 ミリ秒 (1秒) 待機する
                                        System.Threading.Thread.Sleep(1000);
                                    }
                                    finally
                                    {
                                        if (xlRange != null)
                                        {
                                            System.Runtime.InteropServices.Marshal.ReleaseComObject(xlRange);
                                        }
                                    }
                                }
                                finally
                                {
                                    if (xlCells != null)
                                    {
                                        System.Runtime.InteropServices.Marshal.ReleaseComObject(xlCells);
                                    }
                                }
                            }
                            finally
                            {
                                if (xlSheet != null)
                                {
                                    System.Runtime.InteropServices.Marshal.ReleaseComObject(xlSheet);
                                }
                            }
                        }
                        finally
                        {
                            if (xlSheets != null)
                            {
                                System.Runtime.InteropServices.Marshal.ReleaseComObject(xlSheets);
                            }
                        }
                    }
                    finally
                    {
                        if (xlBook != null)
                        {
                            try
                            {
                                xlBook.Close();
                            }
                            finally
                            {
                                System.Runtime.InteropServices.Marshal.ReleaseComObject(xlBook);
                            }
                        }
                    }
                }
                finally
                {
                    if (xlBooks != null)
                    {
                        System.Runtime.InteropServices.Marshal.ReleaseComObject(xlBooks);
                    }
                }
            }
            finally
            {
                if (xlApplication != null)
                {
                    try
                    {
                        xlApplication.Quit();
                    }
                    finally
                    {
                        System.Runtime.InteropServices.Marshal.ReleaseComObject(xlApplication);
                    }
                }
            }
        }
    }
}

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

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

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;

using System.Drawing.Printing;

using Excel = Microsoft.Office.Interop.Excel;

// using Microsoft.Office.Interop; この書き方でもいけるかと思ったけどダメだった。

namespace Dia

{

public partial class Form1 : Form

{

public Form1()

{

InitializeComponent();

Button b = new Button();

b.Text = "Click Me";

b.Location = new Point(2, 2);

b.Size = new Size(100,20);

Controls.Add(b);

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

PrintDocument pd = new PrintDocument();

pd.PrintPage += new PrintPageEventHandler((object psender, PrintPageEventArgs pe)=> {

MessageBox.Show(pe.PageBounds.ToString());

});

pd.Print();

});

}

private void button1_Click(object sender, EventArgs e)

{

test_script();

return;

//参照「Microsoft Exce xx.x Object Library」

Microsoft.Office.Interop.Excel.Application xl = new Microsoft.Office.Interop.Excel.Application();

xl.Visible = true;

System.Threading.Thread.Sleep(1000);

xl.Quit();

System.Runtime.InteropServices.Marshal.ReleaseComObject(xl);

}

private void test_script()

{

// 必要な変数は try の外で宣言する

Excel.Application xlApplication = null;

// COM オブジェクトの解放を保証するために try ～ finally を使用する

try

{

xlApplication = new Excel.Application();

// 警告メッセージなどを表示しないようにする

xlApplication.DisplayAlerts = false;

Excel.Workbooks xlBooks = xlApplication.Workbooks;

try

{

Excel.Workbook xlBook = xlBooks.Add(string.Empty);

try

{

Excel.Sheets xlSheets = xlBook.Worksheets;

try

{

Excel.Worksheet xlSheet = (Excel.Worksheet)xlSheets[1];

try

{

Excel.Range xlCells = xlSheet.Cells;

try

{

Excel.Range xlRange = (Excel.Range)xlCells[6, 4];

try

{

// Microsoft Excel を表示する

xlApplication.Visible = true;

// 1000 ミリ秒 (1秒) 待機する

System.Threading.Thread.Sleep(1000);

// Row=6, Column=4 の位置に文字をセットする

xlRange.Value2 = "あと 1 秒で終了します";

// 1000 ミリ秒 (1秒) 待機する

System.Threading.Thread.Sleep(1000);

}

finally

{

if (xlRange != null)

{

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlRange);

}

finally

{

if (xlCells != null)

{

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlCells);

}

finally

{

if (xlSheet != null)

{

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlSheet);

}

finally

{

if (xlSheets != null)

{

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlSheets);

}

finally

{

if (xlBook != null)

{

try

{

xlBook.Close();

}

finally

{

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlBook);

}

finally

{

if (xlBooks != null)

{

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlBooks);

}

finally

{

if (xlApplication != null)

{

try

{

xlApplication.Quit();

}

finally

{

System.Runtime.InteropServices.Marshal.ReleaseComObject(xlApplication);

}

2016-09-29

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;

using System.IO;
using System.Text.RegularExpressions;

namespace log_chk
{
    public partial class Form1 : Form
    {
        NotifyIcon n;

        public Form1()
        {

            InitializeComponent();

            WindowState = FormWindowState.Minimized;
            ShowInTaskbar = false;

            string path_icon = @"C:\Users\s.okamura\AppData\Local\Microsoft\Windows\Temporary Internet Files\Content.IE5\KJIGEKB9\favicon[3].ico";
            path_icon = @"C:\Windows\System32\PerfCenterCpl.ico";
            
            n = new NotifyIcon(this.components);
            n.Icon = new Icon(path_icon);
            n.Visible = true;
            n.Click += new EventHandler((object sender, EventArgs e) => {
                if(WindowState == FormWindowState.Minimized)
                {
                    WindowState = FormWindowState.Normal;
                    ShowInTaskbar = true;
                }
                else
                {
                    WindowState = FormWindowState.Minimized;
                    ShowInTaskbar = false;
                }
            });

            load_files();

        }

        private void load_files()
        {
            textBox1.Text = "";
            textBox2.Text = "";
            textBox3.Text = "";
            textBox4.Text = "";

            for (int i = 1; i <= 3; i++)
            {
                StreamReader sr = new StreamReader(Application.StartupPath + @"\dat" + i.ToString() +".txt", Encoding.GetEncoding("shift_jis"));

                try
                {
                    string buff = "";

                    while (sr.Peek() > -1)
                    {
                        buff += sr.ReadLine() + Environment.NewLine;
                    }

                    if (i == 1) textBox1.Text = buff;
                    if (i == 2) textBox2.Text = buff;
                    if (i == 3) textBox3.Text = buff;
                }
                finally
                {
                    sr.Close();
                }
            }


            set_timer();
        }

        Timer t;

        private void set_timer()
        {

            if (t != null)
            {
                t.Dispose();
                t = null;
            }
            else
            {
                textBox4.Text = "";
                label5.Text = DateTime.Now.ToString("yy/MM/dd hh:mm:ss");
                init();
            }

            t = new Timer();

            //t.Enabled = true;
            t.Interval = int.Parse(textBox3.Text) * 1000;
            t.Tick += new EventHandler((object sender, EventArgs e) => {
                textBox4.Text = "";
                label5.Text = DateTime.Now.ToString("yy/MM/dd hh:mm:ss");
                init();
            });

            t.Start();

        }

        bool flg = false;

        private void init()
        {

            StringReader sr_files = new StringReader(textBox2.Text);
            StringReader sr_words = new StringReader(textBox1.Text);
            List<string> list_files = new List<string>();
            List<string> list_words = new List<string>();

            try
            {
                // Peek()は読み取り対象の次の文字を返す。存在しないと -1 を返す。

                while (sr_files.Peek() > -1)
                {
                    list_files.Add(sr_files.ReadLine());
                }

                while (sr_words.Peek() > -1)
                {
                    list_words.Add(sr_words.ReadLine());
                }

                foreach(string f in list_files)
                {
                    foreach(string w in list_words)
                    {
                        chk(f, w);
                    }
                }

            }
            finally
            {
                sr_words.Close();
                sr_files.Close();
            }

            if (flg)
            {
                n.BalloonTipText = "LOG CHECK";
                n.ShowBalloonTip(10000);
                flg = false;
            }

        }

        private string enc(string str)
        {
            Encoding src = Encoding.ASCII;
            Encoding dst = Encoding.GetEncoding("shift_jis");

            byte[] tmp = src.GetBytes(str);
            byte[] sjis_tmp = Encoding.Convert(src,dst,tmp);

            string sjis_str = dst.GetString(sjis_tmp);
            return sjis_str;
        }

        private void chk(string f, string w)
        {

            StreamReader sr = null;
            
            //f = enc(f);

            try
            {
                sr = new StreamReader(f, Encoding.GetEncoding("shift_jis"));

                int r = 1;

                while (sr.Peek() > -1)
                {
                    string ln = sr.ReadLine();
                    Match m = Regex.Match(ln, w);

                    if (m.Success)
                    {
                        textBox4.Text += r.ToString() + " " + ln + " (" + f + ")" + Environment.NewLine;
                        flg = true;
                    }

                    r++;
                }
            }
            catch(UnauthorizedAccessException e)
            {
                MessageBox.Show(e.Message);
                return;
            }
            finally
            {
                if(sr != null) sr.Close();
            }

            //sr.ReadToEndで読んで、Matchesを使うと一発。
            //MatchCollection matched = Regex.Matches(buff, w);

            /*
            foreach (Match m in matched)
            {
                textBox4.Text += m.Value;
            }
            */

        }

        private void button1_Click(object sender, EventArgs e)
        {
            for (int i = 1; i <= 3; i++)
            {
                StreamWriter sw = new StreamWriter(Application.StartupPath + @"\dat" + i.ToString() + ".txt", false, System.Text.Encoding.GetEncoding("shift_jis"));

                try
                {
                    if (i == 1) sw.Write(textBox1.Text);
                    if (i == 2) sw.Write(textBox2.Text);
                    if (i == 3) sw.Write(textBox3.Text);
                }
                finally
                {
                    sw.Close();
                }
            }
            MessageBox.Show("登録しました。");
            set_timer();
        }

        private void button2_Click_1(object sender, EventArgs e)
        {
            if (t != null) t.Start();
        }

        private void button3_Click(object sender, EventArgs e)
        {
            if (t != null) t.Stop();
        }
    }
}

//非ジェネリック版コレクションは使わない。
//ArrayList は List<T> が正しい。
//ジェネリック = 型をパラメータで渡す。
//ArrayListはObjectにアップキャスト
//List<T>は型を指定してインスタンスを作る。

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

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

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;

using System.IO;

using System.Text.RegularExpressions;

namespace log_chk

{

public partial class Form1 : Form

{

NotifyIcon n;

public Form1()

{

InitializeComponent();

WindowState = FormWindowState.Minimized;

ShowInTaskbar = false;

string path_icon = @"C:\Users\s.okamura\AppData\Local\Microsoft\Windows\Temporary Internet Files\Content.IE5\KJIGEKB9\favicon[3].ico";

path_icon = @"C:\Windows\System32\PerfCenterCpl.ico";

n = new NotifyIcon(this.components);

n.Icon = new Icon(path_icon);

n.Visible = true;

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

if(WindowState == FormWindowState.Minimized)

{

WindowState = FormWindowState.Normal;

ShowInTaskbar = true;

}

else

{

WindowState = FormWindowState.Minimized;

ShowInTaskbar = false;

}

});

load_files();

}

private void load_files()

{

textBox1.Text = "";

textBox2.Text = "";

textBox3.Text = "";

textBox4.Text = "";

for (int i = 1; i <= 3; i++)

{

StreamReader sr = new StreamReader(Application.StartupPath + @"\dat" + i.ToString() +".txt", Encoding.GetEncoding("shift_jis"));

try

{

string buff = "";

while (sr.Peek() > -1)

{

buff += sr.ReadLine() + Environment.NewLine;

}

if (i == 1) textBox1.Text = buff;

if (i == 2) textBox2.Text = buff;

if (i == 3) textBox3.Text = buff;

}

finally

{

sr.Close();

}

set_timer();

}

Timer t;

private void set_timer()

{

if (t != null)

{

t.Dispose();

t = null;

}

else

{

textBox4.Text = "";

label5.Text = DateTime.Now.ToString("yy/MM/dd hh:mm:ss");

init();

}

t = new Timer();

//t.Enabled = true;

t.Interval = int.Parse(textBox3.Text) * 1000;

t.Tick += new EventHandler((object sender, EventArgs e) => {

textBox4.Text = "";

label5.Text = DateTime.Now.ToString("yy/MM/dd hh:mm:ss");

init();

});

t.Start();

}

bool flg = false;

private void init()

{

StringReader sr_files = new StringReader(textBox2.Text);

StringReader sr_words = new StringReader(textBox1.Text);

List<string> list_files = new List<string>();

List<string> list_words = new List<string>();

try

{

// Peek()は読み取り対象の次の文字を返す。存在しないと -1 を返す。

while (sr_files.Peek() > -1)

{

list_files.Add(sr_files.ReadLine());

}

while (sr_words.Peek() > -1)

{

list_words.Add(sr_words.ReadLine());

}

foreach(string f in list_files)

{

foreach(string w in list_words)

{

chk(f, w);

}

finally

{

sr_words.Close();

sr_files.Close();

}

if (flg)

{

n.BalloonTipText = "LOG CHECK";

n.ShowBalloonTip(10000);

flg = false;

}

private string enc(string str)

{

Encoding src = Encoding.ASCII;

Encoding dst = Encoding.GetEncoding("shift_jis");

byte[] tmp = src.GetBytes(str);

byte[] sjis_tmp = Encoding.Convert(src,dst,tmp);

string sjis_str = dst.GetString(sjis_tmp);

return sjis_str;

}

private void chk(string f, string w)

{

StreamReader sr = null;

//f = enc(f);

try

{

sr = new StreamReader(f, Encoding.GetEncoding("shift_jis"));

int r = 1;

while (sr.Peek() > -1)

{

string ln = sr.ReadLine();

Match m = Regex.Match(ln, w);

if (m.Success)

{

textBox4.Text += r.ToString() + " " + ln + " (" + f + ")" + Environment.NewLine;

flg = true;

}

r++;

}

catch(UnauthorizedAccessException e)

{

MessageBox.Show(e.Message);

return;

}

finally

{

if(sr != null) sr.Close();

}

//sr.ReadToEndで読んで、Matchesを使うと一発。

//MatchCollection matched = Regex.Matches(buff, w);

foreach (Match m in matched)

{

textBox4.Text += m.Value;

}

private void button1_Click(object sender, EventArgs e)

{

for (int i = 1; i <= 3; i++)

{

StreamWriter sw = new StreamWriter(Application.StartupPath + @"\dat" + i.ToString() + ".txt", false, System.Text.Encoding.GetEncoding("shift_jis"));

try

{

if (i == 1) sw.Write(textBox1.Text);

if (i == 2) sw.Write(textBox2.Text);

if (i == 3) sw.Write(textBox3.Text);

}

finally

{

sw.Close();

}

MessageBox.Show("登録しました。");

set_timer();

}

private void button2_Click_1(object sender, EventArgs e)

{

if (t != null) t.Start();

}

private void button3_Click(object sender, EventArgs e)

{

if (t != null) t.Stop();

}

//非ジェネリック版コレクションは使わない。

//ArrayList は List<T> が正しい。

//ジェネリック = 型をパラメータで渡す。

//ArrayListはObjectにアップキャスト

//List<T>は型を指定してインスタンスを作る。

2016-09-292016-09-29

VBA 複数のシートを結合

複数のシートを結合後に、特定の列が空白、0、数値以外の行を削除する。

Sub Cp()
For Each w In Sheets
    If w.Name = "集計" Then Sheets("集計").Delete
Next w
Sheets.Add Before:=Sheets(1)
ActiveSheet.Name = "集計"
For Each w In Worksheets
    If w.Name <> "集計" Then
        If Sheets("集計").UsedRange.Rows.Count = 1 Then
            r = 1
        Else
            r = Sheets("集計").UsedRange.Rows.Count + 1
        End If
        w.UsedRange.Copy
        Sheets("集計").Cells(r, 1).PasteSpecial Paste:=xlPasteValues
        Sheets("集計").Cells(r, 1).PasteSpecial Paste:=xlPasteFormats
        Application.CutCopyMode = False
        w.UsedRange.ClearContents
    End If
Next w
c = 19 '判断列
k = 2
For i = 1 To Sheets("集計").UsedRange.Rows.Count
    Application.StatusBar = "削除中 ... " & i
    If Sheets("集計").Cells(k, c).Value = "" Or Sheets("集計").Cells(k, c).Value = 0 Or IsNumeric(Sheets("集計").Cells(k, c).Value) = False Then
        Sheets("集計").Rows(k).Delete
    Else
        k = k + 1
    End If
Next i
For Each w In Sheets
    If w.Name <> "集計" Then w.Delete
Next w
Application.StatusBar = False
MsgBox "done"
End Sub

Sub Cp()

For Each w In Sheets

If w.Name = "集計" Then Sheets("集計").Delete

Next w

Sheets.Add Before:=Sheets(1)

ActiveSheet.Name = "集計"

For Each w In Worksheets

If w.Name <> "集計" Then

If Sheets("集計").UsedRange.Rows.Count = 1 Then

r = 1

Else

r = Sheets("集計").UsedRange.Rows.Count + 1

End If

w.UsedRange.Copy

Sheets("集計").Cells(r, 1).PasteSpecial Paste:=xlPasteValues

Sheets("集計").Cells(r, 1).PasteSpecial Paste:=xlPasteFormats

Application.CutCopyMode = False

w.UsedRange.ClearContents

End If

Next w

c = 19 '判断列

k = 2

For i = 1 To Sheets("集計").UsedRange.Rows.Count

Application.StatusBar = "削除中 ... " & i

If Sheets("集計").Cells(k, c).Value = "" Or Sheets("集計").Cells(k, c).Value = 0 Or IsNumeric(Sheets("集計").Cells(k, c).Value) = False Then

Sheets("集計").Rows(k).Delete

Else

k = k + 1

End If

Next i

For Each w In Sheets

If w.Name <> "集計" Then w.Delete

Next w

Application.StatusBar = False

MsgBox "done"

End Sub

2016-09-292016-12-23

Google Apps Script 定期的にメール送信

特定のフォルダに写真が存在するとその写真を共有設定にしてそのURLを記述したメールを、スプレッドシートに記述されたメールアドレスに送信する。写真が存在するかどうかのチェックは定期的に実行される。

スクリプトファイルを作成して以下を記述、スプレッドシートを作成して送信したいメールアドレスを複数記述する。トリガーで定期的に実行したい時間間隔を設定。

function listFilesInFolder3() {
  
  //Draft
  var folder = DriveApp.getFolderById("xxx");
  var contents = folder.getFiles();
  var tmp = "";
  
  while(contents.hasNext()) {
    
    var file = contents.next();
    var name = file.getName();
    var id = file.getId();
    var url = file.getUrl();
    
    if(name.substr(name.length-3,3).toLowerCase() == "jpg"){
      
      file.setSharing(DriveApp.Access.ANYONE_WITH_LINK,  DriveApp.Permission.VIEW)
      tmp += url + "\n\n";
      moveFileToFolder3(id)
      
    }
  }
  sendMail(tmp) 
}

function sendMail(body){

  var ss = SpreadsheetApp.openById("xxx");
  var sheet = ss.getSheetByName("シート1");
  
  var r = 1;
  
  while(sheet.getRange(r, 1).getValue() != ""){
    
    try{
      
      if(body != ""){
        
         MailApp.sendEmail(sheet.getRange(r, 1).getValue(), "sub", body);
        
        }
      
    }catch(e){
      
      MailApp.sendEmail("mail@xxx.com", "自動送信エラー", e);
      
    }
    
    r++;
    
  }

}

function moveFileToFolder3(fileId) {
  
  //Sent
  var targetFolder = DriveApp.getFolderById("xxx");
  var file = DriveApp.getFileById(fileId);
  var currentFolders = file.getParents();
  
  //複数の親を持てるのgetParentsでイテレータを回す。
  while (currentFolders.hasNext()) {
    
    var currentFolder = currentFolders.next();
    currentFolder.removeFile(file);
    //親のフォルダのタグが付いているイメージなので全て外してしまう。
    
  }
  
  targetFolder.addFile(file);
  
}

function listFilesInFolder3() {

//Draft

var folder = DriveApp.getFolderById("xxx");

var contents = folder.getFiles();

var tmp = "";

while(contents.hasNext()) {

var file = contents.next();

var name = file.getName();

var id = file.getId();

var url = file.getUrl();

if(name.substr(name.length-3,3).toLowerCase() == "jpg"){

file.setSharing(DriveApp.Access.ANYONE_WITH_LINK, DriveApp.Permission.VIEW)

tmp += url + "\n\n";

moveFileToFolder3(id)

}

sendMail(tmp)

}

function sendMail(body){

var ss = SpreadsheetApp.openById("xxx");

var sheet = ss.getSheetByName("シート1");

var r = 1;

while(sheet.getRange(r, 1).getValue() != ""){

try{

if(body != ""){

MailApp.sendEmail(sheet.getRange(r, 1).getValue(), "sub", body);

}

}catch(e){

MailApp.sendEmail("mail@xxx.com", "自動送信エラー", e);

}

r++;

}

function moveFileToFolder3(fileId) {

//Sent

var targetFolder = DriveApp.getFolderById("xxx");

var file = DriveApp.getFileById(fileId);

var currentFolders = file.getParents();

//複数の親を持てるのgetParentsでイテレータを回す。

while (currentFolders.hasNext()) {

var currentFolder = currentFolders.next();

currentFolder.removeFile(file);

//親のフォルダのタグが付いているイメージなので全て外してしまう。

}

targetFolder.addFile(file);

}

2016-09-292020-05-06

Windows7のクリーンインストール後

2016年7月時点でのメモ。Win7をクリーンインストール(リカバリー)したら自動更新が終わらなくなった。

自動更新を中止する。

KB3020369 を適用する。

https://www.microsoft.com/ja-JP/download/details.aspx?id=46827

https://www.microsoft.com/ja-JP/download/details.aspx?id=46817

適用後、下記を保存

http://catalog.update.microsoft.com/v7/site/Search.aspx?q=KB3125574

ダウンロードするのはWindows 7 for x64-Based Systems 用更新プログラム (KB3125574) 64Bit版
のプログラムで400MB程度ある。

最後にこれを当てる。KB3153199

https://www.microsoft.com/ja-jp/download/details.aspx?id=52214

https://www.microsoft.com/ja-jp/download/details.aspx?id=52232

なんかここまでやっても更新が進まない。なので以下を追加。KB3161608

どうやら、以下はWindows Update Clientの更新らしく、Win10関連のデータ等も入ってくるっぽい。

https://www.microsoft.com/ja-jp/download/details.aspx?id=52976

https://www.microsoft.com/ja-jp/download/details.aspx?id=52974

ここまでやると更新が進んで処理できる。

2016-09-292020-05-08

Visual Studio MsTest

ソリューションで右クリック
> 追加 > 新しいプロジェクト > 単体テストプロジェクト
を選択する。

新しくできたテストのプロジェクトで右クリック
> 追加 > 参照 > プロジェクト(ソリューション)
で元々のソリューション(プロジェクト)を追加する。

テストプロジェクトのusingに、
using WindowsFormsApplication1;
の様に追記する。

これでテスト対象となる元々のソリューション(プロジェクト)
のインスタンス等をテストで使える。

(表示されていない場合)メニューのテストからテストエクスプローラーを表示させる。

[TestMethod]と付けて必要なメソッドを追加していく。

using System;
using Microsoft.VisualStudio.TestTools.UnitTesting;

using WindowsFormsApp3;

namespace UnitTestProject1
{
    [TestClass]
    public class MyClassTest
    {
        [TestMethod]
        public void MySumの確認() // 日本語で書いてもわかりやすい
        {　
            var m = new MyClass();
            int result = m.MySum(1,2);
            Assert.AreEqual((1+2), result);
        }

        [TestMethod]
        public void Test1()
        {
            // 型チェック
            var m = new MyClass();
            Assert.IsInstanceOfType(m, typeof(MyClass));
        }

        [TestMethod]
        public void Test2()
        {
            // IsXXX
            bool b = true;
            Assert.IsFalse(b); // 失敗する
        }

        [TestMethod]
        public void Test3()
        {
            var m = new MyClass();
            int result = m.MySum(1, 2);

            if (result != 3) Assert.Fail(); // 失敗させることもできる
        }
    }
}

using System;

using Microsoft.VisualStudio.TestTools.UnitTesting;

using WindowsFormsApp3;

namespace UnitTestProject1

{

[TestClass]

public class MyClassTest

{

[TestMethod]

public void MySumの確認() // 日本語で書いてもわかりやすい

{　

var m = new MyClass();

int result = m.MySum(1,2);

Assert.AreEqual((1+2), result);

}

[TestMethod]

public void Test1()

{

// 型チェック

var m = new MyClass();

Assert.IsInstanceOfType(m, typeof(MyClass));

}

[TestMethod]

public void Test2()

{

// IsXXX

bool b = true;

Assert.IsFalse(b); // 失敗する

}

[TestMethod]

public void Test3()

{

var m = new MyClass();

int result = m.MySum(1, 2);

if (result != 3) Assert.Fail(); // 失敗させることもできる

}

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-292016-12-30

BitDefenderコマンドライン版

BitDefenderコマンドライン版を以前作った時のメモがあったのでコピーしておく、Win7では動かないよう。

以下かからexeを保存。
http://uiuicy.cs.land.to/download/bitdefender_free_v10.exe

msiの解凍は以下から
http://uiuicy.cs.land.to/msi2file.lzh

以下の8つファイルを取り出しておく。

avxdisk.dll
avxs.dll
avxt.dll
bdc.exe
bdcore.dll
bdss.exe
bdupd.dll
libfn.dll

http://uiuicy.cs.land.to/bd_nt.exe

から保存したファイル類を上記の8つのファイルと一緒のフォルダへ

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/’);