/ Published in: JavaScript
URL: http://www.kanaya440.com/contents/script/vbs/function/others/msgbox.html
Expand |
Embed | Plain Text
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <title>JavaScriptからVBScriptの命令を実行する</title> <meta name="Generator" content="EditPlus"> <meta name="Author" content=""> <meta name="Keywords" content=""> <meta name="Description" content=""> </head> <body> <html> <script type="text/vbscript"> Function ShowMSG(msg) msg = Replace(msg, "[newline]", vbCrLf) MyVar = MsgBox (msg, 64, "確認") End Function </script> <script language="JavaScript"><!-- function vb() { hincd = "HIN001"; hinnma = "品名001"; msg = "商品をカートに加えました[newline]" + "[newline]商品コード:" + hincd + "[newline]品名:" + hinnma; execScript("ShowMSG('" + msg + "')",'VBScript'); } // --></script> </head> <body> <a href="javascript:vb()">Exec VB -- MsgBox</a><br> </body> </html>
You need to login to post a comment.
