few lines translation from c# to VB.NET - Visual Basic Discussion Boards

apjake15-Sep-03 13:55

15-Sep-03 13:55

I am currently working with the internet transfer control in VB6, but I have a problem. The file I need to get is passworded, but it's not an FTP site, and I know the control has ways of doing usernames and passwords on FTP's, but this is just a regular page with an account name and password.

Right here's where I need to get it from: https://www.e-gold.com/acct/historycsv.asp

But as you can see, username and password are needed. I haven't the slightest clue as to how to get the username and password in there and push it through to get the file I need. I know it's possible on this site, it's been done before by a programmer with about the same skill as me. But, he doesn't want to share code Poke tongue | ;-P

Any help?

Re: Internet Transfer Control

apjake15-Sep-03 14:10

apjake

15-Sep-03 14:10

OKay, I randomly just figured that out on my own. New problem::: The values in the file are comma seperated. How to I parse it? (there are some strings of commas that have no values or spaces in-between too, FYI)

Re: Internet Transfer Control

Ian Darling15-Sep-03 22:21

Ian Darling

15-Sep-03 22:21

Split()

--
Ian Darling
"The moral of the story is that with a contrived example, you can prove anything." - Joel Spolsky

Urgent Help on graphic control!!

MJay15-Sep-03 4:45

MJay

15-Sep-03 4:45

anyone know how to draw any shapes(square, trapezium) and the drew shape can drag using mouse to move around the form in VB .NET??
sounds something like using visio, but i just need the small graphic control part...plz...urgent help... Cry | :((

Re: Urgent Help on graphic control!!

ami-uhle26-Sep-03 5:44

ami-uhle

26-Sep-03 5:44

Draw the shape on a label or panel.
You can drag the whole control then...

Office Automation - Save As RTF not saves the Header/Footer?

GTS202015-Sep-03 4:21

GTS2020

15-Sep-03 4:21

Hi,

I am using Word Object library in my program to open word documents and save it as RTF documents. It seems this is not saving the Header/Footer information in the RTF file.

Any Suggestions?

Thanks.

GTS

configuring DDE data feed

H.J.Verschuren15-Sep-03 0:16

H.J.Verschuren

15-Sep-03 0:16

Hi,
hope somebody out there can help me out...
I want to configure a DDE data feed in my VB.NET application. Is this possible or can I only use Visual Basic 6.0? Case "Yes": how should I do this?
Case "No": could someone tell how to make this feed in Excel?

Thanx,
H.J.Verschuren

few lines translation from c# to VB.NET

notturno14-Sep-03 23:44

notturno

14-Sep-03 23:44

Hi there,
i found a really good article about multithread tcp handling, but i code in VB.NET and the source is in c#; i managed to translate most of the code, but some of them are out of my knowledge, please help

##################
private Thread [] ThreadTask = new Thread[NUM_OF_THREAD] ;
ThreadTask[i] = new Thread( new ThreadStart(this.Process) );
ThreadTask[i].Start() ;
//NUM_OF_THREAD is a const
##################
public ClientService(ClientConnectionPool ConnectionPool) {
this .ConnectionPool = ConnectionPool ;
}
//is this a function ? a sub ? how do i translate 'this' ?
##################
lock( ConnectionPool.SyncRoot ) {
if ( ConnectionPool.Count > 0 )
client = ConnectionPool.Dequeue() ;
}
// lock opens {} as an if ?
#################

Thanks in advance

Re: few lines translation from c# to VB.NET

Ian Darling15-Sep-03 1:09

Ian Darling

15-Sep-03 1:09

the first bit declares an array of ThreadTasks containing NUM_OF_THREAD items, and then initialises and starts the i^th member

this in C# is Me in VB

lock declares a critical section. I'm not sure what the VB equivalent is

--
Ian Darling
"The moral of the story is that with a contrived example, you can prove anything." - Joel Spolsky

Re: few lines translation from c# to VB.NET

notturno15-Sep-03 7:31

notturno

15-Sep-03 7:31

Thanks,'me' worked perfectly
I understood what
private Thread [] ThreadTask = new Thread[NUM_OF_THREAD]
say, the matter is that i cannot find a way to rewrite it in vb
the only near declaration accepted from the syntax that i found is
Private ThreadTask as Thread(NUM_OF_THREAD)
but i miss the 'new' part. Any idea ?

Thanks again for the kind help

Re: few lines translation from c# to VB.NET

Ian Darling15-Sep-03 22:19

Ian Darling

15-Sep-03 22:19

Well, I'd just declare the array as you would any VB array, and try it like that.

--
Ian Darling
"The moral of the story is that with a contrived example, you can prove anything." - Joel Spolsky

Re: few lines translation from c# to VB.NET

Ian Darling15-Sep-03 1:12

Ian Darling

15-Sep-03 1:12

Found it - lock in C# can be replaced by using the Monitor class in VB

--
Ian Darling
"The moral of the story is that with a contrived example, you can prove anything." - Joel Spolsky

Re: few lines translation from c# to VB.NET

notturno15-Sep-03 7:16

notturno

15-Sep-03 7:16

Thanks, i'll study it, i found just a few mins ago the synclock function, i hope it will work in a nice way but i'll check the monitor first

OpenRecordset bollocks

Dangleberry14-Sep-03 23:19

Dangleberry

14-Sep-03 23:19

Yo all, have entered a stupid problem which I'm not sure is a bug in VB. I have this code:

<br />
Dim Record as Recordset, DB as Database<br />
Set DB = OpenDatabase("c:\db.mdb")<br />
Set Record = DB.OpenRecordset("BASE")<br />

Yet this remarkably simple code falls over when setting the recordset, because there is a "data type mismatch" (groan), when in fact there is no data type mismatch. OpenRecordset returns, guess what, a recordset, so wtf????? To add insult to my injuries, if I declare Record as a Variant instead, the line proceeds and guess what, Record gets cast to a, wait for it, Recordset object (ie. I can access the variant as I would a recordset and in debug the fields are identical), and all the data is intact and correct. Also, interestingly (though wankily) if I cast the Recordset object to a variant using CVar and then call OpenRecordset, I get no errors and indeed no recordset object, its just set to 'Nothing'. Is this just another episode of why VB is so sh*t? Can someone explain to me how a function returning a Recordset object can have a data type mismatch when trying to assign to a Recordset object??? Honestly, this is basic programming logic which this stupid, shitting language cannot grasp. I await someone to prove me wrong.

Re: OpenRecordset bollocks

Dangleberry15-Sep-03 0:19

Dangleberry

15-Sep-03 0:19

OK guys, found the answer elsewhere on the web, and guess what, its sh*t. Basically VB defines two recordset objects, both called 'Recordset', for ADODB and DAO, which is fair enough. However, fatally, VB CANNOT differeniate between the two, so whenever you specify Dim Record as Recordset it always assumes you are using the ADODB recordset object, hence the data type mismatch because OpenRecordset returns a DAO recordset, duh. This is exactly why VB is sh*t. C++ adopts a technique of namespaces, if there is ambiguity in the type the compiler will throw an error saying 'use of ambiguous types', nice, addresses you to the problem. VB just kicks up some bullshit AT RUN-TIME, which is horrible, horrible, horrible, because no end of bugs could manifest themselves. You even have to specify Option Explicit to force the compiler to point out basic compiler errors such as undeclared identifiers. This is wank. Anyway, the solution is declare the recordset as part of the DAO 'namespace' like so Dim Record as DAO.Recordset.

VB should be burned on a cross and sent to hell for its sins

Re: OpenRecordset bollocks

Simon Walker15-Sep-03 2:56

Simon Walker

15-Sep-03 2:56

Yeah, I know exactly what you mean. It just totally disgusts me how flimsy the compiler is, and annoying when have a line myvar = and then press enter and it comes up with a box saying you did something wrong, when really you were just gonna cut and paste some code. I only use VB when absolutely necessary, like when I have to knock up some bullshit app in a day or so. Its strange mind, cos this guy at work, Mark, he loves VB, personally I think he must be a bit sadistical to love VB.

Lots of Love Simonxxxxx.

fill Combobox with xml data

14-Sep-03 22:03

I tried to fill a combobox with xml data, but it wont work

the sourcecode is like this:

Dim ds As New DataSet("Koder")
ds.ReadXml("D:\Utveckling\dotnet\tester\forms tester\Forms test\bin\Codes.XML")

Dim i As Integer

For i = 0 To ds.Tables(0).Rows.Count - 1

With ComboBox1
.Items.Add(ds.Tables(0).Rows(i)("code").ToString)

End With
Next i

I recieved a error message with:
Invalid Cast exception

my xml sheet look like this:

<xml>
<aktiviteter>

<br />
			<id>1001</id><br />
			<avtivitet>Hej</avtivitet><br />

<br />
			<id>1002</id><br />
			<avtivitet>Då</avtivitet><br />

<kostnader>
<kkoder>

<id>9001
<kostnad>Bilresa

How should I solve this problem
Confused | :confused:

VB.net book suggestions..

Agnihothra14-Sep-03 20:40

Agnihothra

14-Sep-03 20:40

Hi
I need some suggestions for VB.net books.What are the titles you recommend...

Regards,
Agni.

Re: VB.net book suggestions..

Hesham Amin14-Sep-03 21:44

Hesham Amin

14-Sep-03 21:44

mastering VB.NET is a good one..
one disadvanage is that it does not focus on VB.NET as an Object Oriented language,, it teachs you how to make things you used to make in VB6 ,, in VB.NET this time..

Re: VB.net book suggestions..

Agnihothra14-Sep-03 23:32

Agnihothra

14-Sep-03 23:32

Thank you HSPC... Smile | :)

Regards,
Agni.

Regex help

jholt13-Sep-03 7:25

jholt

13-Sep-03 7:25

Hi
I need to format a long string into user definable line lengths, i.e.

The cat sat on the mat and the dog bit the cat (linelength=10)
The cat
sat on the
mat and
the dog
bit the
cat

The cat sat on the mat and the dog bit the cat (linelength=11)
The cat sat
on the mat
and the dog
bit the cat

Can any of the regext gurus help me with this one? Note that a line ending can be a comma, semicolon, color, period.

Many thanks
Jeremy Holt

Re: Regex help

Ian Darling13-Sep-03 8:41

Ian Darling

13-Sep-03 8:41

I'm not sure a regexp is actually the easiest way to do this.

Why not use Split() with a space delimiter to get an array of each word, and then just concatenate the array together again to the appropriate lengths?

--
Ian Darling
"The moral of the story is that with a contrived example, you can prove anything." - Joel Spolsky

Re: Regex help

jholt13-Sep-03 9:27

jholt

13-Sep-03 9:27

Ian

You're quite right, I don't know whay hadn't thought of that before.

I wrote this which seems to work:

Public Shared Function ToParagraph(ByVal Text As String, ByVal LineLength As Integer) As String
Dim arr As String() = Text.Split(New Char() {" "c})
Dim sb As New Text.StringBuilder
Dim CurrentLine As Integer = 0

For i As Integer = 0 To arr.Length - 1
If CurrentLine + arr(i).Length + 1 <= LineLength Then
CurrentLine += (arr(i).Length + 1)
sb.Append(arr(i) & " ")
Else
CurrentLine = arr(i).Length + 1
sb.Append(vbCrLf & arr(i) & " ")
End If
Next

Return sb.ToString.TrimEnd
End Function

Regards
Jeremy

Re: Regex help

Ian Darling13-Sep-03 22:49

Ian Darling

13-Sep-03 22:49

jholt wrote:
Ian

You're quite right, I don't know whay hadn't thought of that before.

I wrote this which seems to work:

That's ok, no charge Big Grin | :-D

Glad to help

--
Ian Darling
"The moral of the story is that with a contrived example, you can prove anything." - Joel Spolsky

Mix Managed code and unmanaged code

gsmcecil13-Sep-03 6:03

gsmcecil

13-Sep-03 6:03

Hi;
I hv C++ program which declare a return message as LPstr datatype, when i want to add reference this C++ program and used in VB.net & i receive this message in String datatype. After built, an Type mismatch error comes out.
Any one know how to convert LPstr datatype to any relevant datatype in VB.net

Eek! | :eek:

Headache Unmanaged Code

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.