VBScriptの「ステートメントの末尾が不正です エラーコード800A0401」を解決したい

Question

前提・実現したいこと

パソコン初心者の友達にいたずらしようとしてVBScriptを使おうとしているVBS初心者です。
以下のVBScriptを実行しようとしているのですが、エラーが起きて実行出来ません。
解決方法をお願いします。

該当のソースコード

VBScript

msgbox"ファイルを一つ削除してもよろしいですか？",vbInformation,"File Deleter" msgbox"ファイルを削除しています...",vbExclamation,"File Deleter"
msgbox"ファイルの削除が完了しました！",vbCritical,"File Deleter"
msgbox"嘘でーすwww",vbCritical,"Windows(FAKE)"

Comments

[y_waiwai]

エラー・メッセージを提示しましょう

Answer 1

エラー内容

コードをまるっとコピーして実行した所、私の環境では

スクリプト：[vbsファイルのパス]
行：1
文字：59
エラー：ステートメントの末尾が不正です。
コード：800A0401
ソース：Microsoft VBScript コンパイルエラー

と出ました。

原因

1行目の59文字目を見てみると、おそらく2行目に書きたかったのでは無いかと思われるコードが後ろにくっついていました。

動作を確認したコード

msgbox"ファイルを一つ削除してもよろしいですか？",vbInformation,"File Deleter"
msgbox"ファイルを削除しています...",vbExclamation,"File Deleter"
msgbox"ファイルの削除が完了しました！",vbCritical,"File Deleter"
msgbox"嘘でーすwww",vbCritical,"Windows(FAKE)"

蛇足

sleep関数とか使うとさらにそれっぽくなるかもしれません。
ですがブラクラのリンクを貼っただけで補導されるご時世ですので十分ご注意くださいね。

Comments

[KSK-0125]

ありがとうございます。
くっついていたところを改行して再度実行したところ無事実行することが出来ました。
ちなみに、友達は何が何だかわからなくてパニックになっていました（笑）

[natadekoko]

他にも文字コードがShift JISじゃない別の文字コードでもなるので
windows標準のメモ帳は、ANSIです。