diff --git a/docs/_guides/get.md b/docs/_guides/get.md index b45cdc1d..13e5d507 100644 --- a/docs/_guides/get.md +++ b/docs/_guides/get.md @@ -35,7 +35,7 @@ Public Function GetProject(Id As Long) As Dictionary ' ... ' {"data":{"id":1,"name":"Project 1"}} - If Response.StatusCode = WebStatus.Ok Then + If Response.StatusCode = WebStatusCode.Ok Then ' json response is automatically parsed based Request.Format Set GetProject = Response.Data("data") End If @@ -47,7 +47,7 @@ Public Function GetProject2(Id As Long) As Dictionary Dim Response As WebResponse Set Response = Client.GetJson("projects/" & Id) - If Response.StatusCode = WebStatus.Ok Then + If Response.StatusCode = WebStatusCode.Ok Then Set GetProject2 = Response.Data("data") End If End Function diff --git a/docs/_guides/overview.md b/docs/_guides/overview.md index 5d0f5838..65ef5123 100644 --- a/docs/_guides/overview.md +++ b/docs/_guides/overview.md @@ -48,7 +48,7 @@ Public Function GetProjects() As Collection ' ... ' {"data":[{"id":1,"name":"Project 1"},{"id":2,"name":"Project 2"}]} - If Response.StatusCode <> WebStatus.Ok Then + If Response.StatusCode <> WebStatusCode.Ok Then Err.Raise Response.StatusCode, "GetProjects", Response.Content Else ' Response is automatically converted to Dictionary/Collection by Request.Format diff --git a/docs/_guides/post.md b/docs/_guides/post.md index 6611d9bf..abe9ee30 100644 --- a/docs/_guides/post.md +++ b/docs/_guides/post.md @@ -29,7 +29,7 @@ Public Function CreateProject(Project As Dictionary) As Long ' ... ' {"data":{"id":3,"name":"new Project"}} - If Response.StatusCode <> WebStatus.Created Then + If Response.StatusCode <> WebStatusCode.Created Then Err.Raise Response.StatusCode, "CreateProject", _ "Failed to create project: " & Response.Content Else @@ -37,4 +37,4 @@ Public Function CreateProject(Project As Dictionary) As Long CreateProject = Response.Data("data")("id") End If End Sub -``` \ No newline at end of file +```