『壹』 bat文件編寫求助！！
以下代碼復制粘貼到記事本，另存為xx.bat，編碼選ANSI
@echo off
rem 全盤搜索/查找指定名稱的文件夾，並拷貝/復制到U盤里
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
for /f "tokens=2 delims==" %%a in ('wmic LogicalDisk where "DriveType='2'" get DeviceID /value^|find "="') do (
set upan=%%a
)
if not defined upan (echo;無法獲取U盤盤符&pause&exit)
set "findname=銷售"
set "newfolder=%upan%\業績"
if not exist "%newfolder%" md "%newfolder%"
for %%a in (Z Y X W V U T S R Q P O N M L K J I H G F E D C) do (
if exist %%a: (
if not defined _%%a: (
echo;%%a: Searching……
pushd %%a:
for /f "delims=" %%b in ('dir /ad/b/s') do (
if /i "%%~nxb" equ "%findname%" (
echo;"%%b" --^> "%newfolder%"
)
)
popd
)
)
)
echo;%#% +%$%%$%/%@% %z%
pause
exit
『貳』 看dos自帶的幫助看不懂
參數是自定義的。括弧之間是有空格的。如果不懂的話，挑幾個容易理解的命令開始學起，剛開始都是不會的，我也是。慢慢學習就學會了。
path是路徑的意思，比如C:\就是C盤的路徑，filename是文件名的意思，drive是驅動器的意思，就是常見的cdef盤符。
參數不一定必須有，有些命令可以有可以沒有參數，但是有些命令必須帶參數才可以運行的。
『叄』 如何知道 java 一個包 分布在classpath中 哪些個jar 或 class 文件中
找到classpath及jar中相關類，可以參考以下代碼，與你的表現形式有些不同。你那樣的，我以前也見過，但一時想不起來是怎麼實現的了。
import java.io.File;
import java.util.Enumeration;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;
public class ActivityTest {
public static void main(String[] args) throws Exception {
String findname = "File.class";
String str = System.getProperty("sun.boot.class.path");
String[] jarnames = str.split(";");
for (int i = 0; i < jarnames.length; i++) {
File file = new File(jarnames[i]);
if (file.isFile() && file.exists()) {
JarFile jar = new JarFile(file);
Enumeration<JarEntry> enums = jar.entries();
while (enums.hasMoreElements()) {
JarEntry entry = enums.nextElement();
if (entry.getName().endsWith(findname)) {
System.out.println(entry);
return;
}
}
}
}
}
}
『肆』 VB 檢查進程是否啟動,如啟動則運行命令,無啟動則退出
新建一個模塊，把下列代碼拷貝過去，調用過程CheckPro就可以啦
，參數FindName-要查找的進程名，DeleteNeme要刪除的文件名（含絕對路徑）
'已通過測試，有條件的話，加點分哈，嘿嘿
Option Explicit
Private Type PROCESSENTRY32
dwSize As Long
cntUsage As Long
th32ProcessID As Long
th32DefaultHeapID As Long
th32MoleID As Long
cntThreads As Long
th32ParentProcessID As Long
pcPriClassBase As Long
dwFlags As Long
szExeFile As String * 1024
End Type
Const TH32CS_SNAPHEAPLIST = &H1
Const TH32CS_SNAPPROCESS = &H2
Const TH32CS_SNAPTHREAD = &H4
Const TH32CS_SNAPMODULE = &H8
Const TH32CS_SNAPALL = (TH32CS_SNAPHEAPLIST Or TH32CS_SNAPPROCESS Or TH32CS_SNAPTHREAD Or TH32CS_SNAPMODULE)
Const TH32CS_INHERIT = &H80000000
Public Declare Function CreateToolhelp32Snapshot Lib "kernel32" (ByVal dwFlags As Long, ByVal th32ProcessID As Long) As Long
Public Declare Function Process32First Lib "kernel32" (ByVal hSnapshot As Long, lppe As PROCESSENTRY32) As Long
Public Declare Function Process32Next Lib "kernel32" (ByVal hSnapshot As Long, lppe As PROCESSENTRY32) As Long
Public Declare Function CloseHandle Lib "kernel32.dll" (ByVal hObject As Long) As Long
'判斷進程是否存在
Public Function GetPidByPName(ByVal ProcessName As String) As Long '根據進程名稱獲得進程號
Dim strdata As String
Dim my As PROCESSENTRY32
Dim l As Long
Dim l1 As Long
Dim mName As String
Dim i As Integer, pid As Long
l = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0)
If l Then
my.dwSize = 1060
If (Process32First(l, my)) Then
Do
i = InStr(1, my.szExeFile, Chr(0))
mName = LCase(Left(my.szExeFile, i - 1))
If mName = LCase(ProcessName) Then
pid = my.th32ProcessID
GetPidByPName = pid
Exit Function
End If
Loop Until (Process32Next(l, my) < 1)
End If
l1 = CloseHandle(l)
End If
GetPidByPName = 0
End Function
Public Sub CheckPro(FindName As String, DeleteName As String)
'FindName-要查找的進程名，DeleteNeme要刪除的文件名（含絕對路徑）
'如：FindName = "qq.exe" DeleteName="c:\cc.txt"
If GetPidByPName(FindName) > 0 Then
'找到了
Dim tmpObj As Object
Set tmpObj = CreateObject("Scripting.FileSystemObject")
If tmpObj.FileExists(DeleteName) Then
'目標文件存在則刪除
tmpObj.DeleteFile DeleteName
End If
Set tmpObj = Nothing
Else
'退出軟體
End
End If
End Sub
『伍』 准備把全部"家當"送給會C語言編程的大蝦!
/*=========================clock.c========================
下面是TC做的時鍾
要求：TC目錄下得有EGAVGA.BGI文件
每秒發出「喀嗒喀嗒」的聲音
整點用5聲低1聲的響聲來報點
======================================================*/
#include <math.h>
#include <dos.h>
#include <Graphics.h>
#define CENTERX 320 /*表的中心坐標X*/
#define CENTERY 175 /*表的中心坐標Y*/
#define CLICK 100 /*每秒發出的頻率*/
#define CLICKDELAY 30 /*第秒發出的聲音的持續時間*/
#define HIBEEP 1000 /*高頻*/
#define LOWBEEP 500 /*低頻*/
#define BEEPDELAY 200 /*整點報時的持續時間*/
int Mark_1[8]={-5,-160,5,-160,5,-130,-5,-130};
int Mark_2[8]={-5,-160,5,-160,2,-130,-2,-130};
int HourHand[8]={-3,-100,3,-100,4,10,-4,10};
int MinHand[8] ={-3,-120,3,-120,4,10,-4,10};
int SecHand[8] ={-2,-150,2,-150,3,10,-3,10};
/*發出喀嗒聲並延時*/
void Click(void)
{
sound(CLICK);
delay(CLICKDELAY);
nosound();
}
/*高聲報時*/
void HighBeep(void)
{
sound(HIBEEP);
delay(BEEPDELAY);
nosound();
}
/*低聲報時*/
void LowBeep(void)
{
sound(LOWBEEP);
delay(BEEPDELAY);
nosound();
}
/*畫多邊形*/
void DrawPoly(int *data,int angle,int color)
{
int usedata[8];
float sinang,cosang;
int i;
sinang=sin((float)angle/180*3.14);
cosang=cos((float)angle/180*3.14);
for (i=0;i<8;i+=2)
{
/*一個矢量旋轉angle角後的坐標，通過兩角和公式計算出來的結果*/
usedata[i] =CENTERX+cosang*data[i]-sinang*data[i+1]+0.5;
usedata[i+1]=CENTERY+sinang*data[i]+cosang*data[i+1]+0.5;
}
setfillstyle(SOLID_FILL,color);
fillpoly(4,usedata);
}
/*畫時鍾*/
void DrawClock(struct time *curtime)
{
int ang;
float hourrate,minrate,secrate;
setbkcolor(BLUE);
cleardevice();
setcolor(WHITE);
for (ang=0;ang<360;ang+=90) /*畫表盤*/
{
DrawPoly(Mark_1,ang ,WHITE);
DrawPoly(Mark_2,ang+30,WHITE);
DrawPoly(Mark_2,ang+60,WHITE);
}
secrate = (float) curtime->ti_sec/60; /*秒對分針以及時針的貢獻*/
minrate =((float) curtime->ti_min+secrate)/60; /*分針角度*/
hourrate=((float)(curtime->ti_hour%12)+minrate)/12;/*時針角度*/
ang=hourrate*360;
DrawPoly(HourHand,ang,YELLOW); /*畫時針*/
ang=minrate*360;
DrawPoly(MinHand, ang,GREEN); /*畫分針*/
ang=secrate*360;
DrawPoly(SecHand, ang,RED); /*畫秒針*/
}
void main(void)
{
int gdriver=EGA,gmode=EGAHI;
int curpage;
struct time curtime,newtime;
initgraph(&gdriver,&gmode,"");
setbkcolor(BLUE);
cleardevice();
gettime(&curtime);
curpage=0;
DrawClock(&curtime);
while(1)
{
if (kbhit())
break;
gettime(&newtime);
if (newtime.ti_sec!=curtime.ti_sec) /*一秒鍾更新一次*/
{
curpage|=0X0001; /*0、1更新*/
curtime=newtime;
setactivepage(curpage);
DrawClock(&curtime);
setvisualpage(curpage);
/*整點發出高頻的音*/
if (newtime.ti_min==0&&newtime.ti_sec==0) /*整點*/
HighBeep();
else if (newtime.ti_min==59&&newtime.ti_sec>=55&&newtime.ti_sec<59) /*將近整點的時候，發出五聲你音*/
LowBeep();
else /*其他時間，喀嗒聲*/
Click();
}
}
closegraph();
}
『陸』 關於C語言的文件輸出問題（簡單）急！！！！！！！！！！
//職工管理系統
//職工號，姓名，性別，年齡，學歷，工資，住址，電話等
/*
1、錄入職工信息，若錄入的職工號重復給予提示；
2、瀏覽職工信息；
3、職工號和職工姓名查詢職工信息；
4、按職工號刪除職工信息。
5、輸出職工信息。
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
//下面定義職工信息結構
struct WORKER{
int id; //職工號
char name[20]; //姓名
char sex[3]; //性別
int age; //年齡
char e[50]; //學歷
int wages; //工資
char adr[255]; //住址
char phone[13]; //電話
};
typedef struct WORKER *PWORKER;
struct LINK{
WORKER w;
LINK *next;
};
typedef struct LINK *PLINK;
//創建職工信息鏈表
PLINK create()
{
PLINK p=(PLINK)malloc(sizeof(struct LINK));
if(NULL!=p)
{
p->next=NULL;
return p;
}
printf("內存不足!\n");
return NULL;
}
//顯示程序界面文字
void message()
{
system("cls");
printf("歡迎進入職工管理系統\n");
printf(" --幫助 請輸入：0\n");
printf(" --錄入職工信息 請輸入：1\n");
printf(" --瀏覽職工信息 請輸入：2\n");
printf(" --按職工號查詢 請輸入：3\n");
printf(" --按姓名 查詢 請輸入：4\n");
printf(" --刪除職工信息 請輸入：5\n");
printf(" --輸出職工信息 請輸入：6\n");
printf("\n --清屏 請輸入：7\n");
printf(" --退出 請輸入：-1\n");
}
//錄入職工信息
int add(PLINK p)
{
PLINK q=(PLINK)malloc(sizeof(struct LINK));
if(NULL==q)
{
printf("錄入失敗提示：內存不足!\n");
return -1;
}
printf("請輸入職工號(數字)：");
scanf("%d",&q->w.id);
PLINK h=p->next;
while(h)
{
if(h->w.id==q->w.id)
{
free(q);
printf("錄入失敗提示：此職工號已經存在!\n");
return -1;
}
h=h->next;
}
printf("請輸入職工姓名(文字)：");
scanf("%s",&q->w.name);
printf("請輸入職工性別(文字)：");
scanf("%s",&q->w.sex);
printf("請輸入職工年齡(數字)：");
scanf("%d",&q->w.age);
printf("請輸入職工學歷(文字)：");
scanf("%s",&q->w.e);
printf("請輸入職工工資(數字)：");
scanf("%d",&q->w.wages);
printf("請輸入職工住址(文字)：");
scanf("%s",&q->w.adr);
printf("請輸入職工電話(文字)：");
scanf("%s",&q->w.phone);
q->next=p->next;
p->next=q;
printf("錄入成功!\n");
return -1;
}
//瀏覽職工信息
void show(PLINK p)
{
message();
printf("瀏覽職工信息\n");
printf("職工號\t姓名\t性別\t年齡\t學歷\t工資\t住址\t電話\n");
while(NULL!=p->next)
{
printf("%d\t%s\t%s\t%d\t%s\t%d\t%s\t%s\n",
p->next->w.id,p->next->w.name,p->next->w.sex,p->next->w.adr,
p->next->w.e,p->next->w.wages,p->next->w.adr,p->next->w.phone);
p=p->next;
}
printf("顯示完畢!\n");
}
//按職工號查詢
PLINK findid(PLINK p,int id)
{
message();
printf("按職工號查詢\n");
printf("職工號\t姓名\t性別\t年齡\t學歷\t工資\t住址\t電話\n");
while(NULL!=p->next)
{
if(p->next->w.id==id)
{
printf("%d\t%s\t%s\t%d\t%s\t%d\t%s\t%s\n",
p->next->w.id,p->next->w.name,p->next->w.sex,p->next->w.adr,
p->next->w.e,p->next->w.wages,p->next->w.adr,p->next->w.phone);
return p;
}
p=p->next;
}
printf("查詢結束!\n");
return NULL;
}
//按姓名 查詢
PLINK findname(PLINK p,char *name)
{
message();
printf("按姓名 查詢\n");
printf("職工號\t姓名\t性別\t年齡\t學歷\t工資\t住址\t電話\n");
while(NULL!=p->next)
{
if(0==strcmp(p->next->w.name,name))
{
printf("%d\t%s\t%s\t%d\t%s\t%d\t%s\t%s\n",
p->next->w.id,p->next->w.name,p->next->w.sex,p->next->w.adr,
p->next->w.e,p->next->w.wages,p->next->w.adr,p->next->w.phone);
return p;
}
p=p->next;
}
printf("查詢結束!\n");
return NULL;
}
//按職工號刪除職工信息
int del(PLINK p,int id)
{
message();
printf("按職工號刪除職工信息\n");
while(NULL!=p->next)
{
if(p->next->w.id==id)
{
PLINK q=p->next;
p->next=p->next->next;
free(q);
printf("刪除成功!\n");
return 1;
}
p=p->next;
}
printf("沒有你輸入的職工號!\n");
return -1;
}
//程序結束時釋放內存
void release(PLINK p)
{
PLINK q;
while(NULL!=p->next)
{
q=p;
p=p->next;
free(q);
}
free(p);
}
//輸出職工信息
void disp(PLINK p)
{
FILE *fp;
fp=fopen("d:\\職工信息.txt","w");
fprintf(fp,"%s\t%s\t%s\t%d\t%s\t%d\t%s\t%s\n",
p->next->w.id,p->next->w.name,p->next->w.sex,p->next->w.age,
p->next->w.e,p->next->w.wages,p->next->w.adr,p->next->w.phone);
fclose(fp);
}
int main()
{
int cmd=0;//命令號
int id;
char name[20];
PLINK pworker;
if(!(pworker=create()))
{
exit(0);//如果創建職工信息鏈表表頭失敗則結束程序
}
while(cmd!=-1)
{
switch(cmd)
{
case 0:
message();
break;
case 1:
add(pworker);
break;
case 2:
show(pworker);
break;
case 3:
printf("請輸入要查詢的職工號：");
scanf("%d",&id);
findid(pworker,id);
break;
case 4:
printf("請輸入要查詢的職姓名：");
scanf("%s",name);
findname(pworker,name);
break;
case 5:
printf("請輸入要刪除的職工號：");
scanf("%d",&id);
del(pworker,id);
break;
case 6:
disp();
case 7:
default:
message();
}
printf("請輸入操作命令數字：\n");
scanf("%d",&cmd);//接收命令
}
printf("謝謝使用!\n");
release(pworker);
return 0;
}
『柒』 excel宏命令 如何查找並定位相應單元格
占個位置先，宏稍後貼上 ^-^
----------------------------------
代碼如下(要求第一行為姓名，第一列為日期)，直接執行即可（經常用的話，可以設置一個快捷方式，或者放一個圖標在工具欄或菜單條中）：
Sub 人員日期定位宏()
Dim FindName As String, toDay As Date, x As Integer, y As Integer
Dim oldcell As Range
Set oldcell = ActiveCell
FindName = ActiveCell.Value
toDay = Date
FindName = InputBox("請輸入你要查詢的人員姓名：", "人員&日期定位宏", FindName)
If FindName = "" Then Exit Sub
Rows("1:1").Select
On Error GoTo notFindName:
Selection.Find(What:=FindName, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, MatchByte:=False, SearchFormat:=False).Activate
'LookAt:=xlWhole 表示單元格匹配，LookAt:=xlPart 表示部分匹配
x = ActiveCell.Column()
Columns("A:A").Select
On Error GoTo notFindDate:
Selection.Find(What:=toDay, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, MatchByte:=False, SearchFormat:=False).Activate
y = ActiveCell.Row()
On Error GoTo 0
Cells(y, x).Select
Exit Sub
notFindName:
MsgBox "沒有找到你需要的人員姓名（" & FindName & "）！", vbInformation + vbOKOnly, "人員&日期定位宏"
oldcell.Select
Exit Sub
notFindDate:
MsgBox "沒有找到今天的日期（" & CStr(toDay) & "）！", vbInformation + vbOKOnly, "人員&日期定位宏"
Cells(1, x).Select
End Sub
註：它會將你所選擇的單元格內容默認為要查找的人員姓名，當然你可以修改之。
有疑問或問題請Hi我或給我發BaiDu消息。
GoodLuck!
『捌』 find.-name用法
findname提供線上查詢和客戶端查詢，支持findname提供線上查詢和客戶端查詢.其中線上查詢只需要輸入要查詢的域名字元，在下拉提示框中會自動列出所有域名後綴的注冊狀態，點擊其中一個就可以看到詳細信息，非常方便。等十幾種域名查詢，其中線上查詢只需要輸入要查詢的域名字元，在下拉提示框中會自動列出所有域名後綴的注冊狀態
『玖』 stata安裝路徑出現兩個ado
選擇一個就好，下載的外部命令通常為 .ado 格式，為了將下載的命令與自編的命令放在不同的路徑下，找到 Stata 的安裝路徑，可以看到一個 【ado 】文件夾。裡面有【base】 文件、【plus】 文件及 【personal】 文件（後兩個文件夾不一定有自帶，可以自己手動創建）。 - 【base】文件夾用於存儲 Stata 自帶的基礎命令 - 【plus】文件夾用於存儲外部命令 - 【personal】用於存儲自己編寫的命令和 dofiles。
為了達到這一目的，需要對系統默認路徑進行一些簡單的設置。在 Stata 的安裝路徑下（如：【D:\stata15】）新建一個 profile.do 文件，將如下命令放到此文件中：
adopath + "D:\stata15\ado\plus"
sysdir set PLUS "D:\stata15\ado\plus" // 外部命令的存放位置
sysdir set PERSONAL "D:\stata15\ado\personal" // 個人文件夾位置
cd `c(sysdir_personal)'
根據外部命令的來源不同，所使用的命令也不盡一致，這里主要介紹 ssc ， search，net ，findit 和 github 等命令。
2.1 ssc 命令
ssc 是 Statistical Software Components (http://www.repec.org) 的縮寫，用於操作存放在該網站上的外部命令，包括安裝 ( ssc install)、移除 ( ssc uninstall )、描述 ( ssc describe)、顯示最近更新 ( ssc new )、顯示最熱門 ( ssc hot )。例如：
. ado dir //顯示已安裝ado文件
[1] package outreg2 from http://fmwww.bc.e/repec/bocode/o
'OUTREG2': mole to arrange regression outputs into an illustrative table
[2] package estout from http://fmwww.bc.e/repec/bocode/e
'ESTOUT': mole to make regression tables
. ssc install winsor2, all replace //安裝winsor2，基本用法：ssc install newprogramname
checking winsor2 consistency and verifying not already installed...
installing into D:\stata15\ado\plus\...
installation complete.
若要查看某一具體命令是否安裝，可以利用
. ado, find(winsor2)
[3] package winsor2 from http://fmwww.bc.e/repec/bocode/w
'WINSOR2': mole to winsorize data
要查看 ssc 上最熱門的命令，可以通過
. ssc hot, n(10) //顯示排名前10的命令
Top 10 packages at SSC
Aug 2018
Rank # hits Package Author(s)
----------------------------------------------------------------------
1 331271.0 findname Nicholas J. Cox
2 19504.6 outreg2 Roy Wada
3 18223.6 estout Ben Jann
4 11066.7 distinct Gary Longton, Nicholas J. Cox
5 7746.3 winsor Nicholas J. Cox
6 6881.7 winsor2 Lian Yu-jun
7 6598.7 ivreg2 Mark E Schaffer, Steven Stillman, Christopher F Baum
8 6579.3 ivreg210 Mark E Schaffer, Steven Stillman, Christopher F Baum
9 6571.1 ivreg28 Mark E Schaffer, Steven Stillman, Christopher F Baum
10 6561.8 ivreg29 Christopher F Baum, Mark E Schaffer, Steven Stillman
----------------------------------------------------------------------
(Click on package name for description)