[nsbasic-ce] Re: Grid click
OK now the event "_Click" work on two forms, now I will make test on my project. Why this not work when I use the AddObject?? Why I not see the properties from the this object? Thx for you help. EMERSON VIER --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > Try again, this time creating the form with the Grid on it, not created > in your own code with AddObject. > > >This is a Code > > > >ShowOKButton True 'Set Close button to OK > > > >Sub Form1_Load() > > AddObject "grid","grid",0,10,240,100 > > grid.cols=3 > > grid.rows=4 > > grid.TextMatrix(0, 0) = "Kenny" > > grid.TextMatrix(1, 0) = "Carmen" > > grid.TextMatrix(2, 0) = "Kyle" > > grid.TextMatrix(3, 0) = "Eric" > > > > grid.TextMatrix(0, 1) = "Grossman" > > grid.TextMatrix(1, 1) = "Crabtree" > > grid.TextMatrix(2, 1) = "Garrison" > > grid.TextMatrix(3, 1) = "Cartman" > > > > grid.TextMatrix(0, 2) = "Denver" > > grid.TextMatrix(1, 2) = "Boulder" > > grid.TextMatrix(2, 2) = "South Park" > > grid.TextMatrix(3, 2) = "Lakeview" > > > >End Sub > > > > > >Sub CommandButton1_Click > > Form1_Hide > > Form2_Show > >End Sub > > > >Sub grid_Click > > MsgBox "grid" > >End Sub > > > >Sub Form2_Load() > > AddObject "grid","grid1",0,0,240,150 > > grid1.cols=3 > > grid1.rows=4 > > grid1.TextMatrix(0, 0) = "1Kenny" > > grid1.TextMatrix(1, 0) = "1Carmen" > > grid1.TextMatrix(2, 0) = "1Kyle" > > grid1.TextMatrix(3, 0) = "1Eric" > > > > grid1.TextMatrix(0, 1) = "1Grossman" > > grid1.TextMatrix(1, 1) = "1Crabtree" > > grid1.TextMatrix(2, 1) = "1Garrison" > > grid1.TextMatrix(3, 1) = "1Cartman" > > > > grid1.TextMatrix(0, 2) = "1Denver" > > grid1.TextMatrix(1, 2) = "1Boulder" > > grid1.TextMatrix(2, 2) = "1South Park" > > grid1.TextMatrix(3, 2) = "1Lakeview" > >End Sub > > > >Sub grid1_Click > >MsgBox "grid1" > >End Sub > >'*** Begin Generated Code *** > > > > > >Form1_Show 'Default Form > > > >Dim Form1_Temp > >Sub Form1_Show > > On Error Resume Next > > > > UpdateScreen > > > > If IsEmpty(Form1_Temp) Then > > AddObject "Frame", "Form1_Form", 0, 0, Output.Width, Output.Height > > Form1_Form.Visible = False > > Form1_Form.BackColor = 12632256 > > AddObject "PictureBox", "Form1", 0, 0, 0, 0, Form1_Form > > Form1.BorderStyle = 0 > > Form1.Move 0, 0, Form1_Form.Width * 15, Form1_Form.Height * 15 > > Set Form1_Temp = Form1 > > Form1_Form.Caption = "Form1" > > > > AddObject "CommandButton", "CommandButton1", 76, 184, 108, 21, > >Form1_Form > > CommandButton1.Caption = "Goto Form2" > > CommandButton1.FontSize = 8.25 > > CommandButton1.BackColor = 12632256 > > ' > > End If > > On Error Goto 0 > > Form1_Form.Visible = True > > callIfExists("Form1_Load") > >End Sub 'Form1_Show > > > >Sub Form1_Hide > > If IsEmpty(Form1_Temp) Then > > Err.Raise 44000, , "Form not loaded" > > Exit Sub > > End If > > > > Form1_Form.Visible = False > > callIfExists("Form1_Unload") > >End Sub 'Form1_Hide > >Dim Form2_Temp > >Sub Form2_Show > > On Error Resume Next > > > > UpdateScreen > > > > If IsEmpty(Form2_Temp) Then > > AddObject "Frame", "Form2_Form", 0, 0, Output.Width, Output.Height > > Form2_Form.Visible = False > > Form2_Form.BackColor = 12632256 > > AddObject "PictureBox", "Form2", 0, 0, 0, 0, Form2_Form > > Form2.BorderStyle = 0 > > Form2.Move 0, 0, Form2_Form.Width * 15, Form2_Form.Height * 15 > > Set Form2_Temp = Form2 > > Form2_Form.Caption = "Form2" > > > > End If > > On Error Goto 0 > > Form2_Form.Visible = True > > callIfExists("Form2_Load") > >End Sub 'Form2_Show > > > >Sub Fo
[nsbasic-ce] Re: Grid click
This is a Code ShowOKButton True 'Set Close button to OK Sub Form1_Load() AddObject "grid","grid",0,10,240,100 grid.cols=3 grid.rows=4 grid.TextMatrix(0, 0) = "Kenny" grid.TextMatrix(1, 0) = "Carmen" grid.TextMatrix(2, 0) = "Kyle" grid.TextMatrix(3, 0) = "Eric" grid.TextMatrix(0, 1) = "Grossman" grid.TextMatrix(1, 1) = "Crabtree" grid.TextMatrix(2, 1) = "Garrison" grid.TextMatrix(3, 1) = "Cartman" grid.TextMatrix(0, 2) = "Denver" grid.TextMatrix(1, 2) = "Boulder" grid.TextMatrix(2, 2) = "South Park" grid.TextMatrix(3, 2) = "Lakeview" End Sub Sub CommandButton1_Click Form1_Hide Form2_Show End Sub Sub grid_Click MsgBox "grid" End Sub Sub Form2_Load() AddObject "grid","grid1",0,0,240,150 grid1.cols=3 grid1.rows=4 grid1.TextMatrix(0, 0) = "1Kenny" grid1.TextMatrix(1, 0) = "1Carmen" grid1.TextMatrix(2, 0) = "1Kyle" grid1.TextMatrix(3, 0) = "1Eric" grid1.TextMatrix(0, 1) = "1Grossman" grid1.TextMatrix(1, 1) = "1Crabtree" grid1.TextMatrix(2, 1) = "1Garrison" grid1.TextMatrix(3, 1) = "1Cartman" grid1.TextMatrix(0, 2) = "1Denver" grid1.TextMatrix(1, 2) = "1Boulder" grid1.TextMatrix(2, 2) = "1South Park" grid1.TextMatrix(3, 2) = "1Lakeview" End Sub Sub grid1_Click MsgBox "grid1" End Sub '*** Begin Generated Code *** Form1_Show 'Default Form Dim Form1_Temp Sub Form1_Show On Error Resume Next UpdateScreen If IsEmpty(Form1_Temp) Then AddObject "Frame", "Form1_Form", 0, 0, Output.Width, Output.Height Form1_Form.Visible = False Form1_Form.BackColor = 12632256 AddObject "PictureBox", "Form1", 0, 0, 0, 0, Form1_Form Form1.BorderStyle = 0 Form1.Move 0, 0, Form1_Form.Width * 15, Form1_Form.Height * 15 Set Form1_Temp = Form1 Form1_Form.Caption = "Form1" AddObject "CommandButton", "CommandButton1", 76, 184, 108, 21, Form1_Form CommandButton1.Caption = "Goto Form2" CommandButton1.FontSize = 8.25 CommandButton1.BackColor = 12632256 ' End If On Error Goto 0 Form1_Form.Visible = True callIfExists("Form1_Load") End Sub 'Form1_Show Sub Form1_Hide If IsEmpty(Form1_Temp) Then Err.Raise 44000, , "Form not loaded" Exit Sub End If Form1_Form.Visible = False callIfExists("Form1_Unload") End Sub 'Form1_Hide Dim Form2_Temp Sub Form2_Show On Error Resume Next UpdateScreen If IsEmpty(Form2_Temp) Then AddObject "Frame", "Form2_Form", 0, 0, Output.Width, Output.Height Form2_Form.Visible = False Form2_Form.BackColor = 12632256 AddObject "PictureBox", "Form2", 0, 0, 0, 0, Form2_Form Form2.BorderStyle = 0 Form2.Move 0, 0, Form2_Form.Width * 15, Form2_Form.Height * 15 Set Form2_Temp = Form2 Form2_Form.Caption = "Form2" End If On Error Goto 0 Form2_Form.Visible = True callIfExists("Form2_Load") End Sub 'Form2_Show Sub Form2_Hide If IsEmpty(Form2_Temp) Then Err.Raise 44000, , "Form not loaded" Exit Sub End If Form2_Form.Visible = False callIfExists("Form2_Unload") End Sub 'Form2_Hide Sub CallIfExists(theSub) Dim s If ScriptEngineMajorVersion < 5 Then Execute("On Error Resume Next:"&theSub) 'attempt to execute it Else On Error Resume Next Set s = GetRef(theSub) If err.Number <> 0 Then Exit Sub 'it does not exist On Error GoTo 0 Execute (theSub) 'execute it End If End Sub '*** End Generated Code *** --- In nsbasic...@yahoogroups.com, "Bob Katayama" wrote: > > Save the nsb file as a txt file and you can see the generated code once you > open the txt file in a text reader. > > > > Bob > > > > From: nsbasic...@yahoogroups.com [mailto:nsbasic...@yahoogroups.com] On > Behalf Of EMERSON VIER > Sent: Sunday, July 26, 2009 5:45 PM > To: nsbasic...@yahoogroups.com > Subject: [nsbasic-ce] Re: Grid click > > > > > > Sorry but I do not understand your reply > > EMERSON VIER > > --- In nsbasic...@yahoogroups.com <mailto:nsbasic-ce%40yahoogroups.com> , > George Henne wrote: > > > > Have a look to how the generated code does this. Create a form with a > > grid on it, save it as txt file, then open in Notepad. > > > > Sent from my iPhone > > >
[nsbasic-ce] Re: Grid click
Sorry but I do not understand your reply EMERSON VIER --- In nsbasic...@yahoogroups.com, George Henne wrote: > > Have a look to how the generated code does this. Create a form with a > grid on it, save it as txt file, then open in Notepad. > > Sent from my iPhone > > On Jul 19, 2009, at 2:06 PM, EMERSON VIER > wrote: > > > > > > > The problem, is grid_click only work on default form > > Emerson Vier > > > > From: rmrsoft > > Sent: domingo, 19 de julho de 2009 09:58 > > To: nsbasic...@yahoogroups.com > > Subject: [nsbasic-ce] Re: Grid click > > > > I don't have much experience of multiple forms, but if you want > > multiple grids I find it easier to put them both on the same Form > > and then use the MOVE command to decide which one is 'live' > > > > So you get: > > > > AddObject "grid","grid",9000,0,240,150 > > AddObject "grid","grid1",9000,0,240,150 > > > > Then to use the first Grid use > > > > grid1.Move 9000 > > grid.move 0 > > > > And to switch to the second grid > > > > grid.Move 9000 > > grid1.move 0 > > > > Cheers > > > > Al > > > > --- In nsbasic...@yahoogroups.com, "EMERSON VIER" > > wrote: > > > > > > I use the "AddObject" > > > > > > Sub Form1_Load() > > > > > > On Error resume next > > > AddObject "grid","grid",0,0,240,150 > > > If err Then > > > MsgBox "Grid control not installed. Please check the Re adMe > > file's section on ""Install Device Components"" for more > > information.",,"Grid" > > > Bye > > > End If > > > On Error Goto 0 > > > > > > > > > grid.cols=3 > > > grid.rows=4 > > > > > > grid.TextMatrix(0, 0) = "Kenny" > > > grid.TextMatrix(1, 0) = "Carmen" > > > grid.TextMatrix(2, 0) = "Kyle" > > > grid.TextMatrix(3, 0) = "Eric" > > &g > > > > > > > > [The entire original message is not included] > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
RE: [nsbasic-ce] Re: Grid click
The problem, is grid_click only work on default form Emerson Vier -Original Message- From: rmrsoft Sent: domingo, 19 de julho de 2009 09:58 To: nsbasic...@yahoogroups.com Subject: [nsbasic-ce] Re: Grid click I don't have much experience of multiple forms, but if you want multiple grids I find it easier to put them both on the same Form and then use the MOVE command to decide which one is 'live' So you get: AddObject "grid","grid",9000,0,240,150 AddObject "grid","grid1",9000,0,240,150 Then to use the first Grid use grid1.Move 9000 grid.move 0 And to switch to the second grid grid.Move 9000 grid1.move 0 Cheers Al --- In nsbasic...@yahoogroups.com, "EMERSON VIER" wrote: > > I use the "AddObject" > > Sub Form1_Load() > > On Error resume next > AddObject "grid","grid",0,0,240,150 > If err Then > MsgBox "Grid control not installed. Please check the ReadMe file's section > on ""Install Device Components"" for more information.",,"Grid" > Bye > End If > On Error Goto 0 > > > grid.cols=3 > grid.rows=4 > > grid.TextMatrix(0, 0) = "Kenny" > grid.TextMatrix(1, 0) = "Carmen" > grid.TextMatrix(2, 0) = "Kyle" > grid.TextMatrix(3, 0) = "Eric" &g [The entire original message is not included] --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
RE: [nsbasic-ce] Re: Grid click
The problem, is grid_click only work on default form Emerson Vier -Original Message- From: rmrsoft Sent: domingo, 19 de julho de 2009 09:58 To: nsbasic...@yahoogroups.com Subject: [nsbasic-ce] Re: Grid click I don't have much experience of multiple forms, but if you want multiple grids I find it easier to put them both on the same Form and then use the MOVE command to decide which one is 'live' So you get: AddObject "grid","grid",9000,0,240,150 AddObject "grid","grid1",9000,0,240,150 Then to use the first Grid use grid1.Move 9000 grid.move 0 And to switch to the second grid grid.Move 9000 grid1.move 0 Cheers Al --- In nsbasic...@yahoogroups.com, "EMERSON VIER" wrote: > > I use the "AddObject" > > Sub Form1_Load() > > On Error resume next > AddObject "grid","grid",0,0,240,150 > If err Then > MsgBox "Grid control not installed. Please check the ReadMe file's section > on ""Install Device Components"" for more information.",,"Grid" > Bye > End If > On Error Goto 0 > > > grid.cols=3 > grid.rows=4 > > grid.TextMatrix(0, 0) = "Kenny" > grid.TextMatrix(1, 0) = "Carmen" > grid.TextMatrix(2, 0) = "Kyle" > grid.TextMatrix(3, 0) = "Eric" &g [The entire original message is not included] --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: Grid click
I use the "AddObject" Sub Form1_Load() On Error resume next AddObject "grid","grid",0,0,240,150 If err Then MsgBox "Grid control not installed. Please check the ReadMe file's section on ""Install Device Components"" for more information.",,"Grid" Bye End If On Error Goto 0 grid.cols=3 grid.rows=4 grid.TextMatrix(0, 0) = "Kenny" grid.TextMatrix(1, 0) = "Carmen" grid.TextMatrix(2, 0) = "Kyle" grid.TextMatrix(3, 0) = "Eric" grid.TextMatrix(0, 1) = "Grossman" grid.TextMatrix(1, 1) = "Crabtree" grid.TextMatrix(2, 1) = "Garrison" grid.TextMatrix(3, 1) = "Cartman" grid.TextMatrix(0, 2) = "Denver" grid.TextMatrix(1, 2) = "Boulder" grid.TextMatrix(2, 2) = "South Park" grid.TextMatrix(3, 2) = "Lakeview" End Sub Sub grid_Click MsgBox "grid" End Sub Sub Form2_Load() On Error resume next AddObject "grid","grid1",0,0,240,150 If err Then MsgBox "Grid control not installed. Please check the ReadMe file's section on ""Install Device Components"" for more information.",,"Grid" Bye End If On Error Goto 0 grid1.cols=3 grid1.rows=4 grid1.TextMatrix(0, 0) = "1Kenny" grid1.TextMatrix(1, 0) = "1Carmen" grid1.TextMatrix(2, 0) = "1Kyle" grid1.TextMatrix(3, 0) = "1Eric" grid1.TextMatrix(0, 1) = "1Grossman" grid1.TextMatrix(1, 1) = "1Crabtree" grid1.TextMatrix(2, 1) = "1Garrison" grid1.TextMatrix(3, 1) = "1Cartman" grid1.TextMatrix(0, 2) = "1Denver" grid1.TextMatrix(1, 2) = "1Boulder" grid1.TextMatrix(2, 2) = "1South Park" grid1.TextMatrix(3, 2) = "1Lakeview" End Sub Sub grid1_Click MsgBox "grid1" End Sub Sub CommandButton1_Click Form1.Hide Form2_Show End Sub --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > How are you creating the grid? Are you using AddObject in your code, or > is it being created as part of your form? > > >I try again and events "click" only work on Default Form, if I try this > >on other Form not work, I not get any error messages > > > >EMERSON VIER > > > >--- In nsbasic...@yahoogroups.com, "George Henne" wrote: > >> > >> There is not enough info here to give much help. > >> > >> Have you added a grid object named "grid" to your project? > >> > >> Do you get any error messages? > >> > >> >I use the sample grid.nsb and includ the code > >> > > >> >Sub grid_Click > >> > > >> > Dim Linha > >> > Dim Coluna > >> > Coluna = grid.col > >> > Linha = grid.row > >> > MsgBox Grid.TextMatrix(Linha,Coluna) > >> > > >> >End Sub > >> > > >> >This work very well. > >> > > >> >I include this code in other project, this not work, not any > >information;... > >> > > >> >EMERSON VIER > >> > > >> > > >> > > >> > > >> > > >> > > >> > > >> >Yahoo! Groups Links > >> > > >> > > >> > > >> > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
RE: [nsbasic-ce] How get Form name Show
How I get current Status? -Original Message- From: George Henne Sent: sábado, 18 de julho de 2009 07:29 To: nsbasic...@yahoogroups.com Subject: Re: [nsbasic-ce] How get Form name Show I'm not sure what you are asking here. If you want to be able to check that status of a particular form, it might be easiest to keep a global variable for each form with its current status. >My app has many form , How I get the form is Enable or Visible? > >EMERSON VIER > > > > > >Yahoo! Groups Links > > > Messages in this topic (2) [The entire original message is not included] --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
RE: [nsbasic-ce] How get Form name Show
How I get current Status? -Original Message- From: George Henne Sent: sábado, 18 de julho de 2009 07:29 To: nsbasic...@yahoogroups.com Subject: Re: [nsbasic-ce] How get Form name Show I'm not sure what you are asking here. If you want to be able to check that status of a particular form, it might be easiest to keep a global variable for each form with its current status. >My app has many form , How I get the form is Enable or Visible? > >EMERSON VIER > > > > > >Yahoo! Groups Links > > > Messages in this topic (2) [The entire original message is not included] --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: Grid click
George, You have news about this? Regards, Emerson Vier --- In nsbasic...@yahoogroups.com, "EMERSON VIER" wrote: > > I try again and events "click" only work on Default Form, if I try this on > other Form not work, I not get any error messages > > EMERSON VIER > > --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > > > There is not enough info here to give much help. > > > > Have you added a grid object named "grid" to your project? > > > > Do you get any error messages? > > > > >I use the sample grid.nsb and includ the code > > > > > >Sub grid_Click > > > > > > Dim Linha > > > Dim Coluna > > > Coluna = grid.col > > > Linha = grid.row > > > MsgBox Grid.TextMatrix(Linha,Coluna) > > > > > >End Sub > > > > > >This work very well. > > > > > >I include this code in other project, this not work, not any > > >information;... > > > > > >EMERSON VIER > > > > > > > > > > > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] How get Form name Show
My app has many form , How I get the form is Enable or Visible? EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: Sending Mail
Please send again the your link from microsoft. Yesterday I make research about tmail, I tested this parameters, not worked. I try send mail to CC and BCC not worked too. http://www.cjcraft.com/blog/2008/10/02/HowToOpenAMailInInboxUsingPocketOutlook.aspx How to open a mail in Inbox using Pocket Outlook I need to open a new email message in Pocket Outlook today. Keep in mind that's different from just programmatically sending an email from my application. Here's how to programmatically send an email from your application: 1: Microsoft.WindowsMobile.PocketOutlook.EmailMessage email = new EmailMessage(); 2: email.From = "From"; 3: email.BodyText = "BodyText"; 4: email.To = "To"; 5: email.Subject = "Subject"; 6: email.Send("AccountName"); Here's how to programmatically create a new mail message in Pocket Outlook and more: [Source: Open a Specific Email Account in Pocket Outlook? - WM Experts] * To open inbox for MyMail: o tmail.exe -service MyMail * To additionally launch a new message with no recipient for sending: o tmail.exe -service MyMail -to "" * To have the new message pre-addressed: o tmail.exe -service MyMail -to nob...@nowhere.com * To add a cc (copy to): o tmail.exe -service MyMail -to nob...@nowhere.com -cc someb...@somewhere.com * To add a bcc (blind copy): o tmail.exe -service MyMail -to nob...@nowhere.com -bcc someb...@somewhere.com * To have the new message pre-addressed to multiple addresses: o tmail.exe -service MyMail -to nob...@nowhere.com;someb...@somewhere.com;that...@thatplace.com * To additionally add the subject line "Call Me Tonight": o tmail.exe -service MyMail -to nob...@nowhere.com -subject "Call Me Tonight" * To additionally add a message in the body: o tmail.exe -service MyMail -to nob...@nowhere.com -subject "Call Me Tonight" -body "at 555-1212" * To attach the file "Recipe.xls" in the "My Documents" folder: o tmail.exe -service MyMail -to nob...@nowhere.com -subject "Call Me Tonight" -body "at 555-1212" -attach "\My Documents\Recipe.xls" Yes I need help for this. EMERSON VIER --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > I can't find documentation for tmail anywhere on the Microsoft site, > except for this: > <http://social.msdn.microsoft.com/Forums/en-US/windowsmobiledev/thread/ > 17b05c07-1423-4c1a-add1-849352d3b6a8> > > "Probably nowhere but here are some: > > -service "" (You're choosing the service You want to use: > SMS, MMS etc.) > -bcc "" > -cc "" > -to "" > -subject "" > -body "" > -attach "" (attaches the file when using e-mail service) > -RunInBKG (runs tmail.exe in background, used in \Windows\Startup) > -sync (opens an Active Sync to synchronize the mail) > -open "" (opens tmail.exe in selected folder, like Inbox, > OutBox etc.) > > I know that there's also a -transport parameter but don't know what's it for. > There should be also some params to send a message prepared from first 7 > parameters listed here." > > Let me know if this helps - the tech note should be updated. > > >I use the Technote 32 for send mail, OK. > > > >But not send the attach FILE > > > >I use this code > > > >eTo="mailto:"; & "info© n..." > >eSubject="?subject=" & "Email sent from NS Basic/CE on a 2002 device!" > >eBody="&body=" & "Hello, NS Basic people!" > >eAttachment="&attach=" & "benchmark.nsb" > >shellExecute "open","tmail.exe", eTo & eSubject & eBody > > > >I trys this too > > > >shellExecute "open","tmail.exe", eTo & eSubject & eBody & eAttachment > > > >EMERSON VIER > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Sending Mail
I use the Technote 32 for send mail, OK. But not send the attach FILE I use this code eTo="mailto:"; & "info© n..." eSubject="?subject=" & "Email sent from NS Basic/CE on a 2002 device!" eBody="&body=" & "Hello, NS Basic people!" eAttachment="&attach=" & "benchmark.nsb" shellExecute "open","tmail.exe", eTo & eSubject & eBody I trys this too shellExecute "open","tmail.exe", eTo & eSubject & eBody & eAttachment EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: Grid click
I try again and events "click" only work on Default Form, if I try this on other Form not work, I not get any error messages EMERSON VIER --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > There is not enough info here to give much help. > > Have you added a grid object named "grid" to your project? > > Do you get any error messages? > > >I use the sample grid.nsb and includ the code > > > >Sub grid_Click > > > > Dim Linha > > Dim Coluna > > Coluna = grid.col > > Linha = grid.row > > MsgBox Grid.TextMatrix(Linha,Coluna) > > > >End Sub > > > >This work very well. > > > >I include this code in other project, this not work, not any information;... > > > >EMERSON VIER > > > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: What the best way to show picture
Thx George, Work very well. Now I try use the event "Click" on my projetc I had four form on the Default form this event work, but on other form not work... EMERSON VIER --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > Use the PictureBox object. > > To display an image, set the Picture property to the pathname to your image. > <http://www.nsbasic.com/ce/info/technotes/TN13.htm> > > George Henne > NS BASIC Corporation > http://www.nsbasic.com > > >What the best way to show picture, I read the technoteS but I not > >undested, I need click button and show on picture.. > > > >EMERSON VIER > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] What the best way to show picture
What the best way to show picture, I read the technoteS but I not undested, I need click button and show on picture.. EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Grid click
I use the sample grid.nsb and includ the code Sub grid_Click Dim Linha Dim Coluna Coluna = grid.col Linha = grid.row MsgBox Grid.TextMatrix(Linha,Coluna) End Sub This work very well. I include this code in other project, this not work, not any information;... EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: How send email on HTML format
I think need set the Content-type to text/html but how I make this? EMERSON VIER --- In nsbasic...@yahoogroups.com, "EMERSON VIER" wrote: > > If I undested, where I found more informantion about this. > > EMERSON VIER > > --- In nsbasic...@yahoogroups.com, "Chris Kenworthy" wrote: > > > > Hi. I'll just throw in that the IPworks ActiveX edition (which we get a > > free deal on last I heard!) has an HTMLMailer function built right in, > > which may be easier than trying to build the format yourself. > > > > --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > > > > > Do a bit of reading up on the format here - I believe that HTML text > > > gets sent as an attachement. > > > > > > >I need send the email on HTML format I try include this text on body > > > >email > > > > > > > > > > > > > > > > > > > > This my First Web page > > > > > > > > > > > > > > > > Hurrah! This my First Web page. > > > > > > > > > > > > > > > > > > > >But I recive the same format. > > > > > > > >EMERSON VIER > > > > > > > > > > > > > > > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > > > > > > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: How send email on HTML format
If I undested, where I found more informantion about this. EMERSON VIER --- In nsbasic...@yahoogroups.com, "Chris Kenworthy" wrote: > > Hi. I'll just throw in that the IPworks ActiveX edition (which we get a free > deal on last I heard!) has an HTMLMailer function built right in, which may > be easier than trying to build the format yourself. > > --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > > > Do a bit of reading up on the format here - I believe that HTML text > > gets sent as an attachement. > > > > >I need send the email on HTML format I try include this text on body email > > > > > > > > > > > > > > > This my First Web page > > > > > > > > > > > > Hurrah! This my First Web page. > > > > > > > > > > > > > > >But I recive the same format. > > > > > >EMERSON VIER > > > > > > > > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] How send email on HTML format
I need send the email on HTML format I try include this text on body email This my First Web page Hurrah! This my First Web page. But I recive the same format. EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] How open .txt file?
I need open .txt file and use data from this how I make this? EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: Is app open on device?
I try test my program on SDCARD, I back to device and work. EMERSON VIER --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > We give this message when the copy to the device fails. The most likely > reason is that the app is open on the device, but it could also happen > if the directory is not there. > > Are you installing to the Device or Storage Card? (You need to do Device.) > > Unfortunately, there isn't much information that comes back to tell us > why it failed. > > >I use the "F6" to install file on emulator and device, I recive the > >message "Is app open on device? Cannot copy to: ", but my > >program is not open... > > > >To work I need use the "F5" to install the files. > > > >EMERSON VIER > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Is app open on device?
I use the "F6" to install file on emulator and device, I recive the message "Is app open on device? Cannot copy to: ", but my program is not open... To work I need use the "F5" to install the files. EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] How I make my software completely finger-friendly?
I use many Combox on my software, but to select option I need use the pen, whith the finger is very hard, how I make this finger-friendly? EMERSON VIER HTC TOUCH HD --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] MGCEBarsNPops.exe not install
I try test this http://www.nsbasic.com/ce/info/BigRedToolbox/samples/Popup.htm addobject "MGCEBarsNPops.PopupMenu", "Menu", 0, 0, 0, 0 addobject "CommandButton", "ShowMenu", 10, 10, 80, 20 ShowMenu.Caption = "Show Menu" Menu.Add "&Item 1" Menu.Add "I&tem 2" Menu.Add "It&em 3" Menu.Add "Ite&m 4" Menu.Add "-" Menu.Add "Cancel" Menu.Enabled( 4 ) = FALSE sub ShowMenu_Click Menu.Show 0, 60, 20 end sub sub Menu_Click( text ) if text = "Cancel" then exit sub MsgBox text & " was selected" end sub I download the MGCEBarsNPops.exe from this link http://www.nsbasic.com/ce/info/BigRedToolbox/ and try instal on emulator 6.1.4 Professional 480x800 recive this message " Control Set not support the connect device type" EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] How KeyboardStatus show Numeric Keyboard
I use the KeyboardStatus = -1 to show Keyboard, it´s OK show the complet Keyboard, how I show only numeric Keyboard? EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
Res: [nsbasic-ce] On Emulator work On device not
I think found the problem, I use the emulator on default (English) and my Touch HD I change regional settings to Portugues(Brazil) and this change "No. Of decimal places" from "." to "," when I make Set records=db.Execute("SELECT * FROM WMOtb WHERE CV = "& cbCV.Text &" and Polos = "& cbPolos.Text &" ") The recors not recive any result on next step tbI220.Text = records(1)(10) Show the last error. EMERSON VIER De: George Henne Para: "nsbasic...@yahoogroups.com" Enviadas: Domingo, 14 de Junho de 2009 7:19:21 Assunto: Re: [nsbasic-ce] On Emulator work On device not Can you make the shortest program which reproduces this? >I test my program on "Windows Mobile 6 Professional Emulator" and "USA >Windows Mobile 6.1.4 Professional 480x800 Emulator" and work very well. > >I install on my HTC Touch HD, when I test show "Scripting Error >Microsoft VBScript runtime error - line 162, char 0 Type mismatch: >'records(.. .)'" > >code ine is > >tbI220.Text = records(1)(10) > >I use the 8.0.2 version > >EMERSON VIER > > > > >--- - - --- > >Yahoo! Groups Links > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Version 8.0.0 or 8.0.2
On Desktop Menu/Help/About show the version 8.0.2, on emulator or device I use the NSBVersion show the 8.0.0 It´s ok? EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] On Emulator work On device not
I test my program on "Windows Mobile 6 Professional Emulator" and "USA Windows Mobile 6.1.4 Professional 480x800 Emulator" and work very well. I install on my HTC Touch HD, when I test show "Scripting Error Microsoft VBScript runtime error - line 162, char 0 Type mismatch: 'records(...)'" code ine is tbI220.Text = records(1)(10) I use the 8.0.2 version EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: How Install Database file
I test too the example SQLite.nsb, the same problem the datafile "name.db" create on the folder MYDEVICE, and I change to the folder "\Program Files\SQLite" this not work. EMERSON VIER --- In nsbasic...@yahoogroups.com, "EMERSON VIER" wrote: > > About the AXPackck it´s ok. > > Now about the data base not work, my not found the database file, to work I > need past the database file under folder MYDEVICE > > EMERSON VIER > > --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > > > It's the same idea. > > > > Add NewObjectsPack1.dll and SQLite3ComUTF8.dll to the resources. Since > > they end in .dll, they will be properly installed and registered > > automatically. > > > > >Yes I use 8.o, and try this work very well. > > > > > >But now how I includ on my instalation the AXPack? > > > > > >EMERSON VIER > > > > > >--- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > >> > > >> I assume you are using NS Basic/CE 8.0. If not, have a look at it. This > > >> is something the new release does much better. > > >> > > >> Simply add the file to your project under Resources. It will be > > >> installed to the same directory as your app. > > >> > > >> >I read the TN30 Distributing your Application, this work very well. > > >> >But I need install my database file how do this? > > >> > > > >> >EMERSON VIER > > >> > > > >> > > > >> > > > >> > > > >> > > > >> >Yahoo! Groups Links > > >> > > > >> > > > >> > > > >> > > > > > > > > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: How Install Database file
About the AXPackck it´s mok. Now about the data base not work, my not found the database file, to work I need past the database file under folder MYDEVICE EMERSON VIER --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > It's the same idea. > > Add NewObjectsPack1.dll and SQLite3ComUTF8.dll to the resources. Since > they end in .dll, they will be properly installed and registered > automatically. > > >Yes I use 8.o, and try this work very well. > > > >But now how I includ on my instalation the AXPack? > > > >EMERSON VIER > > > >--- In nsbasic...@yahoogroups.com, "George Henne" wrote: > >> > >> I assume you are using NS Basic/CE 8.0. If not, have a look at it. This > >> is something the new release does much better. > >> > >> Simply add the file to your project under Resources. It will be > >> installed to the same directory as your app. > >> > >> >I read the TN30 Distributing your Application, this work very well. > >> >But I need install my database file how do this? > >> > > >> >EMERSON VIER > >> > > >> > > >> > > >> > > >> > > >> >Yahoo! Groups Links > >> > > >> > > >> > > >> > > > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: I need the Power Operator "^"
I try ** not work, but I try ^ again and work very well. Thx EMERSON VIER --- In nsbasic...@yahoogroups.com, Thomas Gruber wrote: > > Try C = A ** B > Thomas > Am 02.06.2009 um 04:49AM schrieb EMERSON VIER: > > > > > > > I need calculate the value C = A^B but the "^" not work how i do this? > > > > EMERSON VIER > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: How Install Database file
Yes I use 8.o, and try this work very well. But now how I includ on my instalation the AXPack? EMERSON VIER --- In nsbasic...@yahoogroups.com, "George Henne" wrote: > > I assume you are using NS Basic/CE 8.0. If not, have a look at it. This > is something the new release does much better. > > Simply add the file to your project under Resources. It will be > installed to the same directory as your app. > > >I read the TN30 Distributing your Application, this work very well. > >But I need install my database file how do this? > > > >EMERSON VIER > > > > > > > > > > > >Yahoo! Groups Links > > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] I need the Power Operator "^"
I need calculate the value C = A^B but the "^" not work how i do this? EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] How Install Database file
I read the TN30 Distributing your Application, this work very well. But I need install my database file how do this? EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: SQL SELECT WHERE
Woody, I try your idea but not work too. I test this now and work Option 1 - WORK Dim Value1 Value1 = 19 Value1 = "'"&Value1&"'" Set records=db.Execute ("SELECT * FROM People_DB WHERE Age>= "&Value1&" ") Option 1 - WORK - Now I use this Set records=db.Execute ("SELECT * FROM People_DB WHERE Age>= "&"'"&tbsearch.Text&"'"&" ") Thx Woody and Ben for all help. EMERSON VIER --- In nsbasic...@yahoogroups.com, Harold Wood wrote: > > Emereson > your problem is that you arent forming the query statement correctly. the > query statement should look like > > Set Records = Db.Execute("Select * from People_Db where AGE => " + Value1) > > the single quotes around a value are used for date and string columns, > numbers dont use quotes. > > also you might want to set up a view with AGE as a computed column, then > query the view. > > Woody > > --- On Tue, 5/26/09, EMERSON VIER wrote: > > > From: EMERSON VIER > Subject: [nsbasic-ce] Re: SQL SELECT WHERE > To: nsbasic...@yahoogroups.com > Date: Tuesday, May 26, 2009, 5:31 PM > > > > > > > > > Ben, > > Thx, but not work for me I test the all option. > > EMERSON VIER > > --- In nsbasic...@yahoogro ups.com, "bwolodko" wrote: > > > > --- In nsbasic...@yahoogro ups.com, "bwolodko" wrote: > > > > > > --- In nsbasic...@yahoogro ups.com, "EMERSON VIER" wrote: > > > > > > > > I know abou error mensage, but I need the solution for this, my column > > > > is Age and I need seach value for this when I make this > > > > > > > > Set records=db.Execute( "SELECT * FROM People_DB WHERE Age >= '19' ") > > > > > > > > Work very well but I need sustitute the '19' to on variable. > > > > > > > > Thx for all > > > > > > > > EMERSON VIER > > > > > > > > > > > > > > > > --- In nsbasic...@yahoogro ups.com, Harold Wood & Meyuni Gani > > > > wrote: > > > > > > > > > > You are encloseing value1 within quotes, so what gets passed to the > > > > > sql engine is the name value1 which is interpeted as the name of a > > > > > column. What you need to have is "select * from tablename where > > > > > columnname =>" + value1 This way the engine gets passed the query > > > > > along with the value in value1. > > > > > > > > > > Harold Wood & Meyuni Gani > > > > > > > > > > -Original Message- > > > > > From: EMERSON VIER > > > > > Sent: Monday, May 25, 2009 7:50 PM > > > > > To: nsbasic...@yahoogro ups.com > > > > > Subject: [nsbasic-ce] SQL SELECT WHERE > > > > > > > > > > > > > > > > > > > > If a use this > > > > > > > > > > Value1 = 19 > > > > > > > > > > Set records=db.Execute( "SELECT * FROM People_DB WHERE Age >= Value1 > > > > > ") > > > > > > > > > > Returt the Scripting Error "SQLite3COM - Line XXX, char O no such > > > > > column: Value1" > > > > > > > > > > If a use this > > > > > > > > > > Set records=db.Execute( "SELECT * FROM People_DB WHERE Age >= '19' ") > > > > > > > > > > Work very well > > > > > > > > > > But I need use the variable on place '19' because this value I need > > > > > get from TextBox > > > > > > > > > > EMERSON VIER > > > > > > > > > > > > > > > It would appeasr that what we need is a string > > > > > > would this work? > > > > > > Value1 = 19 > > > > > > Set records = db.Execute(" SELECT * FROM People_DB WHERE Age >=" & > > > CStr(Value1) ) > > > > > > Are the ( ) braces required? > > > > > > Set records = db.Execute "SELECT * FROM People_DB WHERE Age >=" & > > > CStr(Value1) > > > > > > In the NsBasic manual, the syntax is EXECUTE(string) > > > > > > But > > > > > > AddObject "NSCEPictureBox. NSCEPictureBoxCt rl.1",picName, X,Y,220,90 > > > Execute picName & ".ScaleMode = 3" ' pixels > > > Execute picName & ".BorderStyle = 0" ' none > > > Execute picName & ".hide" > > > > > > works well. No Braces. > > > > > > Converting the number to a string and appending it. > > > > > > if all the Quotes are required i.e '19' ") > > > > > > > > > then Set records = db.Execute(" SELECT * FROM People_DB WHERE Age >=" & > > > "'" & CStr(Value1) & "')" > > > > > > may work, just guessing > > > > > > Ben > > > > > > > Just noticed that the web page version does not show the single quotes > > within the double quotes to make up this string. > > > > If you open the message with a reply, the string shows correctly. > > > > Ben > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: SQL SELECT WHERE
Ben, Thx, but not work for me I test the all option. EMERSON VIER --- In nsbasic...@yahoogroups.com, "bwolodko" wrote: > > --- In nsbasic...@yahoogroups.com, "bwolodko" wrote: > > > > --- In nsbasic...@yahoogroups.com, "EMERSON VIER" wrote: > > > > > > I know abou error mensage, but I need the solution for this, my column is > > > Age and I need seach value for this when I make this > > > > > > Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= '19' ") > > > > > > Work very well but I need sustitute the '19' to on variable. > > > > > > Thx for all > > > > > > EMERSON VIER > > > > > > > > > > > > --- In nsbasic...@yahoogroups.com, Harold Wood & Meyuni Gani > > > wrote: > > > > > > > > You are encloseing value1 within quotes, so what gets passed to the sql > > > > engine is the name value1 which is interpeted as the name of a column. > > > > What you need to have is "select * from tablename where columnname =>" > > > > + value1 This way the engine gets passed the query along with the value > > > > in value1. > > > > > > > > Harold Wood & Meyuni Gani > > > > > > > > -Original Message- > > > > From: EMERSON VIER > > > > Sent: Monday, May 25, 2009 7:50 PM > > > > To: nsbasic...@yahoogroups.com > > > > Subject: [nsbasic-ce] SQL SELECT WHERE > > > > > > > > > > > > > > > > If a use this > > > > > > > > Value1 = 19 > > > > > > > > Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= Value1 ") > > > > > > > > Returt the Scripting Error "SQLite3COM - Line XXX, char O no such > > > > column: Value1" > > > > > > > > If a use this > > > > > > > > Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= '19' ") > > > > > > > > Work very well > > > > > > > > But I need use the variable on place '19' because this value I need > > > > get from TextBox > > > > > > > > EMERSON VIER > > > > > > > > > > > It would appeasr that what we need is a string > > > > would this work? > > > > Value1 = 19 > > > > Set records = db.Execute("SELECT * FROM People_DB WHERE Age >=" & > > CStr(Value1)) > > > > Are the ( ) braces required? > > > > Set records = db.Execute "SELECT * FROM People_DB WHERE Age >=" & > > CStr(Value1) > > > > In the NsBasic manual, the syntax is EXECUTE(string) > > > > But > > > >AddObject "NSCEPictureBox.NSCEPictureBoxCtrl.1",picName,X,Y,220,90 > >Execute picName & ".ScaleMode = 3" ' pixels > >Execute picName & ".BorderStyle = 0" ' none > >Execute picName & ".hide" > > > > works well. No Braces. > > > > Converting the number to a string and appending it. > > > > if all the Quotes are required i.e '19' ") > > > > > > then Set records = db.Execute("SELECT * FROM People_DB WHERE Age >=" & "'" > > & CStr(Value1) & "')" > > > > may work, just guessing > > > > Ben > > > > Just noticed that the web page version does not show the single quotes within > the double quotes to make up this string. > > If you open the message with a reply, the string shows correctly. > > Ben > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: SQL SELECT WHERE
I try use ""Value1"", "Value1" but not work to. Thx EMERSON VIER --- In nsbasic...@yahoogroups.com, brian smith wrote: > > Im no SQL expert. > but I remember reading that you have to do something like this > Set records=db.Execute( "SELECT * FROM People_DB WHERE Age >= '"Value1"' ") > > so to get the value of the variable in your SELECTthat would be single > quote...double quote (variable)...double quote...single quote > --- On Mon, 5/25/09, EMERSON VIER wrote: > > > From: EMERSON VIER > Subject: [nsbasic-ce] SQL SELECT WHERE > To: nsbasic...@yahoogroups.com > Date: Monday, May 25, 2009, 7:50 PM > > > > > > > > > If a use this > > Value1 = 19 > > Set records=db.Execute( "SELECT * FROM People_DB WHERE Age >= Value1 ") > > Returt the Scripting Error "SQLite3COM - Line XXX, char O no such column: > Value1" > > If a use this > > Set records=db.Execute( "SELECT * FROM People_DB WHERE Age >= '19' ") > > Work very well > > But I need use the variable on place '19' because this value I need get from > TextBox > > EMERSON VIER > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: SQL SELECT WHERE
I know abou error mensage, but I need the solution for this, my column is Age and I need seach value for this when I make this Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= '19' ") Work very well but I need sustitute the '19' to on variable. Thx for all EMERSON VIER --- In nsbasic...@yahoogroups.com, Harold Wood & Meyuni Gani wrote: > > You are encloseing value1 within quotes, so what gets passed to the sql > engine is the name value1 which is interpeted as the name of a column. What > you need to have is "select * from tablename where columnname =>" + value1 > This way the engine gets passed the query along with the value in value1. > > Harold Wood & Meyuni Gani > > -Original Message- > From: EMERSON VIER > Sent: Monday, May 25, 2009 7:50 PM > To: nsbasic...@yahoogroups.com > Subject: [nsbasic-ce] SQL SELECT WHERE > > > > If a use this > > Value1 = 19 > > Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= Value1 ") > > Returt the Scripting Error "SQLite3COM - Line XXX, char O no such column: > Value1" > > If a use this > > Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= '19' ") > > Work very well > > But I need use the variable on place '19' because this value I need get from > TextBox > > EMERSON VIER > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] SQL SELECT WHERE
If a use this Value1 = 19 Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= Value1 ") Returt the Scripting Error "SQLite3COM - Line XXX, char O no such column: Value1" If a use this Set records=db.Execute("SELECT * FROM People_DB WHERE Age >= '19' ") Work very well But I need use the variable on place '19' because this value I need get from TextBox EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] How get Status for Field
How I get the status for TextBox I need Know "Show" or "Hide" EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: SQL WHERE
Thx for all. EMERSON VIER --- In nsbasic...@yahoogroups.com, Harold Wood wrote: > > yeah, i was thinking how to retrieve all rows in a result set. > > thanks > > woody > > --- On Sat, 5/23/09, Chris Kenworthy wrote: > > > From: Chris Kenworthy > Subject: [nsbasic-ce] Re: SQL WHERE > To: nsbasic...@yahoogroups.com > Date: Saturday, May 23, 2009, 5:53 PM > > > > > > > > > What do you want to show up as output in this example? You're selecting > 'every field in table namedb', so the msgbox command doesn't understand how > to show all those fields, in potentially more than one record. > > If you just want the first field, (firstname,) of the first record, then you > could use code like: > > cmd = "select * from namedb where lastname = '" & tbLastName.text & "'" > set r = db.execute (cmd) > val = r(1)(1) > msgbox val > > If you want both firstname and lastname, you could change the val line to: > val = r(1)(1) & " " & r(1)(2) > > Does this help? I think that you and Woody might have been talking at > cross-purposes, because he was thinking of looping over a large result set, > while you only wanted to pull a few values out of it. > > I believe that using a single quote inside your cmd is better SQLite syntax > than escaping a " by doubling it up. > > --- In nsbasic...@yahoogro ups.com, "EMERSON VIER" wrote: > > > > Sorry I make mistake to write here I use this form > > > > cmd="SELECT * FROM NameDB WHERE lastname = """ & tbLastName.Text & """" > > showStatus cmd > > Set r=db.Execute( cmd) > > MsgBox & r & > > > > How I get the result for this action? > > > > > > I use this database NameDB sample > > > > FirstName LastName > > > > Joe Bob > > Henry Bill > > Tedy Herman > > > > Thx for all > > EMERSON VIER > > > > > > > > > > --- In nsbasic...@yahoogro ups.com, Harold Wood wrote: > > > > > > you need a properly formatted query. > > > > > > > > > "select * from [table name goes here] where [column name goes here] = '" > > > & tbLastName.Text & "'" > > > > > > --- On Wed, 5/20/09, EMERSON VIER wrote: > > > > > > > > > From: EMERSON VIER > > > Subject: [nsbasic-ce] SQL WHERE > > > To: nsbasic...@yahoogro ups.com > > > Date: Wednesday, May 20, 2009, 10:16 PM > > > > > > > > > > > > > > > > > > > > > > > > > > > How I found the last name on the sample on TN15 > > > I try > > > > > > cmd="SELECT * FROM WHERE NameDB lastname = """ & tbLastName.Text & """" > > > showStatus cmd > > > Set r=db.Execute( cmd) > > > MsgBox & r & > > > > > > But this not return the line. > > > > > > EMERSON VIER > > > > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: SQL WHERE
I undested your information, but I need search the data on my database by SQL function WHERE or other. Can you help me? EMERSON VIER --- In nsbasic...@yahoogroups.com, Harold Wood wrote: > > the query looks good now. remember that nsbasic treats a record set as a > multidimensial array, > with so you shoudl first look at the recordcount property fo r to determine > how many rows were returned then loop thru the columns to return the > individual fields. > > Dim recsBack > dim recRead > dim curRec > dim Cols > > recsBack = r.RecordCount > > recRead = 1 > > while recRead < recsback > for Cols = 1 to r(recRead).Count Step 1 > msgbox r(recRead)(Cols) > next > RecRead = recRead + 1 > wend > > > see if that helps. > Woody > --- On Thu, 5/21/09, EMERSON VIER wrote: > > > From: EMERSON VIER > Subject: [nsbasic-ce] Re: SQL WHERE > To: nsbasic...@yahoogroups.com > Date: Thursday, May 21, 2009, 12:07 PM > > > > > > > > > Sorry I make mistake to write here I use this form > > cmd="SELECT * FROM NameDB WHERE lastname = """ & tbLastName.Text & """" > showStatus cmd > Set r=db.Execute( cmd) > MsgBox & r & > > How I get the result for this action? > > I use this database NameDB sample > > FirstName LastName > > Joe Bob > Henry Bill > Tedy Herman > > Thx for all > EMERSON VIER > > --- In nsbasic...@yahoogro ups.com, Harold Wood wrote: > > > > you need a properly formatted query. > > > > > > "select * from [table name goes here] where [column name goes here] = '" & > > tbLastName.Text & "'" > > > > --- On Wed, 5/20/09, EMERSON VIER wrote: > > > > > > From: EMERSON VIER > > Subject: [nsbasic-ce] SQL WHERE > > To: nsbasic...@yahoogro ups.com > > Date: Wednesday, May 20, 2009, 10:16 PM > > > > > > > > > > > > > > > > > > How I found the last name on the sample on TN15 > > I try > > > > cmd="SELECT * FROM WHERE NameDB lastname = """ & tbLastName.Text & """" > > showStatus cmd > > Set r=db.Execute( cmd) > > MsgBox & r & > > > > But this not return the line. > > > > EMERSON VIER > > > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Re: SQL WHERE
Sorry I make mistake to write here I use this form cmd="SELECT * FROM NameDB WHERE lastname = """ & tbLastName.Text & """" showStatus cmd Set r=db.Execute( cmd) MsgBox & r & How I get the result for this action? I use this database NameDB sample FirstName LastName Joe Bob Henry Bill Tedy Herman Thx for all EMERSON VIER --- In nsbasic...@yahoogroups.com, Harold Wood wrote: > > you need a properly formatted query. > > > "select * from [table name goes here] where [column name goes here] = '" & > tbLastName.Text & "'" > > --- On Wed, 5/20/09, EMERSON VIER wrote: > > > From: EMERSON VIER > Subject: [nsbasic-ce] SQL WHERE > To: nsbasic...@yahoogroups.com > Date: Wednesday, May 20, 2009, 10:16 PM > > > > > > > > > How I found the last name on the sample on TN15 > I try > > cmd="SELECT * FROM WHERE NameDB lastname = """ & tbLastName.Text & """" > showStatus cmd > Set r=db.Execute( cmd) > MsgBox & r & > > But this not return the line. > > EMERSON VIER > --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] SQL WHERE
How I found the last name on the sample on TN15 I try cmd="SELECT * FROM WHERE NameDB lastname = """ & tbLastName.Text & """" showStatus cmd Set r=db.Execute(cmd) MsgBox & r & But this not return the line. EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---
[nsbasic-ce] Excel to SQL
How I convert/import my XLS table to SQL? EMERSON VIER --~--~-~--~~~---~--~~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~--~~~~--~~--~--~---