Gå til innhold
  • Bli medlem
Støtt hjemmeautomasjon! 🥇🥈🥉

SCRIPT: Sjekk postleveranse

Moskus

Av Moskus
i Scripts

 Del

Anbefalte innlegg

Moskus Automatiker

Moskus

Skrevet
  • Forfatter
Skrevet

Prøv å legg til dette under linjen som begynner med "Using client as..."
  

Net.ServicePointManager.SecurityProtocol = Net.SecurityProtocolType.Tls12

 

... som vist i første post.

  • Thanks 1
  • 2 uker senere...
  • Svar 76
  • Opprettet
  • Siste svar

Mest aktive i denne tråden

Populære dager

Mest aktive i denne tråden

Populære dager

Populære innlegg

Moskus
Moskus

Et script som sjekker når du får levert post. 1. Du trenger en referanse til Newtonsoft.Json i ScriptingReferences. 2. Du trenger en virtuell device uten knapper eller statuser. 3. Du t

daniel.h.iversen
daniel.h.iversen

Ser ut som posten har oppdaget at det ikke lenger er 2020. Denne ser ut til å fungere https://www.posten.no/levering-av-post/_/component/main/1/leftRegion/1?postCode= 

Terje Klungervik
Terje Klungervik

Fant feilen.    Manglet .vb i navnet på scriptet...

Postede bilder

EvenW Fjernstyrer

EvenW

Skrevet
Skrevet
  daniel.h.iversen skrev (På 16.9.2021 den 6.17):

Ser ut som posten har oppdaget at det ikke lenger er 2020.

Denne ser ut til å fungere
https://www.posten.no/levering-av-post/_/component/main/1/leftRegion/1?postCode= 

Ekspander  

 

Ser ut til at ny URL er: https://www.posten.no/levering-av-post/_/service/no.posten.website/delivery-days?postalCode=1234

 

Usikkert om alle disse request headerne er nødvendig, men kp-api-token må inn uansett (vet ikke hvor jeg får ny fra):

  1. accept:
    */*
  2. accept-encoding:
    gzip, deflate, br
  3.  
    accept-language:
    nb-NO,nb;q=0.9,no;q=0.8,nn;q=0.7,en-US;q=0.6,en;q=0.5,da;q=0.4,sv;q=0.3
  4. cookie:
    onprem_posten_kp_miniapp=1|ZEp6D|ZEp54
  5. dnt:
    1
  6. kp-api-token:
    401e9239MTY4MjYwMjkxNQ
  7. referer:
 
Hadde vært kult om noen finner ut av dette.
  • Like 1
Moskus Automatiker

Moskus

Skrevet
  • Forfatter
Skrevet

Sukk, jeg har prøvd alt det over, men får ikke svar utenom 418 "I'm a teapot". Morsomme folk hos Posten.

 

image.png

 

 

Her er det sikkert flinkere folk enn meg som kan svare på:

Hvorfor finner jeg ingenting i DevConsole?

 

image.png

EvenW Fjernstyrer

EvenW

Skrevet
Skrevet

Token må byttes ut med jevne mellomrom. Uten riktig token får du 418 I'm a teapot (som betyr noe i den duren at den ikke kan lage kaffe i en tekanne..) Med riktig token får du json tilbake. Kan virke som om Posten har laget eller holder på å lage en API, men jeg finner ingen informasjon om dette noe sted.

ZoRaC Blåtannlege

ZoRaC

Skrevet
Skrevet
  JohnMartin skrev (På 28.4.2023 den 19.36):

Funnet en løsning til Home Assistant, men skjønner ikke så mye av det 😛


Broken after Home Assistant OS 10.1 update · Issue #9 · BobTheShoplifter/HomeAssistant-Posten · GitHub

Ekspander  


Metoden i siste kommentar funket hos meg i hvertfall, så da er det bare å finne ut hvordan man sender samme kall med VB.Net. 🙂 

 

https://github.com/BobTheShoplifter/HomeAssistant-Posten/issues/9#issuecomment-1527634490

mroek WAF-maker

mroek

Skrevet
Skrevet
  ZoRaC skrev (På 28.4.2023 den 20.41):


Metoden i siste kommentar funket hos meg i hvertfall, så da er det bare å finne ut hvordan man sender samme kall med VB.Net. 🙂 

 

https://github.com/BobTheShoplifter/HomeAssistant-Posten/issues/9#issuecomment-1527634490

Ekspander  

 

Men det forutsetter vel at man har en Mybring-konto? Kan alle (inkludert privatpersoner) få det sånn uten videre (har ikke sjekket, så kanskje dumt spørsmål)?

ZoRaC Blåtannlege

ZoRaC

Skrevet
Skrevet
  mroek skrev (På 28.4.2023 den 20.47):

 

Men det forutsetter vel at man har en Mybring-konto? Kan alle (inkludert privatpersoner) få det sånn uten videre (har ikke sjekket, så kanskje dumt spørsmål)?

Ekspander  


Ja, krever MyBring-konto. Jeg registrerte meg bare her:

https://www.mybring.com/signup/register/user
 

Men jeg har et enkeltpersonforetak jeg kunne oppgi som firmanavn da… men det virket ikke å være noe de validerer, for de ba ikke om org.nr. 

mroek WAF-maker

mroek

Skrevet
Skrevet

Jeg hadde også et enkeltpersonforetak inntil nylig, men siden jeg ikke hadde noen omsetning i det, så ble det (tvangs)slettet av myndighetene. Det ble i sin tid opprettet primært for å kunne kjøpe .no-domene, for den gangen måtte man ha et orgnummer for å kunne gjøre dette.

 

Uansett, som du sa så var det ikke noe problem å registere seg hos Mybring uten orgnummer, men det kan vel tenkes at hvis det blir et oppsving i slike registreringer nå, så blir det innstramminger der også...

ZoRaC Blåtannlege

ZoRaC

Skrevet
Skrevet

Her er fikset versjon. 🙂 

Krever MyBring-konto. 

 

Man må legge inn rett postnummer, e-postadresse og API-key på rett sted i koden. 

 

Sub Main(ByVal params As Object)
        Dim devRef As Integer = 6560
        Dim url As String = "https://api.bring.com/address/api/no/postal-codes/POSTNUMMER/mailbox-delivery-dates"

        Dim source As String = ""
Try
            Using client As New System.Net.WebClient
                client.Headers.Add("x-mybring-api-uid", "EPOST-ADRESSE")
                client.Headers.Add("x-mybring-api-key", "API KEY")
                 client.BaseAddress = url
                source = client.DownloadString(url)
            End Using

            Dim json As Object = Newtonsoft.Json.JsonConvert.DeserializeObject(Of Object)(source)
hs.writelog("Posten", json.tostring)
            Dim output As String = json.item("delivery_dates").item(0).tostring
         

hs.writelog("Posten", output)

 Dim ci = New System.Globalization.CultureInfo("nb-NO")
 Dim nestePostdag As Date = DateTime.Parse((output), ci)
          
          Dim dagerTilPost As Integer = nestePostdag.Date.Subtract(Now.Date).Days

 

If dagerTilPost = 0 Then
  output = "I dag"
Else If dagerTilPost = 1 Then
  output = "I morgen"
Else
  output = nestePostdag.ToString("ddd d. MMM", ci)
End If

            hs.SetDeviceValueByRef(devRef, dagerTilPost, True)
            hs.SetDeviceString(devRef, output, False)
        Catch ex As Exception
            hs.SetDeviceValueByRef(devRef, -1, True)
            hs.SetDeviceString(devRef, "Feil: " & ex.Message, False)
        End Try
    End Sub

  • Like 1
Moskus Automatiker

Moskus

Skrevet
  • Forfatter
Skrevet
  ZoRaC skrev (På 28.4.2023 den 20.49):

a, krever MyBring-konto. Jeg registrerte meg bare her:

https://www.mybring.com/signup/register/user
 

Men jeg har et enkeltpersonforetak jeg kunne oppgi som firmanavn da… men det virket ikke å være noe de validerer, for de ba ikke om org.nr. 

Ekspander  

Krever ikke firmanavn eller noe annet. Jeg oppgav kun navn, epost og telefon, og det gikk gjennom.

  • Like 1
ZoRaC Blåtannlege

ZoRaC

Skrevet
Skrevet
  Moskus skrev (På 29.4.2023 den 7.20):

Første post nå oppdatert. Utvidet scriptet ditt litt, @ZoRaC , for jeg syntes det er greit å få med de neste dagene også... 🙂

 

Ekspander  


Jeg viser infoen på startskjermen til HSTouch på mobilen, så jeg hadde redigert ditt script til å vise bare én dag. 🙂 

 

Forhåpentligvis vil det funke «evig» nå da, siden vi bruker et offisielt API! 🙂 

 

 

  Moskus skrev (På 27.7.2020 den 10.30): 
nextDate.ToString("dddd d. MMM")
Ekspander  


Denne bør endres til:

Dim ci = New System.Globalization.CultureInfo("nb-NO")

nextDate.ToString("dddd d. MMM", ci)


Da får man navn på dager og måneder på norsk, selv om man kjører engelsk språk i OS på serveren. 🙂 

 

Moskus Automatiker

Moskus

Skrevet
  • Forfatter
Skrevet
  ZoRaC skrev (På 29.4.2023 den 7.29):

Denne bør endres til:

Dim ci = New System.Globalization.CultureInfo("nb-NO")

nextDate.ToString("dddd d. MMM", ci)

Ekspander  

Tja... det er jo et valg, da. 😉

På Windows vil min versjon gi datoer på engelsk hvis man har satt Globalization til "Norwegian", selv om OSet er på engelsk.

 

Men personlig ville jeg endret den til dette (hvis man synes det er viktig): 

nextDate.ToString("dddd d. MMM",  New System.Globalization.CultureInfo("nb-NO"))

😉

 

ZoRaC Blåtannlege

ZoRaC

Skrevet
Skrevet
  Moskus skrev (På 30.4.2023 den 18.00):

På Windows vil min versjon gi datoer på engelsk hvis man har satt Globalization til "Norwegian", selv om OSet er på engelsk.

Ekspander  


Og hvorfor vil du ha datoene på engelsk? 

 

Jeg et sikkert ikke den eneste som har engelsk oppsett på serveren, men likevel ønsker at dagene står på norsk. 🙂 

 

  Moskus skrev (På 30.4.2023 den 18.00):

Men personlig ville jeg endret den til dette (hvis man synes det er viktig): 

nextDate.ToString("dddd d. MMM",  New System.Globalization.CultureInfo("nb-NO"))
Ekspander  


Siden jeg har CI to steder (ikke sikkert det trengs med det nye formatet?), så er det vel bedre å initiere den én gang og gjenbruke den i en variabel? I tillegg er det mer lesbart på mobilen å ha det på to separate linjer, for det er på mobilen jeg som regel programmerer. 😛 

aarpi3 Bitfikler

aarpi3

Skrevet
Skrevet

Takk for oppdateringen av scriptet.

Jeg fikk oppdatert og "Status" gir de 4 siste leveransene, men jeg får ikke "Value" til å oppdatere seg (står på 0). Er det bare jeg som har gjort noe feil?

 

Erling Kodemaker

Erling

Skrevet
Skrevet
  Moskus skrev (På 27.7.2020 den 10.30):

EDIT: Takk til @daniel.h.iversen som fant ut at Posten har oppdaget at 2020 var i fjor. 👍

EDIT2: Takk til @DeVille som fant ut at siste 1 skal erstattes med 9.

EDIT3: Takk til @ZoRaC for sin oppdatering etter API-omleggingen hos Posten versjon som jeg bygget litt videre på.

Ekspander  

 

takk takk, oppdatert i kveld. ting tar tid...

Moskus Automatiker

Moskus

Skrevet
  • Forfatter
Skrevet
  aarpi3 skrev (På 8.5.2023 den 18.00):

Jeg fikk oppdatert og "Status" gir de 4 siste leveransene, men jeg får ikke "Value" til å oppdatere seg (står på 0). Er det bare jeg som har gjort noe feil?

Ekspander  

Jeg må sjekke dette i morgen, tydeligvis. Jeg får post i dag så den er 0 slik den skal.

Fjosepose Bitfikler

Fjosepose

Skrevet
Skrevet (endret)
  Moskus skrev (På 29.4.2023 den 7.20):

Første post nå oppdatert. Utvidet scriptet ditt litt, @ZoRaC , for jeg syntes det er greit å få med de neste dagene også... 🙂

 

Ekspander  

Har klikkt&søkt....finnes det et sted her på siden hvor det oppdaterte scriptet er?

Endret av Fjosepose
typos
  • 8 måneder senere...
Daniel_hoy Kabelfører

Daniel_hoy

Skrevet
Skrevet
  Moskus skrev (På 9.5.2023 den 8.29):

Jeg må sjekke dette i morgen, tydeligvis. Jeg får post i dag så den er 0 slik den skal.

Ekspander  

Oppdaterte endelig til det nye fungerende scriptet, men har samme problem med at value står på 0. Har hatt samme status siden fredag når jeg oppdaterte scriptet.

Bli med i samtalen

Du kan publisere innhold nå og registrere deg senere. Hvis du har en konto, logg inn nå for å poste med kontoen din.

Gjest
Skriv svar til emnet...

×   Du har limt inn tekst med formatering.   Lim inn uten formatering i stedet

  Du kan kun bruke opp til 75 smilefjes.

×   Lenken din har blitt bygget inn på siden automatisk.   Vis som en ordinær lenke i stedet

×   Tidligere tekst har blitt gjenopprettet.   Tøm tekstverktøy

×   Du kan ikke lime inn bilder direkte. Last opp eller legg inn bilder fra URL.

×
 Del
Gå til emneliste


×
×
  • Opprett ny...

Viktig informasjon

Vi har plassert informasjonskapsler/cookies på din enhet for å gjøre denne siden bedre. Du kan justere dine innstillinger for informasjonskapsler, ellers vil vi anta at dette er ok for deg.