编写程序自动登录Gmail

原创 2005年05月23日 23:19:00

Dim Flag As Boolean

Private Sub form_load()
    On Error Resume Next
    URL = "http://gmail.google.com"
    wb.Navigate URL
End Sub

Private Sub Command1_Click()
    Dim vDoc, vTag
    Dim i As Integer
     
    If Flag = False Then
        MsgBox "请稍等。。。"
        Exit Sub
    End If
    Set vDoc = wb.Document
    For i = 0 To vDoc.All.length - 1
        If UCase(vDoc.All(i).tagName) = "INPUT" Then
            Set vTag = vDoc.All(i)
            If vTag.Type = "text" Or vTag.Type = "password" Then
                'List1.AddItem vTag.Name
                Select Case vTag.Name
                    Case "Email"
                        vTag.Value = Text1.Text
                    Case "Passwd"
                        vTag.Value = Text2.Text
                End Select
            ElseIf vTag.Type = "submit" Then
                vTag.Click
            End If
        End If
    Next i
End Sub

Private Sub Command2_Click()
    Unload Me
End Sub

Private Sub wb_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Flag = True
End Sub

华为机试样题解析:已知2条地铁线路,其中A为环线,B为东西向线路,线路都是双向的。经过的站点名分别如下,两条线交叉的换乘点用T1、T2表示。 编写程序,任意输入两个站点名称,输出最少需要经过的站点数

#include "stdafx.h" #include #include #include #include #include #include using namespa...

编写程序将C / C++代码中的注释去掉

今天看到一道题,觉得可以拿来锻炼一下。就自己做了一遍。原题链接:关于程序员面试宝典中5.8节面试例题:编写一个函数,实现把C/C++程序代码中的注释去掉/***********************...

用unity来写 二维数组编写程序定义一个二维数组arr,该数组一共有4行3列,如下表所示,请把下表中的所有对应数据利用赋值语句赋值到该二维数组arr中去arr 第0列第1列第2列第0行第1行第2行第

用unity来写 二维数组编写程序定义一个二维数组arr,该数组一共有4行3列,如下表所示,请把下表中的所有对应数据利用赋值语句赋值到该二维数组arr中去arr 第0列第1列第2列第0行第1行第2行第...
  • wjr5210
  • wjr5210
  • 2015年03月06日 08:24
  • 1897

编写程序判断大小端的两种方法

大小端这个问题在面试过程中偶尔会被问到,这里笔者总结了一下,提出了两个小程序进行判断,欢迎大伙查看指教 第一种:联合(union)方式判断法 在union中所有的数据成员共用一个空间,同一时间...

5、 java 编写程序拷贝一个文件, 尽量使用效率高的方式.

一、要完成这个程序需要了解的知识点: 1、编写简单的java程序,比如hello world ---废话了。。。。哈哈 2、了解java的文件操作 3、了解java的buffer操作 4、对文...

ArrayList的练习 编写程序实现对Employee类的排序

package com.my.day7_16task; import java.util.ArrayList; import java.util.Collections; import java.ut...

在扑克牌游戏中,每次游戏开始都要求把54张牌重新排列一下,称为洗牌。试编写程序将一副扑克牌(用54个整数1~54表示)随机洗好后,顺序输出54张牌的情况。

问题及代码: /* *Copyright (c) 2016,烟台大学计算机学院 *All rights reserved. *文件名称:main.cpp *作 者:李磊涛 *完成时间:2016...

运用Java JDBC编写程序向MySQL中插入数据

package operateRDBMS; import java.util.*; import java.io.*; import java.sql.*; public class Inse...
  • ilmlj
  • ilmlj
  • 2014年05月04日 14:28
  • 1444

编写程序的目的?为什么要学习编程

在我看来我们写程序的目的就是去解决一些我们日常生活中的问题,由于我们大脑处理信息能力的速度有时会比电脑慢,所以我们写一段代码来教计算机去怎么处理这些信息,最后去输出我们想要的结果。而中间具体处理的过程...

编写程序,拷贝一个带内容的文件夹

package com.heima.question8; import static org.junit.Assert.assertEquals; import java.io.File; imp...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:编写程序自动登录Gmail
举报原因:
原因补充:

(最多只允许输入30个字)