Please, can someone convert the following C# code to VB .NET
As far as I can see there are some errors in it, but I am not sure.
if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count))
{
WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count];
for (int index = 0; index < count; index++)
sessionInfo[index] = Marshal.PtrToStructure(buffer +
(sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));
TIA 3 2935
"Nikolay Petrov" <jo**************@mail.bg> schrieb: Please, can someone convert the following C# code to VB .NET As far as I can see there are some errors in it, but I am not sure.
if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count)) { WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count]; for (int index = 0; index < count; index++) sessionInfo[index] = Marshal.PtrToStructure(buffer + (sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));
\\\
If WTSEnumerateSessions(IntPtr.Zero, 0, 1, Buffer, count) Then
Dim sessionInfo(count - 1) As WTS_SESSION_INFO
For index As Integer = 0 To count - 1
sessionInfo(index) = Marshal.PtrToStructure(New IntPtr(buffer +
(Marshal.SizeOf(GetType(WTS_SESSION_INFO)) * index)),
GetType(WTS_SESSION_INFO))
Next index
End If
///
For a good C# to VB.NET converter take a look here:
Instant VB
<URL:http://www.tangiblesoftwaresolutions.com/Product_Details/Instant_VB/Instant_VB.htm>
--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>
What about converting code with errors?
"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in message
news:O%****************@TK2MSFTNGP12.phx.gbl... "Nikolay Petrov" <jo**************@mail.bg> schrieb: Please, can someone convert the following C# code to VB .NET As far as I can see there are some errors in it, but I am not sure.
if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count)) { WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count]; for (int index = 0; index < count; index++) sessionInfo[index] = Marshal.PtrToStructure(buffer + (sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));
\\\ If WTSEnumerateSessions(IntPtr.Zero, 0, 1, Buffer, count) Then Dim sessionInfo(count - 1) As WTS_SESSION_INFO For index As Integer = 0 To count - 1 sessionInfo(index) = Marshal.PtrToStructure(New IntPtr(buffer + (Marshal.SizeOf(GetType(WTS_SESSION_INFO)) * index)), GetType(WTS_SESSION_INFO)) Next index End If ///
For a good C# to VB.NET converter take a look here:
Instant VB <URL:http://www.tangiblesoftwaresolutions.com/Product_Details/Instant_VB/Instant_VB.htm>
-- M S Herfried K. Wagner M V P <URL:http://dotnet.mvps.org/> V B <URL:http://dotnet.mvps.org/dotnet/faqs/>
Our converters (Instant C# and Instant VB) are able to convert incomplete
code with a high success rate - i.e., code snippets with variables or methods
defined elsewhere. However, if you have code which has errors in syntax,
then we make no predictions - it may convert, or fail miserably. Correct
syntax is necessary to allow parsing to succeed.
David Anton
Tangible Software Solutions Inc. www.tangiblesoftwaresolutions.com
"Nikolay Petrov" wrote: What about converting code with errors? "Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in message news:O%****************@TK2MSFTNGP12.phx.gbl... "Nikolay Petrov" <jo**************@mail.bg> schrieb: Please, can someone convert the following C# code to VB .NET As far as I can see there are some errors in it, but I am not sure.
if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count)) { WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count]; for (int index = 0; index < count; index++) sessionInfo[index] = Marshal.PtrToStructure(buffer + (sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));
\\\ If WTSEnumerateSessions(IntPtr.Zero, 0, 1, Buffer, count) Then Dim sessionInfo(count - 1) As WTS_SESSION_INFO For index As Integer = 0 To count - 1 sessionInfo(index) = Marshal.PtrToStructure(New IntPtr(buffer + (Marshal.SizeOf(GetType(WTS_SESSION_INFO)) * index)), GetType(WTS_SESSION_INFO)) Next index End If ///
For a good C# to VB.NET converter take a look here:
Instant VB <URL:http://www.tangiblesoftwaresolutions.com/Product_Details/Instant_VB/Instant_VB.htm>
-- M S Herfried K. Wagner M V P <URL:http://dotnet.mvps.org/> V B <URL:http://dotnet.mvps.org/dotnet/faqs/> This thread has been closed and replies have been disabled. Please start a new discussion. Similar topics
by: William C. White |
last post by:
Does anyone know of a way to use PHP /w Authorize.net AIM without using
cURL? Our website is hosted on a shared drive and the webhost company
doesn't installed additional software (such as cURL)...
|
by: Albert Ahtenberg |
last post by:
Hello,
I don't know if it is only me but I was sure that header("Location:url")
redirects the browser instantly to URL, or at least stops the execution of
the code. But appearantely it continues...
|
by: James |
last post by:
Hi,
I have a form with 2 fields.
'A'
'B'
The user completes one of the fields and the form is submitted.
On the results page I want to run a query, but this will change
subject to which...
|
by: Ollivier Robert |
last post by:
Hello,
I'm trying to link PHP with Oracle 9.2.0/OCI8 with gcc 3.2.3 on a Solaris9
system. The link succeeds but everytime I try to run php, I get a SEGV from
inside the libcnltsh.so library.
...
|
by: Richard Galli |
last post by:
I want viewers to compare state laws on a single subject.
Imagine a three-column table with a drop-down box on the top. A viewer
selects a state from the list, and that state's text fills the...
|
by: Albert Ahtenberg |
last post by:
Hello,
I have two questions.
1. When the user presses the back button and returns to a form he filled
the form is reseted. How do I leave there the values he inserted?
2. When the...
|
by: inderjit S Gabrie |
last post by:
Hi all
Here is the scenerio ...is it possibly to do this...
i am getting valid course dates output on to a web which i have designed
....all is okay so far , look at the following web url
...
|
by: Jack |
last post by:
Hi All,
What is the PHP equivilent of Oracle bind variables in a SQL statement, e.g.
select x from y where z=:parameter
Which in asp/jsp would be followed by some statements to bind a value...
|
by: Sandwick |
last post by:
I am trying to change the size of a drawing so they are all 3x3.
the script below is what i was trying to use to cut it in half ... I
get errors.
I can display the normal picture but not the...
|
by: DolphinDB |
last post by:
Tired of spending countless mintues downsampling your data? Look no further!
In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
|
by: ryjfgjl |
last post by:
ExcelToDatabase: batch import excel into database automatically...
|
by: isladogs |
last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM).
In this month's session, we are pleased to welcome back...
|
by: CloudSolutions |
last post by:
Introduction:
For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
|
by: Defcon1945 |
last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
|
by: Shællîpôpï 09 |
last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
|
by: af34tf |
last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
|
by: Faith0G |
last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...
|
by: isladogs |
last post by:
The next Access Europe User Group meeting will be on Wednesday 3 Apr 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM).
In this session, we are pleased to welcome former...
| |