Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Slanje http request

[es] :: Access :: Slanje http request

[ Pregleda: 1215 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

ombrs.do
Ristic Aleksandar
Administrator

Član broj: 170168
Poruke: 140
62.68.108.*



Profil

icon Slanje http request18.01.2018. u 18:14 - pre 75 meseci
Pozdrav svima.
Zamolio bih ako mi mozete pomoci u sljedece.
Trebam da posaljem odredjeni red u tabeli putem http request a i da iscitam isti respond.Dobio sam korisnicki nalog (user i password) i link na koji treba to da posaljem.Skidao sam kodove ali nisam uspio.Podatke iz tabele trebaju da budu prilagodjeni za json.
U svakom requst-u u zaglavlju trebaju biti podaci user i password.
Hvala unaprjed.
Pozdrav.
 
Odgovor na temu

ombrs.do
Ristic Aleksandar
Administrator

Član broj: 170168
Poruke: 140
62.68.108.*



Profil

icon Re: Slanje http request21.01.2018. u 14:08 - pre 75 meseci
Private Sub Command11_Click()

Dim xmlhttp As New MSXML2.xmlhttp
Dim myurl As String
Dim user As String
Dim Password As String
Dim strJSONToSend As Variant

myurl = "http://111.111.111.11:81/XXXXX/api/integracija?ZahtjevId=0"

user = "someusername"
Password = "somepassword"

strJSONToSend = "{""type"": ""note"", ""title"": ""Alert"", ""body"": ""Lorem Ipsum Lorem Ipsum Lorem Ipsum.""}"

xmlhttp.Open "POST", myurl, False

xmlhttp.setRequestHeader "Content-Type", "text/json"
xmlhttp.setRequestHeader "Authorization", AuthCredentials
xmlhttp.setRequestHeader "Authorization", "Basic " + Base64Encode(user + ":" + Password)
xmlhttp.Send strJSONToSend

MsgBox (xmlhttp.responseText)
Me.txtOutput = xmlhttp.responseText
End Sub
 
Odgovor na temu

ombrs.do
Ristic Aleksandar
Administrator

Član broj: 170168
Poruke: 140
62.68.108.*



Profil

icon Re: Slanje http request21.01.2018. u 14:09 - pre 75 meseci
Da li je ovo ok ili treba korigovati posto radim napamet jer nemam pristupne podatke jos?
Hvala unaprijed
 
Odgovor na temu

[es] :: Access :: Slanje http request

[ Pregleda: 1215 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.