|
I'd like to replace the bytes in an existing filestream with the value of an update Int64 variable.
I don't think I can just write the variable to the stream.
I think I need to write a buffer at the appropriate point in the stream.
But how do I best get my new Int64 variable into a buffer?
Thanks!
|
|
|
|
|
Hello,
I have a project in VB6 where I create a icon in the system tray, and when the user selects the icon a popup appears. This is working correctly.
However, if I have a windows form loaded with vbModal (or the MsgBox) then the popup will not show.
Does anybody know how the solve this problem?
The code that I can using is similar to the code shown here: "http://www.codeguru.com/columns/vb/article.php/c6541/"
Thanks.
|
|
|
|
|
How I can enable or diable parent form's toolbar when user close the child form? There are 2 buttons on the child form Ok and Cancel.
If user press Cancel button then nothing should happend except closing the child form but if user click OK button then save button on parent forms' toolbar should disable.
How this can be solved?
Thanks in advance.
Ejaz
|
|
|
|
|
when opening the child form pass along an instance of the parent form:
dim frm as new child(me)
in child form constructor
private frm as parent
public sub new (p as parent)
frm = p
end sub
then when user clicks OK you should be able to access the button thru the instance of the parent
private sub OK_click
frm.button.enabled = false
end sub
hope this helps
If my help was helpfull let me know, if not let me know why.
The only way we learn is by making mistakes.
|
|
|
|
|
 hello
how can i convert this into time format?
1 = 60 //which is 1 minute is equal to 60 seconds
time = 2700 // this should be outputed as 00:45:00
a = format(time, "00:00:00")
a = 27:00
//how can i convert 2700 in time to make 00:45:00 in vb6?
|
|
|
|
|
look at timeserial(0,0,2700)
|
|
|
|
|
Hi,
I'm having BIG problems with the substring method.
I have a really big string and I need to extract data from this string; and for that I use substring, but it does not return a good value.
pointer = InStr(startingPointer, readout, Chr(13) + Chr(10))
If startFlag = True Then ' IGNORE this
line = readout.Substring(startingPointer - 1, pointer - 1) ' This block of code executes only once. ignore this .
pocetniPointer = pointer + 2
Else
line = readout.Substring(startingPointer, pointer + 2)
End If
I have debugg countless times. After couple of loops the variable line just adds up found substrings. For example after 5 loops startingPointer is 135 and pointer is 145 by the look of the second block in the else statement the line should return the string of 12 characters but instead it return the number close to 100+ characters.
It does not give a new value to the line it just adds up to the old value. This is the only code that uses the variable line.
Please help!
Thank you!
|
|
|
|
|
substring(startposition,length)
so when startingpointer is 135 and pointer is 145 you will get a string of 145 length
if you only want the 12 characters substract startingpointer from pointer before using it
hope this helps
If my help was helpfull let me know, if not let me know why.
The only way we learn is by making mistakes.
|
|
|
|
|
how to make a text box to accept n no of characters?? n is above the range of the default no of characters in text box.. if we have to do an active x wot property should be changed in order to do that??
Thank u,
Freak8802
|
|
|
|
|
are you talking about maxlength or we need more clarification....
|
|
|
|
|
ya wot i need i have to put unlimited char in the control(txt box).. how do we do it??
Thank u,
Freak8802
|
|
|
|
|
By default, a textbox's default MaxLength value is set to "32767" characters long.
Since the field type for the MaxLength property is Int32, the highest value that you could set it to would be "2147483647".
Hope this helps,
Mitch
|
|
|
|
|
the question is how do u change the int32 type value to other type.. i tot of putting it in variant??(i wasnt sure if i can) how do u change that value of the max len prop??
Thank u,
Freak8802
|
|
|
|
|
Hi everybody
I have a collection of word document which has got lots of Embedded image object inside it.
now what i have to do is read each word document and save out each embedded images to my hard drive ?
how do i do this without using clipboard method ?
Using the following code :
Dim word_doc As Microsoft.Office.Interop.Word.Document
word_doc = word_app.Documents.Open(FileName:="E:\testing.doc", ConfirmConversions:=False, ReadOnly:=True, AddToRecentFiles:=False, Format:=Microsoft.Office.Interop.Word.WdOpenFormat.wdOpenFormatAuto)
' Delete InlineShapes.
With word_doc.InlineShapes
Do While .Count > 0
.Item(1).Delete()
Loop
End With
i can find any inline objects and delete it . but what i want is not to delete but to save out to the hard drive ?
Any idea ?
regards
suis
|
|
|
|
|
Hello,
Am developing a multi-threaded application.
I have a time consuming task that is to save all the data to xml. This takes time so I am doing it in a thread. However, when the thread is started, I would like to open up a new form rather than have the user wait for the save to finish, then open a new form.
However, the new form never opens until the work is completed and the UI is not responding.
In the output window i can see that the threads are existed everytime they go to the sub procedure to save the XML. I think that all the work has to be done in the thread procedure and cannot call other procedures, but not sure about this
Many thanks for your help.
<br />
'Form load event<br />
public sub FormLoad<br />
dim threadSaveXML as new System.Threading(Addressof SaveXML)<br />
threadSaveXML.Start()<br />
<br />
'Open the new form while the data is still currently being saved. Do not wait for the data to be saved first<br />
Dim objOrders as new frmOrders()<br />
objOrders.Show()<br />
<br />
'Hide the current form so the process can still take place in the background.<br />
me.hide()<br />
End Sub<br />
<br />
<br />
'Calls the sub procedures to save the actual data to xml.<br />
private sub SaveXML()<br />
SaveBeverages()<br />
SaveMainCourse()<br />
etc.....<br />
End Sub<br />
<br />
private sub SaveBeverages()<br />
'saves to xml<br />
end sub<br />
<br />
private sub SaveMainCourse()<br />
'Saves to xml<br />
end sub<br />
<code>
|
|
|
|
|
steve_rm wrote: 'Form load event
public sub FormLoad
dim threadSaveXML as new System.Threading(Addressof SaveXML)
threadSaveXML.Start()
Try this code instead:
dim threadSaveXML as new System.Threading.Thread(New ThreadStart(Addressof SaveXML))
threadSaveXML.Start()
Hope it helps !
AliAmjad(MCP)
First make it Run THEN make it Run Fast!
|
|
|
|
|
hi all,
i have developed an application in vb6 with ms-sql7, using the dataenvironment reportings i have developed some reports.
The proble is this when i want to print the a report on lazer printer it give me desired result,but when print on a dot-matrix printer it gives me very different result.
Please help me to sort out my problem.
thanks in advance
rmshah
rmshah
Sr. Developer
|
|
|
|
|
r_mohd wrote: it gives me very different result
Vasudevan Deepak Kumar
Personal Homepage
Tech Gossips
Yesterday is a canceled check. Tomorrow is a promissory note. Today is the ready cash. USE IT.
|
|
|
|
|
i mean to say, when i use lazer printr it gives me accurate result on A4 paper, but on dotmatrix when i use continue stationery the same report, it resulted me very diffrent. the report start from closer to the top and ends in the middle, rest paper it keep blank and move to the next page,while on A4 size paper on lazer printer it strat after a margin as i desired and end at the bottom.
thanks
rmshah
Sr. Developer
|
|
|
|
|
Sounds like your printer settings are wrong - the non printable margins incorrect?
|
|
|
|
|
Printers will return reports in slightly different formats even though they may be encoded to use A4.
This is just a fact of IT life.
The only way around this is:
.1)Ensure that the you have the correct drivers for the dot matrix.
.2)Design the report for the printer it is being printed on.
.3)Resign yourself to the fact there really is no way around this sort of problem other than tweaking the report layout in your code.
.4)Get rid of the dot matrix and replace it with a laser.
One of my reports produces barcodes on, standard sized, small labels.
Every time my client changes their laser printer I have to tweak the report by a few millimetres.
Good luck...
You always pass failure on the way to success.
|
|
|
|
|
Thanks a lot for your support.
rmshah
Sr. Developer
|
|
|
|
|
hello,,, please help me
How to create sub report in report(.rdlc) not crystalreport using VB.net 2005
Thank's
|
|
|
|
|
Hi
How to setup to two headers in gridview. Top header would cover two columns and second header one column.
........Food
....Bev Hambergers
Thanks
|
|
|
|
|
Try using these codes to make the cells appear as merged:
DataGridView1.AdvancedCellBorderStyle.Left = DataGridViewAdvancedCellBorderStyle.None
DataGridView1.AdvancedCellBorderStyle.Right = DataGridViewAdvancedCellBorderStyle.None
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
