|
DA_Loring wrote: without installing ADODB in the project?
Which project? The VB6 one that writes the XML file or the VB.NET one that loads it? Or do I have that backwards?
The only other way would be to load the document into an XmlDocument object and parse it manually.
Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007
|
|
|
|
|
Hi Dave
The VB6 project writes the file and the .NET project loads it. I did find .ReadXML but the project is not in a state to run this yet. Would .ReadXML understand the VB6 recordset schema?
The code I was thinking to use is
dTable.ReadXml(shareParams.OperationalShare & "\" & shareParams.GeneralInputFolder & "\" & dtRow("DataFileName"))
Where dTable is a DataTable and the parameter is the file name.
David Loring
!! Keep Music Live !!
|
|
|
|
|
XML is a standardized format, having nothing to do with VB6. ADO will still use the same data types.
And yes, you'd probably use DataSet.ReadXml to load the data.
It's easy enough to test. Should take you about 20 minutes to wipe together two small apps to test the data export to XML and read it again in VB.NET.
Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007
|
|
|
|
|
Thanks very much for your help Dave.
David Loring
!! Keep Music Live !!
|
|
|
|
|
Is there a way to initialise a control in a control variable from a text string of the controls name i.e.
dim ctl as control
dim sControlName as string = "myTextBox"
...
ctl.name = sControlName
The control could be a picturebox, textbox, or label.
using vb.net 2003.
At the moment I search through controls on the form until I get a match, it's a bit slow.
I'm doing this with a plastic card design/print program. I save the position of each control into a text file then I open it and read the x and y to position each control
Thanks,
Bruce
Don't forget to brush |||_____
|
|
|
|
|
for each ctl as control in me.controls<br />
if ctl.name = sControlName then<br />
'do actions<br />
end if<br />
next
This is probbaly the fastest way to do it.
Posted by The ANZAC
|
|
|
|
|
Thanks, that's what I'm doing. Just thought.....
Bruce
Don't forget to brush |||_____
|
|
|
|
|
If you have the strings and you want to find the controls, you could build a dictionary that maps names to controls.
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
You've got me there. I haven't a clue how to do a dictionary.
Bruce
Don't forget to brush |||_____
|
|
|
|
|
I have no idea of the VB sytnax, but a dictionary is an associative container, so you'll end up able to do this
Dim c as Control = myDictionary("MycontrolName")
It's something like
Dim dic as Dictionary(String, Control)
It's a generic container.
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
Thanks for that.
The dictionary did sort a few things out and run faster.
It would be better if you didn't have to loop through to find what you need.
Bruce
Don't forget to brush |||_____
|
|
|
|
|
i add control to cells but as default it locate in Top Left and i can't change it's position to center auomaticaly.
-- modified at 16:12 Sunday 15th April, 2007
|
|
|
|
|
I don't think you can have it centered on the TableLayoutPanel.
Regards,
Thomas Stockwell
Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the Universe trying to produce bigger and better idiots. So far, the Universe is winning.
Visit my homepage Oracle Studios[ ^]
|
|
|
|
|
How to random and get Data from Dataset
|
|
|
|
|
Two questions or just a bit involved one?
If the Lord God Almighty had consulted me before embarking upon the Creation, I would have recommended something simpler.
-- Alfonso the Wise, 13th Century King of Castile.
|
|
|
|
|
How to google, and ask clear questions ?
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
|
The best way to do this, is randomise it at the source. The other way to do it, is to randomly remove rows from your data. Where does the data come from ? Can you explain using more than four words ?
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
Hello
I am doing one application about some kind of information and i need to display last 4 files in file menu, I mean when user ckick file so it should display last 4 files name in file menu,So i have no idea where to start
any help
wating for your kind help
|
|
|
|
|
Hi there,
You can create four registry entries to keep the last edited document's name and path, and each time a new document is created you save it to the top registry entry and move the other documents down the line, and so keep track of the last edited documents. Just a sugestion, hope you can make it work.
Regards, Werries
A programmer's life is good... or is it?? Ek dink nie so nie!
|
|
|
|
|
Hi
Thanks for your kind rep
But I am new in vb so can you please tell me how to this task I am confuse that where to start
wating for your kind rep
have a nice time
|
|
|
|
|
Hi there,
Here is a simple sample of what I should use to save the last recent documents of my app. Look at the sequins of moving the most recent files into their positions. Hope you can make something out of this.
SaveSetting("AppName", "RecentDocs", "Recent5", GetSetting("AppName", "RecentDocs", "Recent4"))
SaveSetting("AppName", "RecentDocs", "Recent4", GetSetting("AppName", "RecentDocs", "Recent3"))
SaveSetting("AppName", "RecentDocs", "Recent3", GetSetting("AppName", "RecentDocs", "Recent2"))
SaveSetting("AppName", "RecentDocs", "Recent2", GetSetting("AppName", "RecentDocs", "Recent1"))
SaveSetting("AppName", "RecentDocs", "Recent1", "Your new File Name and Path")
'SaveSetting' saves data to the registry and 'GetSetting' gets data from the registry. These data will be stored under the local user's registry and will not be available if the windows user is changed.
Regards, Werries
A programmer's life is good... or is it?? Ek dink nie so nie!
|
|
|
|
|
:(I'm using this code to save the settings:
SaveSetting("program", "programSettings", "bgcolor", textbox1.BackColor = ColorDialog1.Color)
I'm using this code to get the settings
dim a$ = getSetting("program", "programSettings", "bgcolor")
then I used this code to assign the settings back:
me.textbox1.BackColor = new color(a)
 obviously it doesn't work! can anyone help me? extremely argent my project is at a halt.
|
|
|
|
|
NANCO wrote: SaveSetting("program", "programSettings", "bgcolor", Text1.BackColor = ColorDialog1.Color)
This looks to me like it would save a boolean, the result of checking if textbox1.BackColor is the same value as ColorDialog1.Color.
This is an artefact of VB being crap, sorry. Or, I am wrong, I could be. What happens when you step through the code ? Why do you have an assignment ( or equality check, how do you tell the difference in VB ? ), inside the Save code ?
Surely your variables are not called Text1 and ColorDialog1, REALLY ???
Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog
"I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )
|
|
|
|
|
I don't know; I just got the code, it doesn't work.
I will put it simply, can anyone tell me how to save and retrieve a BackColor, so I can assign it back on startup.
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
