VBScriptについて必死に話し合うスレ [無断転載禁止]©2ch.net

**デフォルトの名無しさん** · 2017/06/28(水) 20:52:02.68

ピラフ逃亡中?

**デフォルトの名無しさん** · 2017/12/02(土) 08:14:52.66

ピラフのオチンチンは爪楊枝サイズですが柔らかいので歯の掃除に使えません。

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 09:34:03.97

おちんちん？なんですかそれ

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 09:34:42.24

　　おチンチンびろーん
　　 ∩＿＿＿∩
　　 | ノ　　　　　ヽ/⌒)
　 /⌒) (ﾟ)　　　(ﾟ)　|　.|
　/　/　　( _●_)　ミ/
.（　　ヽ　　|∪|　　／
　＼　　　ヽノ　/
　 /　　　　　　/
　|　　　_つ　 /
　|　 /UJ＼　＼
　|　/ 　　　 )　 )
　∪　　　（　＼
　　　　　　＼＿)

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 09:45:04.84

問題.次の式の結果として正しいのはどれでしょう
(1) 5 / 4 * 3
(2) 5 \ 4 * 3

1.(1)が3.75、(2)が3.75
2.(1)が3.75、(2)が3
3.(1)が3、(2)が3
4.(1)が3.75、(2)が0

**デフォルトの名無しさん** · 2017/12/02(土) 19:56:53.39

まじか？ピラフにおちんちんついてたのか！？
５ｃｈ始まって以来の衝撃ニュースやんけ！！！

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 22:01:41.47

>>100
マシュマロみたいだよ

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 22:03:58.87

マシュマロを食べるたびにピラフのちんちんを思い出す呪いをかけた
　　　　　　　　＿＿＿
　　　　　　　／::::::::::::::::＼
　　　　　／:::::─三三─＼
　　　　／:::::::::<○>三<○>.＼
/⌒)⌒)⌒.:::::::::: （__人__） :::::: ＼　　　/⌒)⌒)⌒)
|　/　/　/..　　　　｀ ⌒´　　　　|　(⌒)/　/ / /,,
|　:::::::::::(⌒)　　　　　　　　　／　ゝ　::::::.　.........._
|　　　　　ノ　　　　　　　　　＼　　/_ ／´　　　　ヽ
ヽ　　　　/　　　　　　　　　　　ヽ / /０　　　　　　.',
　|　　　　| 　　　　　　　　　　　　　　 {o　　　　　　　::}
　　　　　　　　　　　　　　　　　　　　　':　　　　　　　/
　　　　　　　　　　　　　　　　　　　　　　ヽ､_＿_,.,／

**デフォルトの名無しさん** · 2017/12/02(土) 22:05:59.29

やわらかチンコだね

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 22:12:29.99

>>103
ところでさ「君の名は」って映画観た？
ピラフいちゃもんつけてやろうと思って観たけど
大号泣だったわ、あんな悲しい話だったとは……

**デフォルトの名無しさん** · 2017/12/02(土) 22:18:40.42

あらすじ書いてくれれば俺も泣くかも。

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 22:20:11.33

>>105
観たがいいよ！YouTubeとかAmazonで400円で観れるから

**デフォルトの名無しさん** · 2017/12/02(土) 22:22:02.96

じゃあ見てみようかな。

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 22:23:30.55

観て！

**デフォルトの名無しさん** · 2017/12/02(土) 22:30:48.74

>>104
岸恵子いいよね

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 22:34:39.37

>>109
誰それ！！

**デフォルトの名無しさん** · 2017/12/02(土) 23:07:03.58

>>110
http://blogs.c.yimg.jp/res/blog-17-c8/hati3591/folder/1579660/96/54200596/img_0

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 23:17:18.24

>>111
だから誰なのそれ！！

**デフォルトの名無しさん** · 2017/12/02(土) 23:29:30.44

>>112
君の名はの女優さん

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 23:40:07.78

>>113
へぇ

**デフォルトの名無しさん** · 2017/12/02(土) 23:45:00.76

>>114
元祖、君の名はの岸恵子は85歳だけどね

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 23:51:36.46

>>115
へぇ、すごーい

**ピラフ** ◆9Jro6YFwm650 · 2017/12/02(土) 23:51:43.31

すごいわけあるか、ただのババアじゃねえか

**デフォルトの名無しさん** · 2017/12/07(木) 20:05:52.27

油飯はおるか

**ピラフ** ◆9Jro6YFwm650 · 2017/12/07(木) 20:09:08.85

おーす

**デフォルトの名無しさん** · 2017/12/07(木) 20:34:26.18

生きておったかw

**ピラフ** ◆9Jro6YFwm650 · 2017/12/07(木) 21:19:52.73

生きておったわ！

**デフォルトの名無しさん** · 2017/12/13(水) 02:25:54.83

vbsなんていう、完全終了してる言語になんでしがみついてんの？

**デフォルトの名無しさん** · 2017/12/13(水) 08:16:38.10

普通にJavaScriptかPowerShellだよね今なら

**ピラフ** ◆9Jro6YFwm650 · 2017/12/13(水) 21:39:01.71

なんか放っとけないんだよね
VBScriptにはピラフがいないといけないんじゃないかって
気がつくとVBScriptのことばかり考えてる

**ピラフ** ◆9Jro6YFwm650 · 2017/12/13(水) 21:42:49.30

>>123
Node.js使ったことある？あれマジヤバくない？なんていうかマジヤバくない？
超速いんですけど、メモリ効率もすごいし、zip解凍するだけで使えるハイパーポータビリティだし
あれはねヤバイね

**デフォルトの名無しさん** · 2017/12/13(水) 21:43:23.33

ピラフが居なくなったらMSもVBScriptから撤退するだろうな

**ピラフ** ◆9Jro6YFwm650 · 2017/12/13(水) 21:44:59.47

こんばんわ、対偶警察です

**デフォルトの名無しさん** · 2017/12/13(水) 21:59:40.24

仕事で初めて使うことになった
プログラミングとかの経験はほぼない
CSVファイルをデータベースにインサートをするスクリプト作ることになったんだけど、どんなコードを書くのか想像すら付かない
コードも暗号にしか見えないし出来るのか…

**デフォルトの名無しさん** · 2017/12/13(水) 22:50:36.44

ピラフを信じてがんばれ

**ピラフ** ◆9Jro6YFwm650 · 2017/12/14(木) 07:07:59.68

なんとかなるよ！絶対大丈夫だよ！！

**デフォルトの名無しさん** · 2017/12/14(木) 09:31:12.78

割とガチでJavaScript使った方が良いと思う

**デフォルトの名無しさん** · 2017/12/14(木) 10:33:19.80

>>128 だけど
とりあえず少し触ってデータベースへアクセスする部分は書けた(全部で5行くらいだけど)けどCSVをデータベースにインサートする部分が全く分からん
このケースってそんなにないのかな？
ネット見ても似たサンプルが見当たらない…
どういう考え方というか進め方をすればいい？

**デフォルトの名無しさん** · 2017/12/14(木) 10:43:51.05

>>132
やり方としてはCSVからSQL(insert文)作って実行するだけじゃない

**デフォルトの名無しさん** · 2017/12/14(木) 11:53:20.97

>>133
ありがとう
でも全然分からん
CSVファイルの中身を一度抽出する必要がある？
それともファイルごとDBぶん投げるの？

あと、インサート文を書くにしてもVALUE部分はどう書くの？

**デフォルトの名無しさん** · 2017/12/14(木) 12:17:12.25

>>134
csvファイルの中身を抽出してカラム毎に分解してinsert文を作る。
あとはピラフ大王に教えてもらえ

**デフォルトの名無しさん** · 2017/12/14(木) 12:20:44.21

>>135
ありがとう
やっぱ中身の分解は必要なんだね
もう少し調べてみる

ファイルの中身を列ごとに取得
SQL文作成
データベース接続
SQL投げる

って流れで良いかな？
質問ばっかりで申し訳ないんだけど、日付でファイルを指定したりも出来る？

**デフォルトの名無しさん** · 2017/12/14(木) 12:25:53.25

>>136
データベースエンジンによってはcsvをインポートするコマンドがあったりする。
SQLServerのbcpコマンドとか。

**デフォルトの名無しさん** · 2017/12/14(木) 12:27:10.00

>>136
何の日付さ?

ピラフ大王出てこいや!

**デフォルトの名無しさん** · 2017/12/14(木) 12:34:15.66

>>138
そうなんだね
ポスグレ使ってるから調べてみる
日付はCSVに付加させてて、今日の日付のファイルのCSVを読み込むって事をやりたい
行の取得が一般的なの？列の取得ってどうやるんだ？

**デフォルトの名無しさん** · 2017/12/14(木) 12:59:37.58

>>139
scripting.filesystemobjectをcreateobjextして
opentextfileで開いてreadlineするか
readallで全部読んでから、vbcrlfでSplitしてFor eachで処理する
読んだ一行は、カンマでSplitして文字列はダブルクォーテーションで囲んだりしながらvalue部分作成
あとはあらかじめ用意したSQLにくっつけて実行

**デフォルトの名無しさん** · 2017/12/14(木) 13:00:53.79

>>139
こんな感じのははよくやるね

**デフォルトの名無しさん** · 2017/12/14(木) 13:02:48.86

>>140
ありがとう
呪文にしか見えん…
ちょっと調べながら解読してみる…

**デフォルトの名無しさん** · 2017/12/14(木) 13:04:28.86

なんでvbscriptなのさ

**デフォルトの名無しさん** · 2017/12/14(木) 13:10:13.59

>>142
スペル間違ったcreateobjectね

**ピラフ** ◆9Jro6YFwm650 · 2017/12/14(木) 20:51:32.40

　　　　　　　　 _＿＿＿/￣￣
　　　　　　　　　／　│￣＼＿＿　　　　　ゴゴゴ・・・
　　　　　　　　　　　　/

　　　　　　　　..　　　、　　　　　　,＿
　　　　　　　￣＼＿／￣￣＼/￣　　　　　ゴゴゴゴゴゴ・・・
　　　　＿＿＿／￣へ√⌒l⌒´￣￣＼＿
　　　　´　　　　　　　 /　　　＼

　　　　　＿　　　.／￣￣￣＼　　　　／
　　　　_＿　｀ソ／　─　　─ 　＼/￣／
　　　　　　＼／ﾟ　（●）。（●）　＼/ rへ,ノ　　　・・・・・・
　＿＿＞-へ| i 　　（__人__）　　　|ノ　 :.＼＿
　　　　　　.:／从へ、.ﾟ｀ ⌒´o.ノ从rーﾍ＿
　　　＿::ノ　　　　:ﾉ｀⌒Y⌒´::　　＼
　　　　　　　　.::┘ 　 :│　　　ﾟ

**ピラフ** ◆9Jro6YFwm650 · 2017/12/14(木) 20:53:21.84

>>138
今日から君がピラフ大王やで、頑張りや

**デフォルトの名無しさん** · 2017/12/14(木) 21:27:29.66

おい何言ってんだ突然？！ピラフ引退するんか？？？

**デフォルトの名無しさん** · 2017/12/14(木) 21:41:37.95

>>146
ピラフ上皇になるんけ

**ピラフ** ◆9Jro6YFwm650 · 2017/12/14(木) 21:55:27.69

>>147
ピラフの名を汚さぬようよろしく頼む

**ピラフ** ◆9Jro6YFwm650 · 2017/12/14(木) 21:59:41.80

>>148
上皇ってかっこいいよね常考

**デフォルトの名無しさん** · 2017/12/14(木) 23:12:43.99

>>142 です
>>140 の人丁寧に教えてくれたけど全然分からなかった…すまん…

CSVの読み込みにCOPYが使えるってのを見つけて試そうと思ったんだけどファイルの先頭3行に必要ない行があるからskipを使ってコード書いたけど実行すると”skip”付近で記述がおかしいみたいなエラーが出る
これ何かおかしい？

Sql = "COPY datatest FROM 'C:\\FTP_Test\\LOG01\\00006401' skip 3; "

**デフォルトの名無しさん** · 2017/12/15(金) 00:45:26.00

ピラフの雰囲気だとなんでもエクセルとVBA使ってそうだけど

**ピラフ** ◆9Jro6YFwm650 · 2017/12/15(金) 06:57:53.93

>>152
ピラフ貧乏だからエクセル持ってないの！

**ピラフ** ◆9Jro6YFwm650 · 2017/12/15(金) 07:03:01.40

>>151
ポストグレスの重要機密文書見たけどskipは載ってなかったよ
skipオプションは使えないんじゃないかな
https://www.postgresql.jp/document/9.3/html/sql-copy.html

テキストエディタでサクッちゃいなよ
やっちゃえエディタ

**デフォルトの名無しさん** · 2017/12/15(金) 07:26:16.07

>>154
skipないのか…
>>140の人がレスくれた内容がこの辺かな？
http://bayashita.com/p/entry/show/85
これを

読んだ一行は、カンマでSplitして文字列はダブルクォーテーションで囲んだりしながらvalue部分作成
あとはあらかじめ用意したSQLにくっつけて実行

って全然イメージ付かない…
1行ずつよんだ結果は上のサイトで言う所のstrLineに入ってるって理解で良いのかな？
この変数の中身をどう分解すれば良いんだ？
聞いてばっかりでごめん

**ピラフ** ◆9Jro6YFwm650 · 2017/12/15(金) 07:35:06.35

>>155
strLineには1行ずつ読んだ結果が入ってるよ

Split関数を使ってカンマで切って配列に変換すればいいよ
Dim values
values = Split(strLine, ",")

**デフォルトの名無しさん** · 2017/12/15(金) 07:42:39.22

>>156
ありがとう
CSVの列の数とテーブルの列の数が同じなら下の書き方で上手くインサートできる？

INSERT INTO test
(aaa,bbb,ccc)
VALUES
(values)

**デフォルトの名無しさん** · 2017/12/15(金) 14:54:11.24

>>157
数も順番も同じなら、テーブル名も省略できるよ

**デフォルトの名無しさん** · 2017/12/17(日) 10:15:48.77

“今日の日付のファイル”を読み出すって場合はどういうコードになるの？
日付を付加するとかはあるけど探して読み出すっていうのが見つけられなかった

**デフォルトの名無しさん** · 2017/12/17(日) 10:45:58.69

>>159
どこに日付が有るの？
ファイル名なのか、作成日付なのか変更日付なのか
ただ日付と言われても誰も解らないよ

**デフォルトの名無しさん** · 2017/12/17(日) 11:18:09.27

>>159
こんなふうに
https://qiita.com/nobu-maple/items/20c675f9c8f4db55b4c0

**デフォルトの名無しさん** · 2017/12/17(日) 11:30:57.58

>>160
ごめん
読みだしたいファイルに日付が付加されてるんだけど(20171217みたいな感じ)、今日の日時が付いてるファイルのみ判別して読み出すっていうのがやりたい

**デフォルトの名無しさん** · 2017/12/17(日) 11:35:05.24

>>162
日付はファイルを作成した日時が付加されてる
今はパスに対象のファイルを指定してるから読み出したり出来てるんだけど、日付の指定で読み出し対象を変えたいなと思ったんだ

**デフォルトの名無しさん** · 2017/12/17(日) 11:50:43.85

>>162
パス名に一定の規則に基づいた日付がついていて、かつその日付を信頼して制御してOKなら、InStrとかReplaceを使ってパスを検索すれば良い
実際のファイル作成日や最終更新日を考慮しなければならないなら、FileSystemObjectとかを使ってFileのプロパティを調べて検索するべし

**デフォルトの名無しさん** · 2017/12/17(日) 12:52:09.35

>>162
ワイルドカードとかの指定は出来ないので
ファイル名を読み出して判定してからオープンする必要がある
sdate=replace(date,"/","")
set ofo = fso.GetFolder(folder)
とかでフォルダー取得して
For each ofi in ofo.files
でファイル一つずつ読み出し
if instr(ofi.name,sdate) <> 0 then
ファイル読み出し、DB書き込み処理
end if
こんな感じかな

**ピラフ** ◆9Jro6YFwm650 · 2017/12/17(日) 12:55:16.18

全部実装した、とにかく全部実装した
https://gist.github.com/anonymous/412bc090b67527a1820ed2c4d770e7ae

**ピラフ** ◆9Jro6YFwm650 · 2017/12/17(日) 12:57:09.71

恥ずかしかったから消した、とにかく消した

**ピラフ** ◆9Jro6YFwm650 · 2017/12/17(日) 12:59:19.04

　　　　　　　／￣￣＼
　　　　　　／　　　　　　＼
　　　　　　|:::::::　:　　　　　 |　　　　　,　　　　　　　　ノ.
　　　　　.　|:::::::::::::　　　　　|　　　　　 'ヽ　　　　　 (
　　　　　　 |::::::::::::: 　　　　|　　　　　　　)　　　　　 )
　　　　　.　 |:::::::::::::::　　　 }　　　　　　　｀　　　　ﾉ
　　　　　.　ヽ＿＿__　　 }　　　　　　　　（ ,ノ' ￣
　　　　　　　 r'ﾆﾆヽ._＼. ﾉ　　　　　　　　 ;;.
　　　　　 r':ﾆニ:_`ｰ三`:く._　　　　　　 [l、.
　　　　／: : : : : : :｀,ニ､: :_:_;＞　　　　／,ｨつ
　. 　 /: : : : : : : : / : : : ヽ＼　　　　 ,∠∠Z'_つ
　　　| : :.:.:.:.:.: . :/: : : : : : l : ヽ.　　 / .r─-'-っ
　. 　 |:.:.:.:.:.:.:.:.:.,' ''"￣: : :l: : : :l 　 /　）:::厂 ´
　　　 |:.:.:.:.::.:.:.:ｌ -─-: : /:_:_:_:_l　/￣｀Y´
　.　　 |:.:.::.:.::.::l._＿: : : :/::: : : : :l/⌒ヽ: :〉
　　　　|::.:::.::.::l: : : : : : /:::: : : : : |: : : : ﾞ/

**デフォルトの名無しさん** · 2017/12/17(日) 13:05:16.56

ピラフ禁煙しろ

**デフォルトの名無しさん** · 2017/12/17(日) 21:02:59.65

>>165
>>162です

見ながらやってみたんだけどわからなかった・・・
日付を判定する元にしてるのがsdateかなと思って中身見ようとCall MsgBox(sdate)ってやっても今日の日付が表示されないのはsdateには今日の日時が入ってないからなのかな？
あと、if instr(ofi.name,sdate) <> 0 then の文のinstrの意味って検索が一致した文字の位置を返すって役割って理解であってるかな？
if instr(ofi.name,sdate) <> 0 then この文の意味がよく分からなくて・・・
見ながら書いたコードなんだけどもう少しっぽいのに分からない・・・

Dim objFileSys
Dim objFolder
Dim objFile
Dim sdate
Dim a

Set objFileSys = CreateObject("Scripting.FileSystemObject")

sdate = Replace(Data,"/","")

Set objFolder = objFileSys.GetFolder("c:\Filedate")

For Each objFile In objFolder.Files

If instr(objFile.Name,sdate)

Next

**デフォルトの名無しさん** · 2017/12/17(日) 21:42:00.34

>>170
dataじゃなくてdateね

Dim objFileSys
Dim objFolder
Dim objFile
Dim sdate
Dim a

Set objFileSys = CreateObject("Scripting.FileSystemObject")

sdate = Replace(Date,"/","")

Set objFolder = objFileSys.GetFolder("c:\Filedate")

For Each objFile In objFolder.Files

If instr(objFile.Name,sdate) <> 0 then

end if

Next

**デフォルトの名無しさん** · 2017/12/17(日) 22:16:55.33

>>171
ありがとう
綴りを間違えてた…
本当に馬鹿な質問で申し訳ないんだけど
If instr(objFile.Name,sdate) <> 0 then
で今日と判別されたものはどこに入ってるの？
例えば今日の日付のファイルをデータベースに処理するとして、ここで判別された物がファイルのパスにしたり出来るのかなって思ってるんだけど理解間違ってるかな…

確認しようと中身をメッセージボックスに出してみようと思ったんだけど( )の中身はなんて指定すれば出せるかな

Set objFileSys = CreateObject("Scripting.FileSystemObject")

sdate = Replace(Date,"/","")

Set objFolder = objFileSys.GetFolder("c:\Filedate")

For Each objFile In objFolder.Files

If instr(objFile.Name,sdate) <> 0 then

Call MsgBox()

end if

Next

**ピラフ** ◆9Jro6YFwm650 · 2017/12/17(日) 23:06:53.62

>>172
objFile.Pathでおｋ

**デフォルトの名無しさん** · 2017/12/17(日) 23:47:07.21

>>173
ありがとう
途中でメッセージボックス出してファイルの名前だったり中身のデータも取得できた
みんな丁寧に教えてくれてほんとにありがとう

**デフォルトの名無しさん** · 2017/12/17(日) 23:58:53.02

$folder = "c:\Filedate"

# yyyymmdd
$today = Get-Date -Format "yyyyMMdd"
# 日付を含んだ
$filter = "*" + $today + "*"

$file = ls -File -Path $folder -Filter $filter
# 読み込み
Get-Content $file

PowerShell で書いた。
PowerShell, PowerShell_ise で実行して

**175** · 2017/12/18(月) 02:19:49.67

修正

Get-Content では、相対パスでは、作業フォルダの場所次第で、動かないことがあるから、
絶対パスにしておいた方が無難

># 読み込み
>Get-Content $file

# 読み込み
Get-Content $file.FullName

**デフォルトの名無しさん** · 2017/12/18(月) 11:44:24.36

>>174
うまく行ってよかった

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 21:33:44.64

文字列 "平成29年12月18日" をDate型に変換したいのですがどうやればいいですか
教えてくださいお願いします

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 21:35:03.05

"平成29年12月32日" のように不適切な日付の場合はアラートを出したいです
よろしく教えてくださいよろしくおねがいします

**デフォルトの名無しさん** · 2017/12/18(月) 22:05:22.67

>>140-141
CSVの読み込み時に一律で Split(Line, ",") するのは勧めない。CSVの仕様的に正しくない。
「"」でくくられて「,」を持つフィールドを正しく取得できない。
良い機会だから、トークン切り出しクラスを実装してみたら？スキル上がるよ。

>>165
これくらい単純な事には、Execオブジェクトに dir /a-d /b させて StdOut をもらった方が楽。
ワイルドカードが使えるし。

**デフォルトの名無しさん** · 2017/12/18(月) 22:12:16.41

>>179
「昭和80年」のような場合はどうすんのよ？

**デフォルトの名無しさん** · 2017/12/18(月) 22:25:06.72

>>180
そんなクラス作るくらいならADOでいいよ
execとかは楽かもしれないけど美しくないな

**デフォルトの名無しさん** · 2017/12/18(月) 22:33:24.16

>>182
CSVをmdbあたりに突っ込んでから再度取得する感じ？

**デフォルトの名無しさん** · 2017/12/18(月) 22:46:34.53

>>183
テキストクラスで直だよ
読み出しはDBと同等に出来る
書き込みできないけどね

**デフォルトの名無しさん** · 2017/12/18(月) 22:55:26.38

>>185
ちょっと何言ってんのか分かんない

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 22:55:29.37

>>181
NGになって欲しい
なぜならば平成しか来ない想定だから

**デフォルトの名無しさん** · 2017/12/18(月) 22:56:08.07

間違えた。
>>185 は >>184 ね。
ADO にそんなのあんの？

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 22:57:57.28

>>187
テキストドライバがあるよ
ODBCドライバかOLEドライバかACEなんとかで提供されてるはず

**片山博文MZ** ◆T6xkBnTXz7B0 · 2017/12/18(月) 22:58:18.77

VBSは正規表現が使えるから、文字列から数字をパターンマッチで取り出して、
後は、数の範囲を確認する。
西暦や和暦では月は1～12であることはわかるね。各月の日数は月によって異なる。
カレンダー見ればだいたいわかるね。ただし、うるう年では２月は29日になる。うるう年の判定方法は検索して。
年号はデータを用意するしかない。

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 22:58:27.21

>>184
追加はできるんじゃなかったかな
超絶遅いけど

**デフォルトの名無しさん** · 2017/12/18(月) 22:58:29.49

>>186
法律上は
明治45年7月30日と大正元年7月30日は同じ日
大正15年12月25日と昭和元年12月25日は同じ日
だからどちらも入力として受け付けるってことでいいのか？

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 22:59:21.85

>>189
日本語で言われても全然わからない
VBScriptランゲージでどうぞよろしくお願いいたします

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 23:00:15.01

>>191
平成だけで良いです
明治も大正も昭和も仕様に含めない方向で

**デフォルトの名無しさん** · 2017/12/18(月) 23:04:31.70

>>188
見つかった。こんなのあったのね…。
場合によっては使えるかな…。

**デフォルトの名無しさん** · 2017/12/18(月) 23:08:53.36

>>190
insertは出来なかったはず
insertの変わりに普通にWritelineで追記してた

**ピラフ** ◆9Jro6YFwm650 · 2017/12/18(月) 23:09:57.94

>>195
うそーうそーうそー
ちょっと明日起きたら試してみる