• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

redirect querytables.add

Status
Niet open voor verdere reacties.

geep1980

Gebruiker
Lid geworden
7 apr 2009
Berichten
348
Ik wil voor mijn werk gegevens importen van een interne webpagina.
Voor de pagina moet je echter inloggen alvorens je gegevens op kunt halen.

Ik laat d.m.v. msgbox de user en het wachtwoord invoeren door de gebruiker.
Dit wordt samen met een aantal andere html regels op een sheet gezet en geexporteerd naar een html file op bijvoorbeeld de C-schijf van de gebruiker.
De inhoud van de file ziet er alsvolgt uit:

<form action="http://ONZE SERVER/cacti/index.php" name="auth_cacti" method="post" TARGET="_self">
<input type="hidden" name="action" value="login">
<input type="hidden" name="realm" value="local">
<input type="hidden" name="login_username" value="GEBRUIKER">
<input type="hidden" name="login_password" value="WACHTWOORD">
</form>
<script language="javaScript" type="text/javascript">
document.forms['auth_cacti'].submit();
</script>

Nu wil ik daarna d.m.v. querytables.add gegevens importeren:

With Sheet9.QueryTables.Add(Connection:= _
"URL;\\h:\export.html" _
, Destination:=Sheet9.Range("$A$1"))
.Name = "index"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlAllTables
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With


Ik krijg echter de volgende melding:
Run-time error '1004':
The address of this site is nog valid. Check the address and try again

Heeft iemand een idee wat ik verkeerd doe?
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan