所需对象:在VBA中单击动态生成的链接时出错

时间:2016-06-22 21:14:57

标签: javascript html excel vba excel-vba

我对VBA比较陌生,正在使用VBA解析网站。这个网站有动态生成的表格元素和分页。

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text.RegularExpressions;
using System.Web;
using WebMatrix.Data;


/// <summary>
/// Summary description for PostHandler
/// </summary>
public class PostHandler : IHttpHandler
{
    public PostHandler()
    {
        //
        // TODO: Add constructor logic here
        //
    }

    public bool IsReusable
    {
        get { return false; }
    }

    public void ProcessRequest(HttpContext context)
    {
        var title = context.Request.Form["postTitle"];
        var content = context.Request.Form["postContent"];
        var slug = CreateSlug(title);


        using (var db = Database.Open("DefaultConnection"))

        {

            var sql = "SELECT * FROM Posts WHERE Slug = @0";

            var result = db.QuerySingle(sql, slug);




            if (result != null) {

                throw new HttpException(409, "SLUG IS ALREADY IN USE!");

            }

            sql = "INSERT INTO Posts (Title, Content, AuthorId, Slug" +
                    "VALUES (@0, @1, @2, @3)";
            db.Execute(sql, title, content, 1, slug);
        }
    }


    private static string CreateSlug(String title)
    {
        title = title.ToLowerInvariant().Replace(" ", "-");
        title = Regex.Replace(title, @"[^0-9a-z-]", string.Empty);

        return title;
    } 
}

点击下一步后,上一页按钮出现在下一页

var result = db.QuerySingle(sql, slug);

因此,要点击下一个链接,我在VBA中制作了以下代码:

<a onclick="showPage(this.href); return false;" href="/member-finder?p=2" class="paginationLink">Next &gt;</a>

但是在第一页之后,我无法以某种方式点击下一个链接,因为我总是有一个&#34;运行时错误424:对象需要错误&#34;。我不知道为什么。如果我声明jocation = doc.getElementsByClassName(&#34; paginationLink&#34;)(0) 单击上一个链接。但我想点击下一个链接。尝试将Jocation声明为IHTMLElement,但在达到2nd时收到自动化错误或未指定的错误。这是一个问题,因为链接是动态加载的,但如果它在&#34;之前的&#34;链接,为什么不在&#34; next&#34;链接。我试着在这里搜索,但无法找到满意的答案。

0 个答案:

没有答案
相关问题