易語言wifi源碼
在電腦打開瀏覽器，輸入路由器的登錄I P，一般是192.168.1.1或者192.168.0.1，如果不對就看路由器機身，一般底下有寫。打開出現登錄頁面，初始用戶名和密碼都是admin，也有用戶名admin，密碼不填，這個在路由器說明書上有寫。進去以後，看無線設置（WIFI）里，就能看到密碼。切換至「無線設置」選項卡，然後就可以修改無線密碼啦。修改PSK密碼後，點擊「確定」按鈕即可。如果，路由器登錄用戶名和密碼忘記了，就重置路由器，一般路由器後面都有一個很小的重置按鈕，需要用筆頭，在路由器開著的狀態下，按下重置按鈕不放，直到路由器所有指示燈都亮起。
② 易語言怎麼查看誰在連接我的WiFi
其實可以用易語言調用CMD的netsh wlan show hostednetwork命令來查詢WiFi鏈接信息，然後把信息返回到編輯框，如以下圖片，源碼已上傳，詳細使用參考源碼，謝謝望採納！！
③ 求易語言或者VB編寫的WiFi連接源碼，就只要連接功能就好。求大神幫幫忙。
#include"stdafx.h"
#include<stdio.h>
#include<windows.h>
#include<wininet.h>
#pragmacomment(lib,"ws2_32.lib")
#pragmacomment(lib,"wininet.lib")
typedefDWORD(__stdcall*IcmpSendEcho)(HANDLE,IPAddr,LPVOID,WORD,PIP_OPTION_INFORMATION,LPVOID,DWORD,DWORD);
typedefHANDLE(__stdcall*IcmpCreateFile)(void);
typedefBOOL(__stdcall*IcmpCloseHandle)(HANDLE);
IcmpCreateFilefIcmpCreateFile;
IcmpSendEchofIcmpSendEcho;
;
BOOLInitFun(void)
{
HMODULElModl;
lModl=(HMODULE)LoadLibrary("Iphlpapi.dll");
if(lModl==0){
printf("Loadthelibraryhaserror! ");
returnFALSE;
}
else{
fIcmpCreateFile=(IcmpCreateFile)GetProcAddress(lModl,"IcmpCreateFile");
fIcmpSendEcho=(IcmpSendEcho)GetProcAddress(lModl,"IcmpSendEcho");
fIcmpCloseHandle=(IcmpCloseHandle)GetProcAddress(lModl,"IcmpCloseHandle");
if(fIcmpCreateFile==NULL||fIcmpSendEcho==NULL||fIcmpCloseHandle==NULL){
printf("Loadthefunctionhaserror! ");
returnFALSE;
}
returnTRUE;
}
}
LPHANDLEGetPingHandle(void)
{
HANDLEpHandle;
pHandle=fIcmpCreateFile();
if((int)pHandle==-1){
printf("LoadICMPhandlehaserror! ");
return0;
}
else{
return(LPHANDLE)pHandle;
}
}
BOOLPing(LPSTRpIPAddr)
{
HANDLEiHwnd;
iHwnd=(HANDLE)GetPingHandle();
IPAddrpAddr;
pAddr=(IPAddr)inet_addr((char*)pIPAddr);
icmp_echo_replypData;
for(inti=1;i<=LoopSend;i++)
{
fIcmpSendEcho(iHwnd,pAddr,NULL,0,NULL,(LPVOID)&pData,sizeof(icmp_echo_reply),0);
if(pData.Status==0)
{
printf("Ping測試返回的結果:Time=%dmsTTL=%d ",(int)pData.RoundTripTime,(int)pData.Options.Ttl);
}
else
{
printf("Ping測試失敗... ");
}
}
if(!fIcmpCloseHandle(iHwnd))printf("ClosehandlehasError! ");
returnTRUE;
}
至於main函數的話你可以自己寫,只要傳入一個IP地址給Ping函數就可以運行了
與它對應的VB模塊代碼
"iphlpapi.dll"()AsLong
"iphlpapi.dll"(ByValIcmpHandleAsLong,ByValDestinationAddressAsLong,ByValRequestDataAsString,ByValRequestSizeAsLong,ByValRequestOptionsAsLong,ReplyBufferAsICMP_ECHO_REPLY,ByValReplySizeAsLong,ByValTimeoutAsLong)AsLong
"iphlpapi.dll"(ByValIcmpHandleAsLong)AsLong
PrivateDeclareFunctioninet_addrLib"wsock32.dll"(ByValcpAsString)AsLong
PrivateTypeIP_OPTION_INFORMATION
ttlAsByte'『生存時間
TosAsByte'『服務類型
FlagsAsByte'『IP頭標志
OptionsSizeAsByte'『選項數據的大小，位元組
OptionsDataAsLong'『指向選項數據的指針
EndType
PrivateTypeICMP_ECHO_REPLY
AddressAsLong''『包含正回復的IP地址
StatusAsLong'『包含回復的狀態（參看後面的常量部分）
RoundTripTimeAsLong'『往返時間RTT(毫秒)
DataSizeAsInteger'『回復數據大小(位元組)
ReservedAsInteger'『保留
ptrDataAsLong'『指向回復數據的指針
OptionsAsIP_OPTION_INFORMATION'『回復選項
DataAsString*250
EndType
PublicTypeRtn_ICMPTestMessage
AddressAsString
StateAsString'''用函數寫
testSuccessAsBoolean'''是否成功測試
timeAsLong
sizeAsLong
ttlAsLong
EndType
(ByValTestIPAsString,ByValTimeoutAsLong,ByValPackSizeAsLong)AsRtn_ICMPTestMessage
DimIcmpHandleAsLong
IcmpHandle=IcmpCreateFile'''創建測試句柄
DimICMPReplyAsICMP_ECHO_REPLY
DimLongIPAddeAsLong
LongIPAddr=inet_addr(TestIP)
DimSendDataAsString'''''為了包大小而設置
SendData=Space(PackSize)
IcmpSendEchoIcmpHandle,LongIPAddr,SendData,Len(SendData),0,ICMPReply,Len(ICMPReply),Timeout
IfICMPReply.Status=0Then
RtnICMPTestMessage.Address=TestIP
RtnICMPTestMessage.size=ICMPReply.DataSize
RtnICMPTestMessage.State=RtnICMPState(ICMPReply.Status)
RtnICMPTestMessage.time=ICMPReply.RoundTripTime
RtnICMPTestMessage.ttl=ICMPReply.Options.ttl
RtnICMPTestMessage.testSuccess=True'''測試成功
Else
RtnICMPTestMessage.Address=TestIP
RtnICMPTestMessage.State=RtnICMPState(ICMPReply.Status)
RtnICMPTestMessage.testSuccess=False'''測試失敗
EndIf
IcmpCloseHandleIcmpHandle
EndFunction
④ 求易語言獲取本機wifi密碼源碼。
無線路由的
wpa2
密碼
很難破解
破無線密碼
是一個漫長而復雜的工序，本人親身經歷以來，得出以下結論：
1.破解密碼需要有一個熱鬧的網路。周邊無線越多越近越好.畢竟想攻擊路由器的無線，特別是wpa的，抓手包半天弄不上幾個。但他在下載、上傳時是很快的。
2.破解密碼電腦配置很重要，他需要大量的運算。本人用的又好又順手的是ewsa軟體，破解沒多久就讓電腦發熱。
3.字典很重要。人們大多數以自家電話號碼為無線密碼，如xxxx-xxxxxxx共十位。當你確定所在地區區號後010、07xx，以及所用的開頭189、133、139……經過字典生成器生成，測試詞有10^7個，如果每秒測試1000個，你得等上2.7個小時。
4.搞到他家電話號碼，自己試試吧。我這地區成功率大約20%5.投機取巧，輸入12345678、00000000或許能行ewsa軟體及beini奶瓶linux破解系統網上有，自己搜吧
⑤ 求用易語言寫的通過無線網卡連接無線路由器的程序源碼！不要模塊，程序越簡單越好！謝謝
這個有一個簡單的方法，不過你要找到你的無線路由器的服務名稱，找服務名稱不會可以找度娘，實在不行可以問我！
這里附上禁用源碼！只要把服務名稱填對就好了！
現在上面的服務名稱是我家的無線服務，由於路由器的不同，服務也可能不同，你可以找一下!
看不懂可以聯系我！
⑥ 易語言怎麼寫wifi連接軟體用什麼函數
看到這些垃圾回答我就生氣！！老是有人不懂裝懂，讓我來告訴你真正的答案，希望不會太晚。
網路搜「易語言資源網」，再在網內搜「易語言WiFi密碼連接源碼」你就能找到源碼了。
易語言WiFi密碼連接源碼常式程序結合易語言XML解析支持庫，調用API函數和易語言模塊連接WiFi，僅限WIN7使用，需要wlanapi.dll的支持。
⑦ 易語言免費wifi共享軟體代碼
netsh需要管理員許可權，用管理員許可權運行編譯文件或者管理員許可權運行易語言