|
intibnin wrote:
please can you explain me way i must first press
SHIFT.
I think this something to do with the KeyPress event, but I can't remember what 
Anyway, you can bypass all this by just using the KeyDown instead of the KeyPress event, then use KeyCode instead of the KeyChar. It should work then
Notorious SMC
The difference between the almost-right word & the right word is a really large matter - it's the difference between the lightning bug and the Lightning
Mark Twain
Get your facts first, and then you can distort them as much as you please
Mark Twain
|
|
|
|
|
Hi, I'm iusing a Do..until loop to receive data from a modem, one of the conditions for the loop to finish is a boolean variable (bTimeOut), assined to TRUE when then Timer finish is count, i did like:
Settings.bTimeOut = False
Settings.Timer1.Enabled = True
Do
If Main.MSComm1.InBufferCount Then Buffer = Buffer & Main.MSComm1.Input
Loop Until (InStr(1, Buffer, Res & vbCrLf) Or (Settings.bTimeOut = True))
Settings.Timer1.Enabled = False
Settings.bTimeOut = False
The problem is that if, the modem answer is not like Res, the loop never ends, i cannot understand why does the Timer do not change my variable state, its function is like:
Public Sub Timer1_Timer()
bTimeOut = True
Timer1.Enabled = False
End Sub
Can anyone help me with this?
Thank you for your time
Rui
|
|
|
|
|
Have you checked that Settings.bTimeOut is actually being set? Add a watch to the Settings.bTimeOut in the loop and see if it's being set.
|
|
|
|
|
Thank you LeeDavies for your answer!
Yes, i tried checking the variable state during the loop, i even tried a MsgBox inside the Timer1 function, just to know if it was working!
The Timer interval is 2000, instead it never displays the MsgBox, can't understand why...
Could it be because, i keep reading from the modem..???
Rui
|
|
|
|
|
It's been staring me in the face all the time. The timer is not being started.
It should be timer1.Start and Timer1.Stop, not Timer1.enabled = true
|
|
|
|
|
hi ,
when form1 is loaded menuitem3 is disabled.
but when one clicks button1 in form2 the menuitem3 of form1 should get enabled ..
the code compiles successfully but it doesnt works as it should..
plz have a look
--bye
Aakash
|
|
|
|
|
I couldn't see your code, but you should try something like...
Form1.menuitem3.Enabled = True ...from Form2.
Jeremy Falcon
Imputek
<nobr>Excrement escapes everyone - even elders.
|
|
|
|
|
Friends,
I am very new to programming and have started with a new project which consist of a form which has 2 calander controls. I wanted to know how can I fetch data that was inputed into a database between two dates and show it into a grid. the date selection is dynamic. Any help will be appreicated.
|
|
|
|
|
look ,
when the data (date) is inside the database then u cant fetch it which lies between two dates.
1) first take the first calendar control of the form in one variable.
2) take the second calendar control date of the form in 2nd variable.
3) fetch the date from the database by binding it with a variable using a SELECT query and then match the third variable with the above 1st and 2nd variable and see if it lies between two the only display it.
--bye
|
|
|
|
|
Hi..
I posted this article as a reply to your answer ..
it also can help ather beginners..
click hte link to view the article with source code..
|
|
|
|
|
Hello HSPC
Thanks for the link to your article , I will work on it , Incase i encounter any problems , would you be able to assist me.
Thank you
Pras
|
|
|
|
|
sure..
if I have the time and the enough knoledge 
please send any comments you think about the article and rate it..
|
|
|
|
|
Hi all..
I use the web browser control on a vb6 form ..
the problem is :
if the user choosed to work offline (from Internet Explorer) the (connect / stay offline)dialog appears as soon as the form loads (before i try to navigate any page)
I want to prevent this from happenning ..
any suggestions?
|
|
|
|
|
Try stopping the browser firing till your ready. Look Here
|
|
|
|
|
Dim RS As AdodB.Recordset
Set RS = New AdodB.Recordset
Dim intCurrentRecord As Integer
Dim iOrderNo As String
Dim strProductCode As String
Dim strDesc As String
Dim iQuantity As Integer
Dim iPrice As Integer
iOrderNo = txtOrderNo.Text
strProductCode = Adodc3.RS("ProductCode")
strDesc = Adodc3.RS("ProductDesc")
iQuantity = Adodc3.RS("Quantity")
iPrice = Adodc3.RS("Price")
With intCurrentRecord
Dim editSQL As String
editSQL = "update OrderDetail set ProductCode = '" & strProductCode & "', ProductDesc = '" & strDesc & "', Quantity = " & iQuantity & ", Price = " & iPrice & ""
Set RS = Conn.Execute(editSQL)
End With
the (intended) purpose of the above code is that when the user pressed the edit button, having changed the details of the current record in the datagrid, that the SQL statement would execute the update. however, i am not referring to this current record properly, it is not recognising it, throwing an error of "method or data member not found", what can i do to fix this? thank you!
|
|
|
|
|
I wrote a multi page tiff editor. User can draw rectangles and delete pages. Another function is that you can convert .tiff files to PDF. I used Acrobat plug in for that. Every thing worlks fine. But the problem is that sometimes when the conversion is done, some random pages background is black in PDf. Can't figure out if is an Acrobat conversion issue or .Tiff issue when it is edited. If anyone had this problem, please let me know. Thanks a lot.
Zulfikar Ali
|
|
|
|
|
hi everybody!
I have a question. I'm working on a program for win98 that needs to copy large files over the network and i want to display a progress,
so the use does not try to close my program thinking it hung.
I know the is way to make the shell copy a file, but i can't remember it.
Can anyone please let me know how it is done.
(i can not use copy with progress, 2000 and xp only)
and I want to do it through api
Thank you in advance
ilya
|
|
|
|
|
|
Thank ! Thank ! Thank very much!
|
|
|
|
|
I would like to know how to print using VB.NET in a WEB FORM, NOT a windows form and NOT in plain vb. All the links on the net say how to do it using these last two rather than vb.NET WEB forms, and I cannot convert the code to vb.NET!!I don't want any user interaction so I want to be able to set the printer, and all printer settings from the code. I have been searching frantically and have not been able to find anything on the net. I want to print an html file, as it is seen in a web browser, not the html code
|
|
|
|
|
Can object names be designated in (VB.NET) dot syntax on the fly? e.g., in c#:
for (i=0;i<5;i++){
["bullet" + i].Text = list.ChildNodes[i].InnerText;
}
...would work, but this VB doesn't seem to:
For i = 0 To 4
("bullet" & i).Text = list.ChildNodes(i).InnerText
Next i
Is there a syntax in VB.NET that allow such a thing?
|
|
|
|
|
("bullet" & i). is interpreted as a string, try using the same syntax as in c#
["bullet" + i].Text = list.ChildNodes(i).InnerText
|
|
|
|
|
Yeah, I tried that first, but VB didn't seem to like it either.
|
|
|
|
|
For i = 0 To 4
("bullet" & i).Text = list.ChildNodes(i).InnerText
Next i
I didn't think it would work, that would 'break' vb's typing. I think that was part of the argument when they re-wrote sections before release. VB programmers panicked when they say what the new language was like. Personally the nearer to c# (apart from readability) the better.
|
|
|
|
|
I have in my VB:
Call MyCString(myStringCopy, k, lengthOfStrings)
with:
Dim myStringCopy As String ' no fixed size
Dim k
Dim lengthOfStrings
Dim MyString(0 To 2) As String
MyString(0) = "a"
MyString(0) = Left(MyString(0) & String(10, Chr(0)), 10)
MyString(1) = "bbbb "
MyString(1) = Left(MyString(1) & String(10, Chr(0)), 10)
MyString(2) = "mmmm"
MyString(2) = Left(MyString(2) & String(10, Chr(0)), 10)
For i = 0 To 2
myStringCopy = myStringCopy + MyString(i)
Next
===========
Public Declare Sub MyCString Lib "MyProj.dll" _
Alias "?MyCString@@YGXPAD@Z" (ByVal ByValString As String, numberOfStrings As Long, lengthOfStrings As Long)
====================
The C dll:
i
nt MakeArray(char* ByValString, int numberOfStrings, int lengthOfStrings, char*** pStringArray)
{
int i;
*pStringArray = (char**) malloc(numberOfStrings*sizeof(char*));
if (!(*pStringArray)) return(1);
for (i = 0 ; i < numberOfStrings ; i++)
{
(*pStringArray)[i] = &(ByValString[lengthOfStrings*i]);
}
return(0);
}
__declspec( dllexport ) void MyCString(char * ByValString,int numberOfStrings, int lengthOfStrings)
{
char** stringArray;
rtnVal = MakeArray(ByValString, numberOfStrings , lengthOfStrings, &stringArray);
printf(stringArray[1]);
free(stringArray);
}
I get bad dll calling convention.
Please help!!
Appreciate your help,
ns
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
