Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Дмитрий Нормуль
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
WinHttpRequest, JSon: не видно параметров
 
#
13.11.2015 14:45:09
Друзья, привет!
Пытаюсь грузить данные в excel через запрос к вебстранице.
Объявляю sUrl, sJSon
в sJSon записываю строку
Код
{"fields":{"event_time":{"field":"event_time","source":"event_time=decade","aggr":"no","timezone":"Europe/Moscow"},"click":{"field":"click","source":"click","aggr":"count","type":"int"}},"filters":[{"source":"event_time","op":"BETWEEN","expr":"today,today 23:59:59"}]}

далее запускаю:
Код
Dim oRequest As WinHttp.WinHttpRequest
Dim sResult As String

Set oRequest = New WinHttp.WinHttpRequest
With oRequest
    .Open "POST", sUrl, True
    .SetRequestHeader "Content-type", "application/json; charset=UTF-8"
    .Send sJSon
    .WaitForResponse
    sResult = .ResponseText
    MsgBox sResult
End With

А в ответ получаю:


Ничего не получается, чтобы запрос вернулся с ответом. Параметры, видимо, не передаются.

Подскажите, пожалуйста))
 
Перейти    
Ошибка при повторной вставке данных в базу Access, первая вставка после открытия файла проходит успешно
 
#
01.10.2015 12:14:51
Ола, амигос!
Пытаюсь сделать из экселя интерфейс для работы с базой на аксессе. Не спрашивайте почему :)

Создаю коннект, инсерчу в табличку первую запись:
Код
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\losinets-ds\Desktop\1.accdb"
cn.Execute ("insert into tbl(dsc) select '" & str & "'")
cn.Close

В первый раз все проходит успешно. Когда пуляю то же самое во второй раз, вылазит ошибка
Ошибка выполнения '-2147467259(80004005) ": [Microsoft][Драйвер ODBC Microsoft Excel] Операции должен использоваться обновляемый запрос.
Никак не пойму что делать.

Так что делать?))
Изменено: Dmtr Lsnts - 01.10.2015 12:24:44
 
Перейти    
Изменение ячейки, целой строки, столбца и обращение к макросам с формами из других файлов
 
#
01.12.2010 17:22:53
Всем привет! :)  
Задача:  
При изменении единичной ячейки делаем одно  
При попытке вставить целую строку - другое  
При попытке изменить целый столбец - третье  
При попытке изменить что-либо другое - четвертое.  
 
Все действия делаются из файла, который лежит в этой же папке. Формы, функции и прочее определено в стороннем файле. Действия происходят в открытом.  
 
Задача в том, что имеется 30 людей, у которых свои разные файлы с одной сутью. После каждой модификации определенной процедуры или функции переделывать и перевысылать каждому человеку его новый файл неудобно. Потому решено сделать сопровождающий файл со всем нужным функционалом, который для всех одинаков. Если файл открыт, то проблем, вроде, нет. А если закрыт?  
 
Событие Change обработаю. Но как понять, что это целая строка или столбец? Count'ом проверить, является ли измененная ячейка единичной - легко. А вот с другим сложнее.
 
Перейти    
Динамические объекты на форме VBA Excel
 
#
30.11.2010 16:50:03
Для повышения отзывчивости и надежности рабочих файлов мне очень захотелось все изменения делать через форму, на которой динамически создаются объекты в зависимости от того, какое действие происходит.  
В Си понятно, как работать. Там вообще много чего понятно) Но стоит задача сделать при попытке изменения любой ячейки:  
"UserForm1.Show  
Dim a() as CommandButton  
<<<какие-то определения, объявления>>>  
if <<<какие-то условия>>> Then  
ReDim a(n) as CommandButton  
CommandButton a(i)=new CommandButton(UserForm1)  
<<<Какая-то обработка новой кнопки>>>  
<<<Привязка к кнопке функций>>>  
End if  
...  
"  
Нужны сигналы и слоты, как в QT. Такое в VBA есть? Или какая-то адекватная замена.
 
Перейти    
Страницы: 1
Наверх