I've been having trouble with this vbUnicode

Question

1.00/5 (1 vote)

See more:

VB

Option Strict Off
Option Explicit On
Module Module1
	Dim winhttp As New WinHttp.WinHttpRequest
	Public Function Version() As Boolean
		Dim WebVer As Object
		On Error Resume Next
        winhttp.Open("GET", "http://www.********.com/upd/webver.txt")
		winhttp.Send()
        WebVer = StrConv(winhttp.ResponseBody, vbUnicode)
		Form1.WebVer.Text = WebVer
	End Function
	Public Function Version2() As Boolean
		Dim ClientVer As Object
		On Error Resume Next
        winhttp.Open("GET", "http://www.********.com/upd/clientver.txt")
		winhttp.Send()
        ClientVer = StrConv(winhttp.ResponseBody, vbUnicode)
		Form1.ClientVer.Text = ClientVer
	End Function
End Module

And it gives me 2 errors.

Error 1 Name 'vbUnicode' is not declared.C:\Users\Juss\Desktop\Project1.NET\Module1.vb 10 48 Project1
Error 2 Name 'vbUnicode' is not declared. C:\Users\Juss\Desktop\Project1.NET\Module1.vb 18 51 Project1

I'm really new in this, and all the help would be really appriciated!

Posted 1-Jun-15 14:53pm

Member 11734183

Updated 1-Jun-15 14:55pm

v2

Add a Solution

Comments

[no name] 1-Jun-15 21:22pm

https://msdn.microsoft.com/en-us/library/aa263373(v=vs.60).aspx

Sergey Alexandrovich Kryukov 1-Jun-15 22:13pm

What do you mean by "VB" here?
—SA

F. Xaver 2-Jun-15 2:37am

looks like .Net .. but.. Set 'Option Strict ON'
and get rid of 'On Error Resume Next' .. thats VB6 Error handling. there are nicer things in .net ^^

2 solutions

Solution 2

vbUnicode is one of built-in constans. A reference to VBE7.dll is needed.

For further information, please see: Visual Basic for Applications Reference: StrConv function[^]

Posted 1-Jun-15 20:15pm

Maciej Los

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Richard Deeming · Accepted Answer · 2015-06-02T06:50:00

You don't need the WinHttp reference - the .NET framework has plenty of built-in classes to do this for you. For example, the DownloadString method[^] from the System.Net.WebClient class[^]:

VB

Option Strict On
Option Explicit On

Imports System.Net

Module Module1
    Public Function Version() As Boolean
        Dim wc As New WebClient()
        Dim WebVer As String = wc.DownloadString("http://www.********.com/upd/webver.txt")
        Form1.WebVer.Text = WebVer
        
        Return True ' Functions need to return a value.
    End Function

    Public Function Version2() As Boolean
        Dim wc As New WebClient()
        Dim ClientVer As String = wc.DownloadString("http://www.********.com/upd/clientver.txt")
        Form1.ClientVer.Text = ClientVer
        
        Return True ' Functions need to return a value.
    End Function
End Module