VBS の検索結果:
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>セッション変数 Session("USERNAME") で名前の管理</title> </head> <body> <h2>セッション変数 Session("USERNAME") で名前の管理</h2> <h3>じゃんけんゲーム</h3><br> <% 'ユー…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>VBScript/Year/Month/Day/WeekDay/Hour/Minute/Secound 関数使用例</title> </head> <body> <h2>VBScript関数<br>Year/Month/Day/WeekDay/Hour/Min…
…@LANGUAGE=VBScript%> <html> <head> <title>SJISからJISコードに変換、文字コード関係で遊ぶ</title> </head> <body> <h2>SJISからJISコードに変換、文字コード関係で遊ぶ</h2> <br> 自作したSJIS--JIS変換ルーチンを呼んでます。<br> ※詳細は、ソースと詳細解説のページを見てください。<br> <hr> <% CHK_DATA = Request.QueryString("DATA")…
…@LANGUAGE=VBScript%> <html> <head> <title>Excel(*.xls)グラフ付雛形にADOで接続しデータ更新</title> </head> <body> <h2>Excel(*.xls)グラフ付雛形にADOで接続しデータ更新</h2> <!-- Ken3 --><!-- #include file="info.inc" --> test057-1.asp<br> ASPからADOを使用してExcel(*.xls)と接続して、<br> .…
…@LANGUAGE=VBScript%> <html> <head> <title>Excel(*.xls)とADOで接続、.Addnewしてみた</title> </head> <body> <h2>Excel(*.xls)とADOで接続、.Addnewしてみた</h2> <!-- Ken3 --><!-- #include file="info.inc" --> test056-1.asp<br> ASPからADOを使用してExcel(*.xls)と接続して、<br> .…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>AND演算子を使って、1バイト文字2バイト文字の判断</title> </head> <body> <h2>AND演算子を使って、1バイト文字2バイト文字の判断</h2> <br> たんに、 nCODE = Asc(Mid(strMOJI, n, 1)) 'n…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ASPからADOを使用してExcel(*.xls)に接続してみた</title> </head> <body> <h1>ASPからADOを使用してExcel(*.xls)に接続してみた</h1> Driver={Microsoft Excel Driver (…
…@LANGUAGE=VBScript%> <html> <head> <title>ADO Select * INTO [Excel 8.0;Database=Drive:\Path\File].[Sheet]</title> </head> <body> <h1>ADO Select * INTO [Excel 8.0;Database=Drive:\Path\File].[Sheet]</h1> test054-1.asp<br> [Excel 8.0;database=…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>Asc関数でキャラクタコードの表示、Hex関数を使用して16進数で表示</title> </head> <body> <h2>Asc関数でキャラクタコードの表示、Hex関数を使用して16進数で表示</h2> <% CHK_DATA = Request.Quer…
…@LANGUAGE=VBScript%> <html> <head> <title>ジャンケンゲームで遊ぶ</title> </head> <body> <h2>ジャンケンゲームで遊ぶ</h2> 受取ったパラメータは<br>[<%=Request.QueryString("DATA")%>]<hr> <% 'Lenで変数の長さをチェックする D = Request.QueryString("DATA") 'データを代入 If Len(D) = 1 Then 'データあり Ca…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>IsEmpty関数でデータのチェック</title> </head> <body> <h2>IsEmpty関数でデータのチェック</h2> Request.QueryString("DATA")をチェックすると、、、<br> <% 'IsEmptyで変数をチェ…
…@LANGUAGE=VBScript%> <% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ASP削除データの選択 と S…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>SQL SELECT文で WHERE句 条件をOrでつなげ複数にしてみた</title> </head> <body> <h1>SQL SELECT文で WHERE句 条件をOrでつなげ複数にしてみた</h1> test046-1.asp<br> <hr> <…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>HTML FORM INPUT TYPE="CHECKBOX" チェックボックスの入力テスト</title> </head> <body> <h2>HTML FORM INPUT TYPE="CHECKBOX" チェックボックスの入力テスト</h2> <hr>…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>パラメータをチェックする</title> </head> <body> <h2>パラメータをチェックする</h2> test044-1.asp<br> <hr> エラー条件は、<br> KUBUN が 無し(スペース)<br> NO が無し Or 0の時<br…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>SQL文 HAVING句でGroup化されたレコードに条件設定する</title> </head> <body> <h1>SQL文 HAVING句でGroup化されたレコードに条件設定する</h1> test043-1.asp<br> <hr> cnt_asp…
…@LANGUAGE=VBScript%> <% '頭でパラメータのチェックとセット処理 If IsEmpty(Request.QueryString("SETDATA")) = False Then Application("test042data") = Letf(Request.QueryString("SETDATA"),20) 'データセット Application("test042time") = Now '現在時刻のセット End If Application("…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>POST(Request.Form)/GET(Request.QueryString) で 送られてきた値を表示する</title> </head> <body> <h2>POST(Request.Form)/GET(Request.QueryString) …
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ADO から MDB へのSQL文でFormat関数使用</title> </head> <body> <h1>ADO から MDB へのSQL文でFormat関数使用</h1> test040-1.asp<br> <hr> <b>YYYYMMDDでデータをま…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>SQL GROUP BY句 で グループ化 Count関数で集計 ORDER BY句で並べ替え</title> </head> <body> <h1>SQL GROUP BY句 で グループ化 Count関数で集計 ORDER BY句で並べ替え</h1> te…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>SQL GROUP BY句 で グループ化する処理を解説する</title> </head> <body> <h1>SQL GROUP BY句 で グループ化する処理を解説する</h1> test038-1.asp<br> <hr> <b>cnt_asp.md…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>Mid関数のテストを解説する</title> </head> <body> <h2>Mid関数のテストを解説する</h2> test034-1.asp<br> moji = "abcdefg"<br> a = Mid(moji, 2, 3) '2文字目から3文…
…@LANGUAGE=VBScript%> <% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ASP フォームに更新のボタン…
…@LANGUAGE=VBScript%> <% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ASP フォームに削除のボタン…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>DateAdd関数の使い方を解説</title> </head> <body> <h2>DateAdd関数の使い方を解説</h2> test031-1.asp<br> DateAdd("h", 6, Now)<br> DateAdd("d", -5, Date…
…@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>SQL SELECT文で WHERE句を使ってみた</title> </head> <body> <h1>SQL SELECT文で WHERE句を使ってみた</h1> test030-1.asp<br> <hr> <% '頭で、入力パラメーターの文字数をチェッ…
…@LANGUAGE=VBScript%> <% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <html> <head> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>SQL INSERT INT…
…@LANGUAGE=VBScript%> <html> <head> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ORDER BYでF_TITLEを基準に並べ替える</title> </head> <body> <h1>ORDER BYでF_TITLEを基準に並べ替える</h1> test028-1.asp<br> Set rs = db.Execute("Select…
…@LANGUAGE=VBScript%> <% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <html> <head> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>SQL INSERT INT…
…@LANGUAGE=VBScript%> <% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <html> <head> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ASPからMDBファイルにア…