|
Hello All,
Does anybody have any neat code (VB.NET) to manage the "recent files" part of a main menu like in WORD. I'm using just a simple note editor and i'm going crazy over the logic although i'm sure it's simple.
To start with I read in 4 files from a *.ini file and create the menuitems having declared the menu array name at form level:
'at form level
Dim RecentFile(3) as MenuItem
'at frm_Load to create menuitems after reading file names/path from *.ini file
...RecentFile(3)=New MenutItem (FileString(4))
Read files then create menuitems..
mnuMain.MenuItems.Add(RecentFile(I))
Then from the Open file event using the OpenDialog box..I have
Filename=dlgOpen.Filename
This then passes to a subroutine to sort the recent files and delete any file that was the same as the current one.
so..
FileString(1)= RecentFile 1 from last edit/open/new procedure
FileString(2)= RecentFile 2 from last edit/open/new procedure
FileString(3)= RecentFile 3 from last edit/open/new procedure
FileString(4)= RecentFile 4 from last edit/open/new procedure
I'm looking for code that puts the new Filename in the top position but also deletes any of the existing ones if they are the same as Filename.
Thanks for your help.
|
|
|
|
|
Case:
Form1 has a button. In button I declare object for my Form2. Opens form2 with .show method. On form2 I have a button. When pressed I want to pass a value back to a textbox1 on form1 and then close form2.
Simpe as that ...
Was an easy way in VB6..... how about VB.NET?
Please help...
//Maw
|
|
|
|
|
When you open form2, open it with .ShowDialog() instead. After that line, you can pick up any Public properties off of form2. Easy... Then you have to make sure you .Dispose() your form2 object.
Dim frm2 As New Form2
frm2.ShowDialog()
' ... User does whatever on Form2. When OK is clicked, form2 disappears
' and control is returned to here.
TextBox1.Text = frm2.whatEver
frm2.Dispose() ' DO NOT FORGET THIS LINE!!
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Thanks! ....
But if I want to change something on form1 live ... In my case I use a scrollbar and want to set a value to a textbox on form1 ..... I want to see the value on Form1 change when I change my scrollbar on form2....
Hrmmz ... Is this possible?
//Maw
|
|
|
|
|
There's a couple of ways of doing this.
One is to expose a public sub on Form1 that makes the changes you need. In order for Form2 to call this, you'd have to pass a reference to Form1 on to Form2 using a public sub on Form2. This sub would store the reference somewhere at the class level so all the code in Form2 could use it.
The second way is to add a couple of events to Form2 and fire them off when the data changes. The event handlers on Form1 would have to take any data passed in the event to make the necessary changes in Form1.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
You can use a sub main in a module, where you declare a public form1
public f1 as form1=new form1
in the sub main:
application.run(f1) ' or f1.showDialog()
so f1 will be accessible from all other form.
note that the object you want to change in form1 will be declared as public also.
if you want to modify a textbox in form1 so:
in form1:
public withevents Text1 as textbox
so from any other form you can write:
f1.Text1.Text="Any Text"
OmarMallat
|
|
|
|
|
First, no it won't. The f1 object won't be visible inside any other form because there is no such thing a a global variable. You'll have to pass a reference to f1 to some class variable inside the next form you open.
Second, why are you telling me? Tell the guy who posted the question!
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Can you run a external vbscript from a HTA app? and if so how would you read back the results so they are displayed in the HTA app?
For example I would like to have a box were there user can enter a pc name. You select GO. The results from this box are then used in the external VB script that will run a WMI query. The results from this WMI query eg OS is Win 2000 are then displayed the DataArea of the HTA app
Can this be done. Is so does anyone have a practical example.
Thanks
|
|
|
|
|
Why not put the WMI code directly in your app?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi,
In vb.net desktop application, i have created 2 forms and 1 is a Mdi parent and 2nd is a child forms. now for the child form i want to hide the title bar.
is it possible to hide the title bar for the form.
Tahnks in advance
Thiru.
Thanking you,
Thiru
|
|
|
|
|
Not on an MDI Child form.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
hi
this might work
try setting the border style property of child form to none.
Computer...  Programming... What That
|
|
|
|
|
Hmmm... it does work. I fail to see what good it is though...
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hello folks...
Here am i again with part 2 of the serialization problem over sockets:
GAC and adding assemblies...
Well, after a few hours of searching and debugging i found out this much:
Apparently i need to add an assembly of my server code in the Listener code...
This has to do something with a shell tool called
GACutil.exe
I printed msdn help on it but it still confuses me terribly!!!!!!
Can some of you "supercodeguru's" tell me what Global Access Assembly is
and how i can add my server assembly to the listener project??
Many many thanx in advance!!
If you make something idiotproof, someone else will make a better idiot.....
|
|
|
|
|
Hi. I am doing one small application in VB.NET
I am doing "LAN messenger" using concept of "net send"
In this, I created one Form, on which 2 text boxes & 1 button.
1 text box is for typing messege & other for receiving messege.
I can send messege properly. Receiver is gettting that messege
But receiver can see that messege in one small window with "OK"
button, (as usual when we send msg using "net send")
NOw I have to access that messege & display it in text box which I created on form.
So how can I access that messege?
I am using following code for sending messege.........
shell (net send & computer_name & textbox1.text )
|
|
|
|
|
u need to capture the stdout
help on how to to this is simple:
type "capture stdout vb.net" in google....
and useful topics will popup
If you make something idiotproof, someone else will make a better idiot.....
|
|
|
|
|
|
i connected my database (access) within the vb.net. I made an address book which and i connected it within the program. I need to make a button which can be used for searching within the db!
Adrian De Battista
|
|
|
|
|
Welcome to programming. I'd suggest as a first move that you change language to C# while you can. Either way, this next bit is called research. www.google.com/msdn.microsoft.com are two good resources besides the site you're now on. Assuming your app is connected to your access data file, and you're displaying the result, you're just a short step away from filtering, and it's such a basic step that anyone who gives you the code so you don't need to research it yourself will be doing you a disservice.
Christian
I have several lifelong friends that are New Yorkers but I have always gravitated toward the weirdo's. - Richard Stringer
|
|
|
|
|
hi,
i have a set of controls inherited from the picturebox control.
i draw a curve using graphics.drawcurve to link 2 controls.the problem that i'm facing is that the curve disappears under any other (inherited)picturebox control in its path. Is there some way to avoid this ie.drawing under the control? or can i make the control transparent.
|
|
|
|
|
Hi
I've got Webbrowser control inside my VB form. Kind of like making my own browser using IE engine. When I open Word/Excel files, they open inside webbrowser all right. But how can I properly close the host application when I move to next document (like a web page) ? I guess simply moving off to another web page (using the navigate method) does not properly close the host application and the document. That's what I am doing now.
Also, after I deploy my application, in some computers Word's or Excel's toolbar is visible (when word or excel file is opened) and in some computers it is not visible. What could be causing this ?
mecracked
|
|
|
|
|
Hi all!!
Could somebody please tke a look at the the following?
I have been searching an anwser for a de-serialization trouble i am having in my project, however i cannot find a cause as why it should not work..... The project a server listner setup using sockets so i will post both parts of the code
However, the server side file is equal to the listener side received file, I compared both files in Textpad and it says they are byte identical. Also the serialized class is available in both project parts. I tried both soap and binary formatters which both will not work...
ServerSide Code;
<code>
Dim io As MemoryStream = New MemoryStream
'Dim Bf As BinaryFormatter = New BinaryFormatter
Dim Bf As SoapFormatter = New SoapFormatter
SendXML = False
'-- convert file to byte array
Dim Br As New BinaryReader(File.OpenRead(filepath))
Dim bytes() As Byte = Br.ReadBytes(Br.BaseStream.Length)
Br.Close()
'--set filesize of the file buffer
ReDim SdServerSend.File(bytes.Length)
'-- copy array to .file
SdServerSend.File = bytes
'-- serialize class to IO stream
Bf.Serialize(io, SdServerSend)
'-- testpurpose;
Console.WriteLine(System.Text.Encoding.Default.GetString(io.GetBuffer))
'-- writes IO to hdd
Dim BW As New BinaryWriter(File.OpenWrite("C:\PLC\Listener\Received\temptest " & SdServerSend.Type.ToString & " " & EventCounter & ".bin"))
BW.Write(io.GetBuffer, 0, io.Length)
BW.Close()
'-- set io.postion to 0
io.Position = 0
'-- send serialized data to listener
Form1.ClientSocket.Send(io.GetBuffer, io.Length, 0)
</code>
Listener side;
<code>
'-- Receive Message from Current Connection
numbytes = CurSocket.Receive(Buffer, Buffer.Length, 0)
Dim fs As FileStream
Dim filepath As String = "c:\PLC\Listener\Received\Temp " & EventCounter & ".bin"
lstStatus.Items.Insert(lstStatus.Items.Count, "Received Message " & CurRemIp)
lstStatus.SelectedIndex = lstStatus.Items.Count - 1
'-- write this file to HDD location filepath as temp buffer;
Dim BW As New BinaryWriter(File.OpenWrite(filepath))
BW.Write(Buffer, 0, numbytes)
BW.Close()
'-- copy contents of temp.bin into a byte buffer
fs = File.OpenRead(filepath)
Dim SdServerSend As SerialData = New SerialData
Dim bf As SoapFormatter = New SoapFormatter
'Dim Bf As BinaryFormatter = New BinaryFormatter
'-- deserialize memorystream into dsrecv as SerialData
Dim SocketListenerSDRecv As SerialData = CType(Bf.Deserialize(fs), SerialData)
'-- close filestream
fs.Close()
</code>
So the file i receive is temporarily stored on hdd and reread as a bytearray to de-serialize it into memory,
The deserializer turns up with the following error for soap formater:
ParserError. No assembly is attached to the soap formatter a1:http://schemas.microsoft.com/clr/nsassem/C1000Client/C1000Client%2C%20Version%3D1.0.1899.16105%2C%20Culture%3Dneutral%2C%20PublicKeyToken%3Dnull
SerialData;
binary formatter errorcould not find assembly version=1.0.1896.29558, culture=neutral, publickeytoken=null
The files in question both on server and listener are identical
either in SOAP;
<code><SOAP-ENV:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:clr="http://schemas.microsoft.com/soap/encoding/clr/1.0" SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
<SOAP-ENV:Body>
<a1:SerialData id="ref-1" xmlns:a1="http://schemas.microsoft.com/clr/nsassem/C1000Client/C1000Client%2C%20Version%3D1.0.1899.16105%2C%20Culture%3Dneutral%2C%20PublicKeyToken%3Dnull">
<PLCname id="ref-3">System001</PLCname>
<Type>EVENT</Type>
<File href="#ref-4"/>
</a1:SerialData>
<SOAP-ENC:Array id="ref-4" xsi:type="SOAP-ENC:base64">77u/PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0idXRmLTgiPz4NCjwhLS1YTUxFVkVOVC54bWwgY3JlYXRlZCBhdCAxNC0zLTIwMDUgMTA6MTY6MTIgb24gUExDIGV2ZW50LS0+DQo8SFdGWE1MVjEgeG1sbnM9Imh0dHA6Ly90ZW1wdXJpLm9yZy9IV0ZYTUxWMS54c2QiPg0KICA8VkVSU0lPTj4wMTwvVkVSU0lPTj4NCiAgPEFNU05FVElEPjE5Mi4xNjguMjU1LjIwNC4xLjE8L0FNU05FVElEPg0KICA8QklOPg0KICAgIDxJRD5UZXN0MTwvSUQ+DQogICAgPFZBTFVFPkZhbHNlPC9WQUxVRT4NCiAgICA8Q0FVU0U+RVZFTlQ8L0NBVVNFPg0KICAgIDxRVUFMSUZZPlZBTElEPC9RVUFMSUZZPg0KICAgIDxUWVBFPk1JTjwvVFlQRT4NCiAgICA8U1RBTVA+MTQtMy0yMDA1IDEwOjE1OjU4PC9TVEFNUD4NCiAgPC9CSU4+DQo8L0hXRlhNTFYxPg==</SOAP-ENC:Array>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope></code>
or in Binaryformatter;
<code>
" ÿÿÿÿ" ' IC1000Client, Version=1.0.1899.16105, Culture=neutral, PublicKeyToken=null" C1000Client.SerialData PLCnameTypeFile"C1000Client.Type' '' System001üÿÿÿC1000Client.Type" value__ ' " ¤" '<?xml version="1.0" encoding="utf-8"?>
<!--XMLEVENT.xml created at 14-3-2005 10:18:38 on PLC event-->
<HWFXMLV1 xmlns="http://tempuri.org/HWFXMLV1.xsd">
<VERSION>01</VERSION>
<AMSNETID>192.168.255.204.1.1</AMSNETID>
<BIN>
<ID>Test0</ID>
<VALUE>True</VALUE>
<CAUSE>EVENT</CAUSE>
<QUALIFY>VALID</QUALIFY>
<TYPE>MAX</TYPE>
<STAMP>14-3-2005 10:18:23</STAMP>
</BIN>
</HWFXMLV1>
</code>
If you make something idiotproof, someone else will make a better idiot.....
|
|
|
|
|
Hello guys,
Now I am trying to develope a software using GIS technology. I am using the SpatialWare to store spatial data in database (MS SQL Server 2000). But SpatialWare is not free, so I want to ask if you can tell me some software have same ablilties as SpatialWare and it's freeware. Could you tell me.
Thanks with best regards,
nobita3x
|
|
|
|
|
Have a look at the spatial extension of PostGreSql. I think its named PostGIS or something similar. Dont forget to look at the license. If I remember right it was rather restrictive.
|
|
|
|
|
Thanks Robert. But PostGIS is used for PostgreSQL database, not for MS SQL Server 2000. I hope U can tell me another that is used for MS SQL Server 2000.
Thank U very much.
nobita3x
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
