當前位置：首頁 » 網頁設計 » 網頁登陸器

網頁登陸器

發布時間: 2021-03-29 14:35:16

1. 軟體登陸與瀏覽器網頁登陸的區別如何識別是軟體還是網頁登陸

如果都是http方式(get/post)的話，伺服器是分不出來，瀏覽器本身也是軟體啊

2. 網頁登陸器

最好是能刷新能停止，能保存歷史記錄就更好了。
用VB吧，很簡單的。

3. 怎樣做易語言網頁登陸器

.版本 2
.支持庫 eAPI

.程序集窗口程序集1

.子程序 _按鈕1_被單擊

打開指定網址 (「http://」＋編輯框內1.內容容＋「/logging.php?action=login&loginfield=username&username=」＋編輯框2.內容＋「&password=」＋編輯框3.內容＋「&loginsubmit=%CC%E1%B」)
1是輸入論壇網址
2是輸入用戶名
3是輸入密碼
像網頁登入的代碼就得你自己找下了
你要是想在軟體上打開就加個超文本瀏覽框
打開指定網址換成超文本瀏覽框1.跳轉

超文本瀏覽框1.跳轉(「http://」＋編輯框1.內容＋「/logging.php?action=login&loginfield=username&username=」＋編輯框2.內容＋「&password=」＋編輯框3.內容＋「&loginsubmit=%CC%E1%B」)

4. 用VB製作一個簡易的網頁登陸器

你是直接在VB中載入登錄窗口進行登錄，還是在瀏覽器中做插件進行登錄？

在VB中進行登錄：

'函數功能：登陸網頁
'輸入參數：WB:webbrower控制項，sURL：網址，OverTime：超時時間，UserName：用戶名，UserPWD：用戶密碼，InPutName：用戶名輸入框，InPutPWD：密碼輸入框，LoginFrom：登陸窗體，BtnName：登陸按鈕名字
'輸出參數：無
'返回值：True：成功，false：失敗
'******************************************************************
PublicFunctionLoginUrl(WBAsWebBrowser,sURLAsString,OverTimeAsLong,UserNameAsString,UserPWDAsString,InputNameAsString,InputPWDAsString,LoginFromAsString,BtnNameAsString)AsBoolean
OnErrorGoToerrorHandle
bhtmlFlag=False
SetsDocument=WB.Document
sDocument.getElementById(InputName).Value=UserName
sDocument.getElementById(InputPWD).Value=UserPWD
IfBtnName=""Then
sDocument.Forms(LoginFrom).submit
Else
sDocument.getElementById(BtnName).Click
EndIf
IfHtmlOverTime(OverTime,sURL)=1Then'判斷超時
LoginUrl=False
InsertLog"登陸網址："&sURL&"失敗！",1
ExitFunction
EndIf
LoginUrl=True
ExitFunction
errorHandle:
InsertLog"錯誤號:"&Err.Number&"錯誤描述:"&Err.Description,1
Debug.PrintErr.Description
Err.Clear
EndFunction
'******************************************************************
'創建日期：2008-10-28
'函數功能：判斷網頁打開是否超時
'輸入參數：sTime：超時時間
'輸出參數：無
'返回值：0:成功，1：失敗
'******************************************************************
PublicFunctionHtmlOverTime(sTimeAsLong,sURLAsString)AsLong
t=GetTickCount
DoUntilbHtmlFlag=True
DoEvents
IfGetTickCount-t>sTimeThen
InsertLog"打開網址："&sURL&"失敗！",1
HtmlOverTime=1
ExitFunction
EndIf
Loop
HtmlOverTime=0
EndFunction

如果用插件的復雜一些，可以查找olelib的知識

'引用olelib實現IObjectWithSite介面來獲得IE對象
Implementsolelib.IObjectWithSite
'
PrivateWithEventsm_IEObjAsInternetExplorer
Attributem_IEObj.VB_VarHelpID=-1
Privatem_siteAsolelib.IUnknown
PrivatesDocAsNewMSHTML.HTMLDocument

PrivateSubIObjectWithSite_GetSite(riidAsolelib.UUID,ppvSiteAsstdole.IUnknown)
m_site.QueryInterfaceriid,ppvSite
EndSub

PrivateSubIObjectWithSite_SetSite(ByValpUnkSiteAsstdole.IUnknown)

Setm_site=pUnkSite
Setm_IEObj=pUnkSite
EndSub


'========================================================
'網頁載入完成後要處理
'
'
'========================================================
PrivateSubm_IEObj_DocumentComplete(ByValpDispAsObject,URLAsVariant)
OnErrorResumeNext
DimstrHTMLAsString
DimstrScriptAsString

DimscDocAsNewMSHTML.HTMLDocument

DimsHeadAsIHTMLHeadElement
DimsElementAsIHTMLElement

'獲取Script腳本內容
strScript=getHTMLScript
'MsgBoxURL


IfInStr(URL,"zs/browseShenbao.do?formId=")>0Then
'獲取添加按鈕的html語句
strHTML=GetIni("HTML","String1",App.Path&"HtmlMark.ini")
SetsDoc=m_IEObj.Document
SetscDoc=sDoc.parentWindow.Document.frames("workspace").Document.frames("top_Frame").Document
SetscDoc=scDoc.frames("mainFrame").Document
'獲取HEAD頭的對象
SetsHeads=scDoc.getElementsByTagName("HEAD")
SetsHead=sHeads(0)
'創建script的節點
SetsElement=scDoc.createElement("script")
sElement.setAttribute"language","JavaScript"
sElement.setAttribute"text",strScript
'把script的節點插入到head中
CallsHead.insertBefore(sElement,Null)
'把按鈕的html語句插入到頁面中
scDoc.body.innerHTML=scDoc.body.innerHTML&strHTML

EndIf
'
IfInStr(URL,"/initArchive.do")>0Then
SetsDoc=m_IEObj.Document
'獲取添加按鈕的html語句
strHTML=GetIni("HTML","String2",App.Path&"HtmlMark.ini")

SetscDoc=sDoc.parentWindow.Document.frames("workspace").Document.frames("top_Frame").Document
SetscDoc=scDoc.frames("mainFrame").Document
'獲取HEAD頭的對象
SetsHeads=scDoc.getElementsByTagName("HEAD")
SetsHead=sHeads(0)
'創建script的節點
SetsElement=scDoc.createElement("script")
sElement.setAttribute"language","JavaScript"
sElement.setAttribute"text",strScript
'把script的節點插入到head中
CallsHead.insertBefore(sElement,Null)
'把按鈕的html語句插入到頁面中
scDoc.body.innerHTML=scDoc.body.innerHTML&strHTML

EndIf
'檔案查詢頁面
IfInStr(URL,"/showDangAn.do?")>0Then
SetsDoc=m_IEObj.Document
'獲取添加按鈕的html語句
strHTML=GetIni("HTML","String3",App.Path&"HtmlMark.ini")
'MsgBox"strHTML---------"&strHTML
'MsgBoxsDoc.body.innerHTML
SetscDoc=sDoc.parentWindow.Document.frames("workspace").Document.frames("top_Frame").Document
SetscDoc=scDoc.frames("mainFrame").Document

'MsgBoxscDoc.body.innerHTML
'獲取HEAD頭的對象
SetsHeads=scDoc.getElementsByTagName("HEAD")
SetsHead=sHeads(0)
'創建script的節點
SetsElement=scDoc.createElement("script")
sElement.setAttribute"language","JavaScript"
sElement.setAttribute"text",strScript
'把script的節點插入到head中
CallsHead.insertBefore(sElement,Null)
'把按鈕的html語句插入到頁面中
scDoc.body.innerHTML=scDoc.body.innerHTML&strHTML

EndIf

EndSub

5. 百度電腦版網頁登錄

你只要用你的網路賬號登錄網頁版網路雲就可以了，我目前使用的是360雲盤，個人感覺也不錯。

6. 求一個網頁游戲登錄器

。額，我2年的網頁游戲年齡了。呵呵，如果網頁游戲卡的話，點工具，然後Internet選項然後刪除文件，刪完離線文件後，右邊有個設置、然後使用的磁碟空間默認是1MB,你改成1024MB就OK了。。。。告訴你，我都是這里有玩的網頁游戲哦。主要是還可以返利。 http://fan.230web.com/index.html ，

7. 為什麼我所有的網頁游戲登陸器都無法登陸

1、首先檢查是否連接到網路
2、檢查登陸器是否正常
3、卸載登陸器，重新安裝

8. 電腦怎麼用網頁登陸伺服器

在瀏覽器地址里輸入：FTP://你的伺服器IP地址/ 就這樣即可

進入頁面後會彈出窗口提示叫你輸入賬戶才可以訪問

看看截圖吧：

填寫用戶名和密碼後登錄即可進入。

9. 怎麼通過網頁登陸設置路由器

首先看路由器的背面，應該寫有路由器的管理ip地址和用戶名密碼等信息，先記下來後面會用到。

然後拿一根網線，一端插到無線路由器的lan口(一般路由器都有四個黃色的介面，選擇其中任意一個即可)，網線另一端插到電腦上。

將路由器通電，到電腦中依次點「開始」-「運行」-「ncpa.cpl」，回車進入網路適配器管理頁面，找到本地網卡，確定其ip地址是自動獲取，並能正常從路由器獲取到ip地址。

完成以上步驟後，打開電腦的IE瀏覽器，在地址欄輸入路由器背後的管理地址(比如tp-link路由器一般為192.168.1.1)，回車後打開路由器管理頁面，輸入路由器背面的用戶名和密碼即可。

10. 賬號太多想要一個網頁登陸器用於多個網站的自動登陸

登錄網頁的時候都有個勾選，自動登錄的。
只要關閉瀏覽器的時候，不要刪除相關信息即可。

閱讀全文

網頁登陸器

與網頁登陸器相關的閱讀推薦