diff --git a/tests/testthat/test-download_result.R b/tests/testthat/test-download_result.R
index 04f60fc..5502c1b 100644
--- a/tests/testthat/test-download_result.R
+++ b/tests/testthat/test-download_result.R
@@ -2,6 +2,7 @@ context("download and load")
 
 
 test_that("download works", {
+  testthat::skip_on_cran()
   cancel()
   job <<- geoknife(stencil = c(-89,42), fabric = 'prism', wait=TRUE)
   file = download(job)
@@ -9,5 +10,6 @@ test_that("download works", {
 })
 
 test_that("load result works", {
+  testthat::skip_on_cran()
   expect_is(result(job),'data.frame')
 })
\ No newline at end of file
diff --git a/tests/testthat/test-query_webdatasets.R b/tests/testthat/test-query_webdatasets.R
index 2890ace..549b897 100644
--- a/tests/testthat/test-query_webdatasets.R
+++ b/tests/testthat/test-query_webdatasets.R
@@ -2,25 +2,30 @@ context("using query for webdata")
 
 
 test_that("webdata query returns a datagroup", {
+  testthat::skip_on_cran()
   datasets <<- query('webdata')
   expect_is(datasets, 'datagroup')
 })
 
 test_that("webdata query returns a list", {
+  testthat::skip_on_cran()
   wd <- webdata(datasets[4])
   expect_is(query(wd,'variables'), 'character')
 })
 
 test_that("webdata title returns a title", {
+  testthat::skip_on_cran()
   expect_is(title(datasets[4]), 'character')
 })
 
 test_that("webdata url returns a url", {
+  testthat::skip_on_cran()
   expect_is(url(datasets[4]), 'character')
   expect_is(url(datasets[4:5]), 'character')
 })
 
 
 test_that("webdata abstract returns an abstract", {
+  testthat::skip_on_cran()
   expect_is(url(datasets[4]), 'character')
 })
\ No newline at end of file
diff --git a/tests/testthat/test-query_webgeom.R b/tests/testthat/test-query_webgeom.R
index 029c3b3..d985ae5 100644
--- a/tests/testthat/test-query_webgeom.R
+++ b/tests/testthat/test-query_webgeom.R
@@ -2,6 +2,7 @@ context("query webgeom")
 
 
 test_that("query geoms", {
+  testthat::skip_on_cran()
   expect_is(query(webgeom(), 'geoms'),'character')
   wg <- webgeom(geom = "sample:CONUS_states",
                 attribute = "STATE",
@@ -12,6 +13,7 @@ test_that("query geoms", {
 })
 
 test_that("query attributes", {
+  testthat::skip_on_cran()
   wg <- webgeom(geom = "sample:CONUS_states",
               attribute = "STATE",
               values = "New Hampshire")
@@ -19,6 +21,7 @@ test_that("query attributes", {
 })
 
 test_that("query values", {
+  testthat::skip_on_cran()
   wg <- webgeom(geom = "sample:CONUS_states",
                 attribute = "STATE",
                 values = "New Hampshire")
diff --git a/tests/testthat/test-waitUntilFinished.R b/tests/testthat/test-waitUntilFinished.R
index 7b6ff54..aa12c94 100644
--- a/tests/testthat/test-waitUntilFinished.R
+++ b/tests/testthat/test-waitUntilFinished.R
@@ -4,6 +4,7 @@ stencil <- webgeom('state::Wisconsin')
 fabric <- webdata('prism')
 
 test_that("creating simple job", {
+  testthat::skip_on_cran()
   geoknife:::setJobState('none')
   geoknife(stencil, fabric, wait = TRUE)
   expect_equal(geoknife:::getJobState(), "Process successful")