VBA - 从唯一文本框/下拉日历中提取日期/时间

时间:2016-12-28 17:02:17

标签: excel vba excel-vba

我使用VBA试图从网站上刮取时间/日期。我试图从中提取它的项目是一个文本框,它会导致下拉日历。在文本框的内部,我可以看到并选择我想要提取的文本。这是HTML:

public function gettemples($latitude, $longitude, $distance, $templetype, $limitno){
        $this->connect();
        // $query = "SELECT * FROM temples";

        $query = "SELECT *, ( 6371 * acos( cos( radians(".$latitude.") ) * cos( radians( latitude ) ) * 
            cos( radians( longitude ) - radians(".$longitude.") ) + sin( radians(".$latitude.") ) * 
            sin( radians( latitude ) ) ) ) AS distance FROM temples HAVING
            distance < ".$distance." ORDER BY distance LIMIT 0 , ".$limitno."";
                $stmt = $this->connection->prepare($query);
                $result = $stmt->execute();
                $results = $stmt->fetchAll(PDO::FETCH_ASSOC);
                return $results;
    }

在文本框的内部,它说,&#34; mm / dd / yyyy hh:mm PM - mm / dd / yyyy hh:mm PM&#34;。

当我尝试抓取内部文本时,不会返回任何内容。以下是我尝试使用的代码示例:

<input type="text" date-begin="ac.Start" date-end="ac.Finish" ng-model="Data.estRange" ng-change="updateDuration()" size="45" style="display:inline;" name="estRange" id="estRange" value="" rangepicker="" class="ng-isolate-scope ng-valid ng-dirty ng-valid-date-range">

有关如何正确执行此操作的任何想法?谢谢!

1 个答案:

答案 0 :(得分:0)

Per Sorceri(谢谢!),

即使ele.Value字符串在HTML中列为空白,也可以在列出的日期/时间中正确拉出.value数据,并对代码进行一次修改(更改ele.tagname)。这是正确的代码。

DEBUG