Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: Альтернатива postBytes.Lengt в Compact Framework Добавлено: 06.12.10 23:12  

Автор вопроса:  Ahtoxa
Переписываю программу под Compact Framework. столкнулся с проблемой. Не могу найти аналог postBytes.Lengt
URL = "http://www.site.com"
        postData = "asdsadasdasd"
        postBytes = System.Text.Encoding.GetEncoding(1252).GetBytes(postData)
        request = WebRequest.Create(URL)
        request.ServicePoint.Expect100Continue = False
        request.Method = "POST"
        request.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.2) Gecko/20100115 Firefox/3.6"
        If Not String.IsNullOrEmpty(cookies1) And Not String.IsNullOrEmpty(cookies2) Then request.Headers.Add("Cookie", cookies1 & "; " & cookies2)

        request.Accept = "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8"
        request.KeepAlive = 115
        request.ContentType = "application/x-www-form-urlencoded"
        request.ContentLength = postData.Length

        requestStream = request.GetRequestStream()
        requestStream.Write(postBytes, 0, postBytes.Length)
        requestStream.Close()

Ответить

  Ответы Всего ответов: 17  

Номер ответа: 1
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
  Профиль | | #1 Добавлено: 07.12.10 00:03
ты хочешь сказать что в CF массив не имеет длины? ))))))))

Ответить

Номер ответа: 2
Автор ответа:
 Ahtoxa



Вопросов: 6
Ответов: 29
  Профиль | | #2 Добавлено: 07.12.10 00:10
упс, по-ходу проблему решил)))
Просто неправильно объявил postBytes
было так
Dim postBytes
нужно так
Dim postBytes(255) As Byte
Просто на net framework работало

Ответить

Номер ответа: 3
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
  Профиль | | #3 Добавлено: 07.12.10 00:13
Dim postBytes

вот за такое объявление переменных надо пальцы скалкой ломать

Ответить

Номер ответа: 4
Автор ответа:
 Ahtoxa



Вопросов: 6
Ответов: 29
  Профиль | | #4 Добавлено: 07.12.10 00:15
учту) спасибо. тему можно удалять

Ответить

Номер ответа: 5
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
  Профиль | | #5 Добавлено: 07.12.10 00:15
Dim postBytes(255) As Byte

и кстати сказать, это объявление тоже неверное.. длину указывать незачем, она тут абсолютно не нужна

Ответить

Номер ответа: 6
Автор ответа:
 Ahtoxa



Вопросов: 6
Ответов: 29
  Профиль | | #6 Добавлено: 09.12.10 22:01
Не хотел создавать отдельной темы. спрошу тут. как запустить из VS программу, которая отправляет данные в интернет? запускаю в эмуляторе - пишит, мол нет соединения :(

Ответить

Номер ответа: 7
Автор ответа:
 AgentFire



ICQ: 192496851 

Вопросов: 75
Ответов: 3178
  Профиль | | #7 Добавлено: 10.12.10 10:01
Вероятно, нужно спервая такую программу написать, а затем запускать из VS

Ответить

Номер ответа: 8
Автор ответа:
 Ahtoxa



Вопросов: 6
Ответов: 29
  Профиль | | #8 Добавлено: 10.12.10 19:13
Вероятно, нужно спервая такую программу написать, а затем запускать из VS

Серьёзно? :)
Программа уже есть, проблема заключается в том что я не могу её потестить.
вот пример кода
  1. Dim request As HttpWebRequest
  2.             Dim response As HttpWebResponse
  3.             Dim reader As StreamReader
  4.             request = HttpWebRequest.Create("http://vbnet.ru/forum/show.aspx?id=212303")
  5.             request.Method = "GET"
  6.             request.Headers.Add(HttpRequestHeader.AcceptLanguage, "ru,en-us;q=0.7,en;q=0.3")
  7.             request.Headers.Add(HttpRequestHeader.AcceptCharset, "Accept-Charset: windows-1251,utf-8;q=0.7,*;q=0.7")
  8.             request.Accept = "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8"
  9.             request.Timeout = 30000
  10.             response = request.GetResponse()
  11.             reader = New StreamReader(response.GetResponseStream())
  12.             Dim Str = reader.ReadToEnd
  13.             reader.Close()
  14.             response.Close()
  15.             msgbox(Str)

Ответить

Номер ответа: 9
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
  Профиль | | #9 Добавлено: 10.12.10 19:34
Dim Str

я бы тоже отказался коннектится если бы вот так вот переменные объявляли..

Ответить

Номер ответа: 10
Автор ответа:
 Artyom



Разработчик

Вопросов: 130
Ответов: 6602
  Профиль | | #10 Добавлено: 10.12.10 20:33
Объявление вполне корректное - неявная типизация.

Ответить

Номер ответа: 11
Автор ответа:
 Ahtoxa



Вопросов: 6
Ответов: 29
  Профиль | | #11 Добавлено: 10.12.10 20:41
упс, опять двадцать пять. всё никак не привыкну, но проблема не в этом на этот раз.
код:
  1. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load              
  2.         Dim URL As String
  3.         Dim request As HttpWebRequest
  4.         Dim response As HttpWebResponse
  5.         Dim reader As StreamReader
  6.         Dim str As String
  7.         URL = "http://www.ya.ru"
  8.         request = WebRequest.Create(URL)
  9.         request.Method = "GET"
  10.         request.UserAgent = "Mozilla/5.1 (Windows; U; Windows NT 5.1; ru; rv:1.9.2) Gecko/20100115 Firefox/3.6"
  11.         request.Accept = "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8"
  12.         response = request.GetResponse()
  13.         reader = New StreamReader(response.GetResponseStream())
  14.         str = reader.ReadToEnd
  15.         response.Close()
  16.         MsgBox(str)        
  17.     End Sub


Ошибка "response = request.GetResponse()" - Could not establish connection to network.
Я так понимаю нужно в эмуляторе настроить соединение, вопрос в том какие настройки? или я ошибаюсь?

Ответить

Номер ответа: 12
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
  Профиль | | #12 Добавлено: 10.12.10 21:46
Объявление вполне корректное

Корректное, но уродское и дибильное..

Ответить

Номер ответа: 13
Автор ответа:
 Ahtoxa



Вопросов: 6
Ответов: 29
  Профиль | | #13 Добавлено: 11.12.10 16:10
ну так может кто-нибудь сталкивался с программированием под смартфон?

Ответить

Номер ответа: 14
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
  Web-сайт: winandfx.narod.ru
 Профиль | | #14 		Добавлено: 12.12.10 13:26
ага, на куте и андроид:)
MS Phone 7 не использует все эти донеты и проч.?

Ответить

Номер ответа: 15
Автор ответа:
 Ahtoxa



Вопросов: 6
Ответов: 29
  Профиль | | #15 Добавлено: 12.12.10 13:34
ага, на куте и андроид:)
MS Phone 7 не использует все эти донеты и проч.?

Прости, не понял тебя. Программа под windows mobile 4. Вопрос в том, как настроить соединение в windows mobile и нужно ли его вообще настраивать при запуске программы из vs?

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам