当前位置：首页 » 网页设计 » 网页登陆器

网页登陆器

发布时间: 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. 账号太多想要一个网页登陆器用于多个网站的自动登陆

登录网页的时候都有个勾选，自动登录的。
只要关闭浏览器的时候，不要删除相关信息即可。

阅读全文

网页登陆器

与网页登陆器相关的阅读推荐