-
GZIP圧縮されたHTTPコンテンツを取得するためのVBSコード
多くのウェブサイトでは、読み込み速度を向上させるために、HTTPサーバーのGZIP圧縮機能を有効にしています。クライアントから送信されたHTTPリクエストがGZIPエンコードを許容することを宣言すると、サーバーは自動的にHTTPレスポンスのコンテンツをGZIPで圧縮します。しかし、VBSでGZIPエンコードを自動的に解凍するのは、それほど簡単ではありません。 GZIP圧縮は、Msxml2.
2022-02-08 11:32:42 -
ドットで終わるファイルの属性をvbsでhiddenに変更する。
コアコードです。 rem Change the attribute of files ending in a dot to "hidden" @echo off set DstFile=C:\test\batcher. >"%temp%\FileProperty.vbs" echo Set objFSO = CreateObject("Scripting.FileSystemObje
2022-02-08 11:26:48 -
VBSの基本 - ループ (for, do, while)
コードを書くときに、あるコードを何度も実行したいことがよくありますが、そのためにコード内でループを使用することができます。 ループは、条件がFalseになる前に文を繰り返すもの、条件がTrueになる前に文を繰り返すもの、指定した回数だけ文を繰り返すものの3つに分類されます。 For... 次は ステートメントを何回繰り返すかをカウンタで指定する Do... ループ 条件が成立し
2022-02-08 11:06:03 -
VBAでのタイマー関数の使用方法
例1.40 タイマー関数 I. タイトル あなたは、Timer関数を使って、このコードが実行されるのにかかる時間を計算するコードを書くように要求されています。 II. コード Sub Example_1_040() Dim t, i&, a t = Timer For i = 1 To 1000000 a = a + i Nex
2022-02-08 10:43:54 -
指定されたプロセス名の小さなVBSを終了させる
指定したプロセス名を強制終了する小さなvbsです、お役に立てれば幸いです。 Function KillProc(strProcName) On Error Resume Next Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}! \\\. \root\cimv2") Set arrProc
2022-02-08 10:31:48 -
VCで縦書き文字を実現する簡単な方法(推奨)
VCで縦書き文字を実装するのは難しいと思われがちですが、"lying"フォントを使えば簡単に実装することができます。 Windowsには、@Fixedsys、@System、@Song、@Boldなど、"lie"するフォントが存在します。その数は多く、@のないフォントとの違いは、それで表示される文字が"lieing"であることだけです。 "lieingです。以下のようになります。
2022-02-08 10:07:02 -
VBSでスペースを含むパスを解決する3つの方法
方法1. Set wshell=CreateObject("WScript.Shell") wshell.Run """"C:\Program Files\360\360se\360se.exe"""",5,True Set wshell = Nothing 方法2 temp="C:\Program Files\360\360se3\360se.exe" path = Ch
2022-02-08 08:55:28 -
Windows 64ビットOS上で32ビット版vbscriptを実行する方法
今日、2008 r2 64ビットサーバーシステムで、vbsファイルを実行すると、次のようなメッセージが表示されました。 --------------------------- Windows Script Host --------------------------- Script: C:\Users\Administrator\Desktop\vbs_cf.vbs Lines: 10
2022-02-08 08:22:06 -
DNSを変更し、IEの一時ファイルを空にするvbsスクリプト
今朝、Mountain Green Instituteから電話があり、DNSをキャンパスDNSに変更し、IEの一時ファイルを空にするスクリプトが必要だと言われました。 コピーコード コードは以下の通りです。 rem programed by Kaisir @echo off echo The purpose of this script is to chang
2022-02-08 07:54:35 -
ディスクの種類を判別し、ハードディスクの残量を検出するvbs実装コード
コアとなるコードです。 Function ShowDriveType(drvpath) Dim fso, d, t Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(fso.GetDriveName(drvpath)) Select Case d.DriveType Ca
2022-02-08 06:54:49 -
VBSのRunとExecの違い
Set ws = CreateObject("WScript.Shell") 'Create an object reference here to be used in the following example code. 'Demon's note: Why is this variable name so obscene (WS) 構文です。(常識(鬼注:常識は好きな言葉です):
2022-02-08 06:39:14 -
VBSの基本 - vbscriptキュー
コード例 スクリプトファイル:c.vbs キューの要素追加(in)、要素削除(out)、トラバース、要素数、emptyを含む 'Create a queue Dim Que : Set Que = CreateObject("System.Collections.Queue") Que.EnQueue("Element1") Que.EnQueue("Element2") Que.
2022-02-08 06:36:04 -
VBSがWMIを呼び出してハードディスクのファイルをトラバースしてカウントする
何年か前に、WMIを呼び出してハードディスクのファイルを反復してカウントするVBS関数を書いたのですが、今日、それをWebサイトで見て投稿してみました コアとなるコード Function wmisfile(path_sf,justcnt) 'On Error Resume Next StrComputer = ". " Set ObjWMIService = GetObj
2022-02-08 06:14:06 -
VBSの基本 - vbscriptスタック
コード例 スクリプトファイル:d.vbs 要素追加(スタック)、要素削除(スタック)、トラバース、要素数カウント、エンプティ(空)のスタックが含まれています。 Option Explicit 'Create the stack Dim Stk : Set Stk = CreateObject("System.Collections.Stack") Stk.Push "Elemen
2022-02-08 04:24:08 -
VBSの基本 - 条件付き文(IfとSelect Case)
If ... Then ... Else 次のような場合、If... を使用することができます。.Then... Else ステートメントを使用します。 条件が真のとき、コードの一部を実行する 2つのコードのうち1つが実行対象として選択された場合 dim a 'Define a variable a = 100 if a < 200 then a = 300
2022-02-08 03:33:30 -
コンピュータのオン/オフ時間を問い合わせるためのvbsコード
コアとなるコードです。 strComputer = ". " Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}! \\\" _ & strComputer & "\root\cimv2") Set colLoggedEvents = objWMIServic
2022-02-08 02:56:22 -
VBScriptにおけるOn Error文の使用法まとめ
On Errorステートメントを使用しない場合、実行時エラーはすべて致命的なものとなります。エラーハンドラとは、On Errorステートメントによって開かれたハンドラで、quot;active"エラーハンドラとは、エラー処理中に許可されたエラーハンドラのことです。 On Error GoTo 0 現在のプロセスで開始されたすべてのエラーハンドラが無効であることを示す。 
2022-02-08 02:31:32 -
vbscript Webページシミュレートログイン効果コード
今日はもうやることがないんだ〜。 パソコンのブラウザーのパスワード記憶機能が痛くて~、うまく機能しないときがあって~、CMCC-EDUにログインするときはいつもアカウントを入力しないといけない。ログインページのソースコードを見ていると、Vbsスクリプトで設定ファイルを読み込んで、CMCC-EDU本体にログインするだけ。アカウントは1行、パスワードは1行です。 久しぶりにvbsを使ったので
2022-02-08 01:51:45 -
ホストファイルのドメインアドレスの内容を削除するためにvbsを使用します。
要件 元のホストに次の3行が追加されています。 202.102.101.105 intranet.corp 202.102.101.107 mail.intranet.corp 202.102.101.108 sip.intranet.corp この3行はその後不要になるので、上記のvbsコードを実行して、hostファイルからこの3行を削除してください。 'This s
2022-02-08 01:45:19 -
ComboBoxコントロールの使用方法に関するチュートリアル
先ほどListBoxコントロールの使い方を学びましたが、vb.netにはListBoxコントロールとよく似たコントロールがもう一つあります - ComboBoxコントロール、別名コンボボックスとも呼ばれます。ComboBoxコントロールは、上部のリスト項目を入力するテキストボックスと、テキストボックスの下にある、選択可能な項目リストを表示するリストボックスの2つの部分から構成されています
2022-02-08 01:19:15
最新
-
LinuxでインターフェースのIPアドレスを取得する
-
WPFでリソースであるアイコンを使用するにはどうすればよいですか?
-
Laravel 6.0での「未定義関数str_slug()の呼び出し」について
-
WildFlyのヒープメモリを増やすには?
-
MessageBox.Showダイアログの「はい」「いいえ」ボタンのテキストを変更するには?
-
FlutterでキーボードのText Input Action Button(return/enterキー)を変更するには?
-
同一線上にある2つのdivブロック
-
ナビゲーションバーの右側に複数のUIBarButtonItemを追加するには?
-
絶対配置を使用することはバッドプラクティスとみなされますか?[クローズド]
-
リアクト転写小道具(1個を除く
おすすめ
-
Eclipse で Maven プロジェクトを作成すると、「Could not resolve archetype」というクレームが発生する [重複] 。
-
ドロップダウンリストのselecteditemをプログラムで設定する
-
切り上げ/切り下げ 瞬間を分単位で表す
-
kubernetesを完全にアンインストールする方法
-
Laravelが更新後に「The bootstrap/cache directory must be present and writable」エラーを投げる。
-
LinearLayoutに子要素がある場合、onClickがトリガーされない
-
アンドロイド マシュマロ。Espressoでパーミッションのテスト?
-
車輪の再発明をせずにREST APIを保護する
-
Jenkinsパイプラインで失敗したステージのリトライオプションを実装するには?
-
がチェックアウトされていない...バンドルインストールしても直らない!