Visual Basic Discussion Boards

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

FAXING

Anonymous13-Sep-03 4:24

Anonymous

13-Sep-03 4:24

Has anyone done anything with an application that works with winfax or just windows fax?

F1 Button

Emile Jacobs12-Sep-03 4:02

Emile Jacobs

12-Sep-03 4:02

I've got a HelpProvider control on my Project form with all the necessary Properties. If I run my project and press F1 on the form, it opens the correct Help file, but gives the following error:

"Index not yet installed"

What is the problem?

Pls F1!

Confused | :confused:

using java program as server and vb as client

onwebbe12-Sep-03 3:06

onwebbe

12-Sep-03 3:06

i make program using java as server and vb as cliet. Client can get message from server but server can not get message from client..why...???
java code below
public testvb()
{
while(true)
{
Socket s=new Socket();
try
{
server=new ServerSocket(8888);
s=server.accept();
}
catch(Exception e)
{
}

try
{
in=s.getInputStream();
reader=new BufferedReader(new InputStreamReader(in));
out=s.getOutputStream();
writer=new PrintWriter(out);
System.out.println(reader.readLine());
}
catch(Exception e)
{
}
}
}

vb code below:
winsock.send "Sending message to server"

Compile exe with controls

Dangleberry12-Sep-03 1:31

Dangleberry

12-Sep-03 1:31

Hi all VB gurus, I'm a C++ person attempting to use the wizardry of VB for a quick DB app. I've used some DTPicker controls and want to compile the whole thing up in one exe, so I can run it any windows PC. Currently, it complains about a missing .ocx file if I run it on a machine without VB. Can't seem to find it any where in the project settings. Do I have to package it up like a dll using the Package and Deployment wizard or something? cheers all Smile | :)

Re: Compile exe with controls

Ray Cassick12-Sep-03 3:27

Ray Cassick

12-Sep-03 3:27

Yes, you have to create a setup package that includes all the dependent files.

Paul Watson wrote:
"At the end of the day it is what you produce that counts, not how many doctorates you have on the wall."
George Carlin wrote:
"Don't sweat the petty things, and don't pet the sweaty things."
Jörgen Sigvardsson wrote:
If the physicists find a universal theory describing the laws of universe, I'm sure the a**hole constant will be an integral part of that theory.

Re: Compile exe with controls

Dangleberry14-Sep-03 23:43

Dangleberry

14-Sep-03 23:43

Thanks Ray, I thought I may have to. Have you check out my other post above? COuld really do with knowing if any other people have experienced the same problem?

Thanks Again,
Alan.

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