Unicode Application

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ Exchange Fox
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - VFP 6 and second language - nothing visible in command window Yesterday I installed Hebrew language support on my XP, patched-to-the-latest, machine. Now, when I type in the command window, I see absolutely nothing, although what I type works and nothing else that I've yet noticed doesn't function, e.g., I have a short program I run daily that puts up a BROWSE NOWAIT window and the browse window, while different looking, is still readable. What happened and what do I do to fix it? This iv VFP SP5, version 06.00.8961.00 TIA. -S- Tag: Unicode Application Tag: 197914
  - 2
    - Creating DLL I dont know anything about DLL files. Can any i guide us what it does. & how to create the DLL files. Tag: Unicode Application Tag: 197912
  - 3
    - VFP stability I have a client with our compiled VFP8 SP1 application (one of many) who is having freezing problems on a number of machines at their site. Many other sites that we have have no problem. I have done the usual bit with anti virus, reinstalling the latest VFP patches, uninstalling an reinstalling our software etc. but they continue to freeze up the computer regularly. Any ideas on what I can suggest to them next? Cheers David Younger Tag: Unicode Application Tag: 197907
  - 4
    - Creating a VFP report on the fly from a web page. I have an ASP application that uses a VFP compiled DLL to interract with our VFP backend. I would like the users to be able to display an invoice on the screenthat looks exactly like their real invoices (which come out of VFP). I am trying not to use Crystal as the users would have already customised the invoices themselves outside of our control and I relaly dont want to have to teach them how to redo it in crystal. I have created a method in our DLL that generates a PDF file without any messages, forms or other human interface features. However the one thing I want which is to generate a report is rejected by the COM DLL. Is there a way to get a VFP compiled DLL to generate repot using the REPORT FORM comman or some other strategy to generate a report from an FRX file? Cheers David Younger Tag: Unicode Application Tag: 197906
  - 5
    - VFP 8 - Hasp Dongle I have a database project in Visual Fox Pro 8 where it is proposed to have a hasp dongle as a security to avoid the package being copied and installed at multiple locations. Has anyone used HASP Dongles with VFP 8? Sample Code for its integration into the project (especially for the loading of the DLL) would be great as it would save a lot of time experimenting. We are looking at the Hasp M1 model Many Thanks in Advance Mahmud Abdulla Tag: Unicode Application Tag: 197904
  - 6
    - XML attributes into cursor I need to pull both data and attributes into a VFP cursor. XMLTOCURSOR works fine with this XML: <item code="xyz"> <data date="20040805">AAAAAA</data> </item> but the cursor only contains the field "data" with the value "AAAAAA". I need to also includes the "code" field and the "date" field into the cursor. Is this possible either with XMLTOCURSOR or XMLAdapter? -- seeker Tag: Unicode Application Tag: 197891
  - 7
    - Windows XP SP2 & VFP 8 Has anyone tested Visual Foxpro 8 with Windows XP Service Pack 2? If so, were there any problems? thanks Mike Tag: Unicode Application Tag: 197879
  - 8
    - Implementing quickfill combobox in grid Hi I'm having problems with implementing a quick fill combobox in a GRID It works very well outside a grid but not in. Outside a grid interactivechange get triggered and calls a custom method called IsKeyHandled IsKeyHanlded does the work of finding the first mathing item and setting values for .SelStart and .SelLen The problem is that in a grid you have to use the KeyPress method in order to implement the quick fill. So KeyPress calls IsKeyHandled with still works well but when the process exits the values of .SelStart and .SelLen get reset to zero. What is the problem? Here is the code DEFINE CLASS i_cboovtmautoadding AS i_combobox DisplayValue = "" IncrementalSearch = .T. acstyle = 2 lastsellength = 0 lastselstart = 0 Name = "i_cboovtmautoadding" lastdisplayvalue = .F. ovtm = .F. ldroppeddown = .F. nolddblclick = .F. DIMENSION asourcerows[1] PROCEDURE ovtm_access WITH ThisForm IF VARTYPE(.oVTM) = "O" RETURN .oVTM ELSE RETURN goApp.cusVirtualTableManager ENDIF ENDWITH ENDPROC PROCEDURE iskeyhandled LPARAMETERS lnKeyCode, lnShiftAltCtrl, llInGrid LOCAL lnSelStart, lnRow, llKeyHandled llKeyHandled = .T. WITH This *** Handle the printable characters DO CASE CASE BETWEEN(lnKeyCode, 32, 126) AND NOT BETWEEN(lnKeyCode, 49, 57) lnSelStart = IIF(llInGrid, .SelStart + 1, .SelStart) *** Get the value typed in so far .DisplayValue = IIF(lnSelStart > 1, .DisplayValue, "") lcSofar = LEFT(.DisplayValue, lnSelStart-1) + CHR(lnKeyCode) *** Find a match in column #1 of the combo's internal list FOR lnRow = 1 TO .ListCount IF UPPER(.List[lnRow, 1]) = UPPER(lcSoFar) .ListIndex = lnRow llFound = .T. EXIT ENDIF ENDFOR IF NOT llFound .DisplayValue = lcSofar ENDIF *** Highlight the portion of the value after the insertion point .SelStart = LEN(lcSofar) .SelLength = MAX(LEN( ALLTRIM( .DisplayValue ) ) - .SelStart, 0) CASE llInGrid AND lnKeyCode = 19 .SelStart = MAX(.SelStart - 1, 0) CASE llInGrid AND lnKeyCode = 4 .SelStart = MIN(.SelStart + 1, LEN(ALLTRIM(.DisplayValue))) OTHERWISE llKeyHandled = .F. ENDCASE ENDWITH RETURN llKeyHandled ENDPROC PROCEDURE getvalue LPARAMETERS lvKeyCode LOCAL lvValue lvValue = "" WITH This liItem = ASCAN(.aSourceRows, lvKeyCode, 1, ALEN(.aSourceRows, 1), ALEN(.aSourceRows, 2) - 2, 9) IF liItem > 0 lvValue = .aSourceRows(liItem, 1) ENDIF ENDWITH RETURN lvValue ENDPROC PROCEDURE GotFocus *** Save Original value in case we have to restore it later WITH This *.uOriginalValue = .Value .nOldDblClick = _DBLCLICK _DBLCLICK = 1.5 ENDWITH ENDPROC PROCEDURE Valid WITH This IF NOT EMPTY(.DisplayValue) IF ASCAN(.aSourceRows, .DisplayValue, 1, ALEN(.aSourceRows, 1), 1) = 0 liAnswer = Messagebox("This value was not found," + CHR(13) + ; "Do you want to add it?",36,"") IF liAnswer = 6 .oVTM.NewRecord(.cSourceTable, .DisplayValue) .Requery() .DisplayValue = .DisplayValue ELSE .DisplayValue = "" ENDIF ENDIF ENDIF ENDWITH ENDPROC PROCEDURE Requery LOCAL laTableCursor(1), llSuccess WITH This IF .oVTM.GetViewArray(@laTableCursor, .cSourceTable) AND ALEN(laTableCursor) > 1 DIMENSION .aSourceRows(ALEN(laTableCursor, 1), ALEN(laTableCursor, 2)) ACOPY(laTableCursor, .aSourceRows) llSuccess = .T. ELSE DIMENSION .aSourceRows(1, 1) llSuccess = .F. ENDIF ENDWITH RETURN llSuccess ENDPROC PROCEDURE InteractiveChange RETURN This.Iskeyhandled(LASTKEY()) ENDPROC PROCEDURE Init WITH This .Style = 0 .BoundTo = .T. .SelectOnEntry = .F. .AddProperty("cSourceTable", JUSTSTEM(This.RowSource)) IF EMPTY(.cSourceTable) .cSourceTable = .oVTM.ListBound(.ControlSource, ThisForm.DataSessionId) ENDIF .AddProperty("cSourceFields", JUSTEXT(.cSourceTable)) .cSourceTable = JUSTSTEM(.cSourceTable) .RowSource = "This.aSourceRows" .RowSourceType = 5 .ColumnWidths = .oVTM.ColWidthsPix(This, .cSourceTable) .ColumnCount = .oVTM.GetColCount(.cSourceTable) .Requery &&... "This.aSourceRows" gets populated ENDWITH ENDPROC PROCEDURE Click This.lDroppedDown = .F. ENDPROC PROCEDURE DropDown This.lDroppedDown = .T. ENDPROC PROCEDURE LostFocus _DBLCLICK = This.nOldDblClick ENDPROC PROCEDURE KeyPress LPARAMETERS nKeyCode, nShiftAltCtrl WITH This IF .Parent.BaseClass = "Column" AND DODEFAULT(nKeyCode, nShiftAltCtrl) AND .IsKeyHandled(nKeyCode, nShiftAltCtrl, .T.) **IF .Parent.BaseClass = "Column" AND .IsKeyHandled(nKeyCode, nShiftAltCtrl, .T.) &&... KeyPress processing is only required in grids NODEFAULT ENDIF ENDWITH ENDPROC ENDDEFINE Tag: Unicode Application Tag: 197849
  - 9
    - How to summarize & count VFP 7.0 I have a data file with 2 datatype fields and 10 numeric fields I can sum the numeric fields in a report but cannot count where numeric value > 0.00 -- it ignores the statement '> 0.00' & just counts every record & I cannot get a query to work either! I really need to export a cross tab to excel looking like this: data group 1- subgroup1 ---countnumfield1 --- sumnumfield1 --- countnumfield2 -- sumnumfield2 --- countnumfield3 --sumnumfield3 & so on! I need to count & sum only where the numericvalue is > 0.00 Thank you big time! Joe Robison -- Datamail Kansas City MO 64114 816-523-0222 Tag: Unicode Application Tag: 197848
  - 10
    - HP Photosmart 7660 Printer Hi All, Printers and their drivers can be such a headache!!! I have a customer who went out and bought an HP Photosmart 7660 printer to use with his Win98SE machine. When he sets that printer as the default and runs my application, it immediately and completely locks up! No Ctrl-Alt-Delete, Nothing! If he sets a different printer as a default all is well. Does anyone have a clue on this? -- Alec Tag: Unicode Application Tag: 197847
  - 11
    - Dynamic Back/Fore colors Is there a way to see what a grid has assigned as the dynamic back/fore colors? I have an application that loads three tables on separate showwindow=1 forms. The 1st one that loads never shows the dynamic colors but all of the rest do. It would seem that I am not executing the "setall" to the first grid, but I stepped through the code and it runs. I am baffled. Thanks, Scott Tag: Unicode Application Tag: 197845
  - 12
    - Fox Report Writer - Sideways Text? Can you rotate text in Visual FoxPro Report Writer (VFP v.6.0 SP3)? Tag: Unicode Application Tag: 197842
  - 13
    - Store Japanese characters from FoxPro into SQL Server? Greetings! I have an application that can happily store and retrieve Japanese characters into a stand-alone FoxPro database. Now I need to write them into nvarchar fields in SQL Server tables. SQL Server is expecting them in Unicode. I have an edit box into which I can enter Japanese characters through an input method editor. I haven't been able to figure out how to massage those characters to get them into Unicode and then into the SQL Server table. What hoops do I have to jump through? Thanks! RobR Tag: Unicode Application Tag: 197836
  - 14
    - Pack causing intermittant fatal error VFP7 SP1 I originally posted a message about this problem on 12th May. I am beginning to think it may be a problem with the user's PC. As the crash happens during a pack and the file has actually disappeared from it's original place, the fatal error must be happening at the point where VFP deletes the original table from disk and renames the temporary table with the original table name. Where on the user's machine would this temporary table be located? We do not use any Config file. Is it the Windows temporary directory? Could there be a problem with that user's windows temporary directory or permissions to that directory? Note - the file that is being packed is not particularly big. Any help would be appreciated. Bernie. Tag: Unicode Application Tag: 197810
  - 15
    - Visual SourceSafe with VFP8 I stopped using VSS a long time ago (found it presented many errors) when I was using VFP6. I didn't have time to sort all of the issues out back then. Now I am up to VFP8 and would like to get back to using some sort of CVS system. Will the version of VSS (6?) that I got with Visual Studio 6 work with VFP8 or should I be looking at an alternative CVS system? Perhaps a newer version of VSS. Ideally if an alternative one I would like it to be freeware. But then who wouldn't. -- Regards Darren Woodford - MCP, MCSE Woodford Computer Systems Ltd http://www.woodfordcomputers.co.uk http://www.pegasus-opera-ii.co.uk Tag: Unicode Application Tag: 197808
  - 16
    - FPW2.6a SCAN FOR missing records Hello, this is driving me crazy :( I have a screen that lets the user add/remove multiple items to an assembly. The items are stored in an array whilst they edit and then stored in the main table if they save. The save routine looks like this: SELECT pri_det m.arrayref=1 m.arraylen=ALEN(priceinf,1) SCAN FOR wk_ref = m.ref IF m.arrayref<=m.arraylen * already existing record - replace contents REPLACE pri_det.saparticle WITH RIGHT(priceinf[m.arrayref],6) m.arrayref=m.arrayref+1 ELSE * array has fewer records than table - delete record DELETE ENDIF ENDSCAN * add any remaining records from array to table DO WHILE m.arraylen>=m.arrayref INSERT INTO pri_det VALUES (m.ref,RIGHT(priceinf[m.arrayref],6)) m.arrayref=m.arrayref+1 ENDDO Sometimes when they remove items, this doesn't work correctly and the SCAN..ENDSCAN doesn't loop all the records in its FOR clause. Does anyone know WHY!?!! 1) There is no filter set. 2) I've recreated the indexes with INDEX ON. (although I haven't tried a SCAN.. NOOPTIMIZE yet) 3) I've pulled that routine out into a separate program (working on the same table) to try to reproduce and it seems to work fine. 4) I wrote a little program that SCANS the same clause just doing an incremental count to a vraible and then display the result in a wait window. I used my screen to remove some items and broke the save routine just before the SCAN. At this point I ran my counting program - it showed a SCAN FOR wk_ref=m.ref count of 5 records. When then went on to single step the save routine it only SCANned 3. What on earth could possibly be wrong here? -- TIA Andrew Howell Tag: Unicode Application Tag: 197805
  - 17
    - How to print image file from VFP report? Hi all, I have some problem about VFP7 report. I want to use report to print the image that I have scan from the document in tif type but the report ole image can use only bmp and jpg.Is the vfp7 report can use only this two type? And when I use BMP file which greater than 1 meg the report can not run, it is error. How can I do? Thank you for your advise. Kitty Tag: Unicode Application Tag: 197804
  - 18
    - Saving Picture in SQL Server Hi there, I need to know how can i save picutre in SQL Server table. I am using VFP 6.0 as front end and SQL Server at back end. I have already tried FILETOSTR() AND STRTOFILE() Function which performs well with Foxpro table but it does not work with SQL Statement as follow; tmpString=FILETOSTR("Picture.Bmp") =SQLExec(connHandler,"Insert Into temp (EmpPhoto) Values ('"+tmpString+"')") It looks String already contains some single quotes which creats ambiguity. Would be very thankful for any help in this regard. NR Tag: Unicode Application Tag: 197803
  - 19
    - Coordinated grids and a lookup textbox I have 3 grids on a form, a parent(name) & 2 children (phones & emails). I have the grids set up so that as the user scrolls through the parent grid, the other 2 grids update themselves appropriately. Now I'm adding a textbox to serve as a quick look up for names in the parent grid. I do a locate for .../ if found(), etc... in the interactive change of the textbox and the parent grid updates itself correctly. Unfortunately, not only do the child grids NOT update correctly, they no longer track the parent grid if the user goes back to the parent & begins scrolling again. Calling the respective refresh methods doesn't seem to work. What to do? Any ideas? -Lew Tag: Unicode Application Tag: 197802
  - 20
    - Check Box in VFOXPRO Always shows that it is ReadOnly Hello, I am still new to VFoxpro and in need of some advice. I have a new form that I created and I have included some Check boxes. Whenever I RUN the form and try to click on the Checkbox, the message that I see at the bottom left hand side is "The control is Read-Only". How do I get my application/form to not display this message and allow me to click/unclick the checkbox? Thanks alot, Eddy. Tag: Unicode Application Tag: 197799
  - 21
    - Making CTRL+A Work in a Listbox Hi all. I would like to make CTRL+A work to select all items in a multi-select listbox. I've run into the problem that the CTRL+A combination won't register in a KeyPress() event of either a form or a control. I've come up with the following code that encapsulates a working solution within a listbox subclass as well as I can figure out. Of course, I'm aware of problems with using ON KEY LABEL and PUBLIC variables. If anyone can suggest a better way to do this, that would be very much appreciated. TIA, Ken Dibble Southern Tier Independence Center *** CTRL+A LISTBOX DEMO *** RELEASE ALL CLEAR ALL CLEAR LOCAL oldsafety oldsafety = SET("SAFETY") SET SAFETY OFF PUBLIC oForm oForm = CREATEOBJECT("Form") oForm.AddObject("Text1","Textbox") WITH oForm.Text1 .Top = 5 .Left = 5 .Height = 22 .Width = 100 .Visible = .T. ENDWITH oForm.AddObject("List1","MyListbox") WITH oForm.List1 .Top = 5 .Left = 120 .Visible = .T. ENDWITH oForm.Show(1) IF NOT EMPTY(oldsafety) SET SAFETY &oldsafety ENDIF RELEASE oForm DEFINE CLASS MyListbox AS ListBox RowSourceType = 1 RowSource = "ONE,TWO,THREE,FOUR,FIVE" ColumnCount = 1 ColumnWidths = "80" MultiSelect = .T. Height = 150 Width = 100 PROCEDURE Init ERASE handlectrla.prg ENDPROC PROCEDURE GotFocus THIS.Selected(1) = .T. THIS.SetupKeyHandler() ENDPROC PROCEDURE LostFocus THIS.ClearKeyHandler() ENDPROC PROCEDURE SetupKeyHandler LOCAL progstr TEXT TO progstr NOSHOW FUNCTION HandleCTRLA(oForm) IF UPPER(oForm.ActiveControl.BaseClass) == "LISTBOX" oForm.ActiveControl.SelectAllItems() ENDIF ENDFUNC ENDTEXT STRTOFILE(progstr,"handlectrla.prg",0) SET PROCEDURE TO handlectrla ADDITIVE PUBLIC oFormRef STORE THISFORM TO oFormRef ON KEY LABEL CTRL+A handlectrla(oFormRef) ENDPROC PROCEDURE ClearKeyHandler oFormRef = .NULL. RELEASE oFormRef ON KEY LABEL CTRL+A ERASE handlectrla.prg ENDPROC PROCEDURE SelectAllItems FOR x = 1 TO THIS.ListCount THIS.Selected(x) = .T. ENDFOR ENDPROC PROCEDURE Destroy THIS.ClearKeyHandler() ENDPROC ENDDEFINE *** END CODE *** Tag: Unicode Application Tag: 197797
  - 22
    - error VFP 8 0: Class definition MSXML2.DOMDOCUMENT.4.0 is not found Hi, I had to uninstall VFP8 in order to reinstall VFP6 and then VFP8 again... however when I finished the Task pane Manager is showing this error message: 0: Class definition MSXML2.DOMDOCUMENT.4.0 is not found this was not happening the first time I installed VFP8 I already have tried to uninstall both VFP6 and VFP8, and installeng thean both agaon, but it did not fixed the problem, I also tried unsuccesfully "Repairing " VFP8 I would appreciate any suggestion thanks Oscar Taboada Tag: Unicode Application Tag: 197783
  - 23
    - vfp 6.0 book Hi, I'm from the Philippines, the VFP6.0 Programmer's Reference book is no longer available in any book store here, is there anybody who could help me get a book of such? i've tried ordering throught the internet but all prospective agencies/couriers does not deliver in this country. from the last query that i made, they only deliver in Singapore. Pls help, i'm new in vfp OOP, i desperately need this book as reference. Thank you very much and more power. Tag: Unicode Application Tag: 197779
  - 24
    - Pocket PC and VFP Hi All, I have a new project, I want to control inventory using a Pocket PC. I don't have the time to learn a new programming language. Is there a way to program an application in Visual FoxPro and run it on a Pocket PC with Windows CE ?? If not is there another logical solution. Thanks in advance. Tanya Tag: Unicode Application Tag: 197775
  - 25
    - keybd_event(, , , ) What would be the numbers for alt+ctrl+P? Tag: Unicode Application Tag: 197773
- Next
  - 1
    - toolbar Using VFP 6, I use toolbar which is currently docked horizontally at the top LHS of the screen when forms are opened. I have two questions. 1. Because some buttons are inappropriate for some forms, the init for those forms calls a method in a class which makes those buttons visible property = .F.. In some cases, while this works OK otherwise, the toolbar is no longer horizontal but some buttons appear on a second line under others and I have to drag the toolbar manually to correct it. What causes this and how do I fix it ? 2. What I would really like is to have the toolbar docked centrally under each form which calls it. But as the forms are all different sizes this means that it needs to be in different places for different forms. Is there any way to achieve this ? Thanks -- Tim Hobson Tag: Unicode Application Tag: 197764
  - 2
    - "Hidden" files attached to a form? Hi, I created an exe w/VFP8(SP1) and sent it to a friend. When he ran it, he got several messages re. missing files. The exe ran OK after choosing "Ignore" for each file. There was no problem in my testing because I have those files. Most of the "missing" files were temporary files (012345678.dbf, etc) but some were dbf's on my system that he doesn't have or need. From what I can tell, the error messages come up when DO FORM is encountered and before any of my code in the form executes. The trace shows that the program stops at DO FORM and before READ EVENTS. I suspect the files may have been open when I created the exe and somehow, VFP assumed they were needed. They are not needed and are not in the project. My exe uses only free tables and the default database (i.e. I never specified a database). I was able to fix this by deleting all the files that were being called. I also made a slight change to the form so that it would get re-generated when I re-built the exe. But that's only a stop-gap solution since it seems it could happen every time I build an exe and I have no way to know what files might be needed until I distribute the exe and get feedback from others. That's not a good thing. I've only been using VFP8 for a short time but I don't think I've ever seen this in VFP6. What can I do to prevent this from happening in the future? Thanks, Frank Tag: Unicode Application Tag: 197759
  - 3
    - Alternative to upsizing wizard I have a VFP database that has some "unusual" features in indexes and views, like some IIF's, PADR's, UPPER's, etc., that the upsizing wizard doesn't know what to do with. Since I'm new to SQL Server, I don't know what to do with them either. Anyone have suggestions? Should I just simplify the VFP database? That would require some modifications to the application. -- Email to (remove spaces and make other obvious corrections): p p m b 2 0 0 4 - 2 0 0 4 at y a h 00 Tag: Unicode Application Tag: 197756
  - 4
    - Automatically E-mail Reports I'm new to this group and need some help. I consider myself a novice when it comes to VFP. I'm looking for an easy way to modify our database to automatically E-mail packing lists to a static E-mail address at one of our sister companies. I'm finding this a challenge because there are no comments in the code and I was given no programmers documentation. I found a plugin called eReports that will do this, but I can't for the life of me follow their examples. I'd like to convert the report to .htm format then I'd like to send it out as an attachment without the user noticing. Before everyone starts yelling "post on eReports forum for help" I've already posted a message on their forum and haven't received response yet. I'm running Visual FoxPro 6.0 with Service Pack 3. Any help would be appreciated. ***** Here is the eReports snippet for converting to htm format ****** LOCAL lnResult, oHTML oHTML = NEWOBJECT("eReportsHTML", "eReports.dll", "eReports.dll") oHTML.ReportFile = "myReport.frx" lnResult = oHTML.ReportConvert() RELEASE oHTML ***** Here is the eReports snippet for SMTP ***** LOCAL loSMTP, lcRecipient, lcName, lnResult loSMTP = NEWOBJECT("eReportsSMTP","eReports.dll","eReports.dll") loSMTP.Unlock("Organization - E8FTY 4JR8S 2JX4R 49FJR") loSMTP.SMTPServer = "mail.johndoe.com" *-While not required, some SMTP servers need this. If you get -505 *-error, this is the likely solution. loSMTP.SMTPDomain = "johndoe.com" *-Optional loSMTP.SMTPLogFile = "c:\SMTPLog.txt" loSMTP.FromAddress = "support@johndoe.com" loSMTP.FromName = "Support" loSMTP.Subject = "Test" loSMTP.MessageBody = "This is a test" *-Alternatively Insert a message file between the quotes below *-The message file can be an exisiting boilerplate text/rtf file or an *-html file generated by eReports. *-If the message file is HTML, set the MessageFormat property to 1 or 2 (see help) *loSMTP.MessageFormat = && valid parameters are 0,1,2,3 (see help) *loSMTP.MessageFile = "" && "C:\eReports\Output\myreport.htm" *-The first parameter is the friendly name like "John Doe" or "" for empty *-The second parameter must be a valid email address *-The third parameter is the recipient type - 1=Normal, 2=CC, 3=BCC lcRecipient = "jdoe@johndoe.com" lcName = "John Doe" loSMTP.AddRecipient(lcName,lcRecipient,1) *-Include an optional attachment file by adding the file name between the quotes *-below or using a variable that points to an existing file. lnResult = loSMTP.AddAttachment((lcPDFFile)) lnResult = loSMTP.SendMail() IF lnResult = 0 MESSAGEBOX("Message Sent",0,"System Message") ELSE MESSAGEBOX("An Error occured:"+CHR(13)+loSMTP.ErrorLog,0,"System Message") ENDIF RELEASE oSMTP ***** This is the Exit command button code where the packing lists are printed in our database ***** if times=0 thisform.mybutton1.cmdnext.click endif private is_tally is_tally=0 thisform.label1.visible=.t. thisform.edton_hold.enabled=.f. thisform.command1.enabled=.f. thisform.refresh select exe_packinglist_0 replace on_hold_a with thisformset.form3.edton_hold.value if tableupdate(.t.)=.f. messagebox("Error in saving exe_packinglist_0.",0+16,"Error") tablerevert(.t.) else thisform.lockscreen=.t. scan thisformset.qtyorder_num=exe_packinglist_0.order_num_a thisformset.qtyseq=exe_packinglist_0.packing_seq =requery("exe_packinglist") select exe_packinglist replace on_hold with exe_packinglist_0.on_hold_a all if tableupdate(.t.)=.f. messagebox("Error saving exe_packinglist "+alltrim(Exe_packinglist.model_a)+".",0+16,"Error") tablerevert(.t.) endif select exe_packinglist_0 endscan thisform.lockscreen=.f. endif thisform.label1.visible=.f. thisform.edton_hold.enabled=.t. thisform.command1.enabled=.t. thisform.refresh select approval_pl scan thisformset.qtyorder_num=approval_pl.order_num thisformset.qtyseq=approval_pl.seq =requery("doc_pl") if _tally!=0 is_tally=1 report form doc_pl to printer noconsole endif endscan if _tally<>0 thisformset.form4.visible=.t. thisformset.form4.show thisform.enabled=.f. endif **************************************** Again, if anyone can point me in the right direction (or at least help me get started), I would appreciate it. Best regards, Tom Tag: Unicode Application Tag: 197744
  - 5
    - global datasession It appears that even though Datasession 1 is called the "global data session" it is not actually global because when you are in another datasession you apparently can't access tables in datasession 1. Is that correct? Assuming it is correct, what would be the best way of having certain tables that you want to make available to all the forms in an application, even though these forms have private datasessions? The application I have is a school application that needs read access to student records from many different forms. I have standard procedures that have been opening up the student data files and reading from them when I need information, but the coverage profiler shows that this is a real performance killer. It would be much faster to have the tables open all the time for read access. I could simply open the tables when I start each form that needs access, but having a global instance of the tables would be quicker and more helpful. Kevin Clark Seton Home Study School Tag: Unicode Application Tag: 197739
  - 6
    - Grids on form with Private Datasession and 3 tier application Please could someone give me a pointer in the right direction on this please. I am developing a small application but I would like to stick with the 3 tier architecture if possible. My forms are modeless with private datasessions. The problem is, I would like to display a recordset in a grid on my form. The grid control will only allow a table/cursor as a record source so I need some way to get that recordset through the tiers. I have tried creating a cursoradapter but the cursor gets created in the default datasession instead of the private one. I am on the verge of just coding the data access straight into my grid control but that would break the 3 tier design. Is my best option ADO or another idea? If I use ADO is there a grid that will accept ADO as a recordset or do I have to convert it back to a cursor? Your thoughts please. -- Regards Darren Woodford - MCP, MCSE Woodford Computer Systems Ltd http://www.woodfordcomputers.co.uk http://www.pegasus-opera-ii.co.uk Tag: Unicode Application Tag: 197737
  - 7
    - Conditional Counter field .. Want to add a Counter field to a Table which should be incremented only if certain field in the table is NOT EMPTY() ? How can I achieve this ? Urgent Response is urged. TIA Tag: Unicode Application Tag: 197734
  - 8
    - VFP6 and Excel Hi I have a program in VFP6 that has OLE excel worksheet in a form I am able to print what I want by calling oXObj.PrintOut() but I can't get .PrintPreview to work. I would also like to be able to bring up the standard Print Dialog window can anyone help me with this. Any help greatly appreciated. Warren warrenjw@austarnet.com.au Tag: Unicode Application Tag: 197729
  - 9
    - VFP6 & VFP8 on the same computer Hi, I have upgraded my computer from VFP6 to VFP8 for what i had to uninstall VFP6, however I have a framework (Visual Promatrix 6.0) that is sending error when I try to execute under VFP8.... is it possible to have both VFP versions installed concurrently on the same computer? how? thanks Oscar Taboada Tag: Unicode Application Tag: 197728
  - 10
    - FPW2.6a changing browse title In FPW2.6, can I change the title of a browse window without releasing / redisplaying the browse? * something like this, but working ;) ***************************************** CREATE CURSOR test (test L) m.ltitle="text1" ON KEY LABEL f12 DO chgtitle BROWSE TITLE m.ltitle **************************** PROCEDURE chgtitle **************************** PRIVATE m.loldtitle m.loldtitle=m.ltitle m.ltitle="text2" SHOW WINDOW (m.loldtitle) REFRESH * also tried MODIFY WINDOW (m.loldtitle) TITLE (m.ltitle) *eof At the moment I'm doing this: ************************************* CREATE CURSOR test (test L) m.test="text1" m.looping=.T. ON KEY LABEL f12 DO chgtitle ON KEY LABEL esc DO killit DO WHILE m.looping BROWSE ; TITLE m.test ENDDO ON KEY LABEL esc ON KEY LABEL f12 ******************* PROCEDURE chgtitle ******************* PUSH KEY CLEAR RELEASE WINDOW (m.test) m.test=IIF(m.test="text1","text2","text1") POP KEY ******************* PROCEDURE killit ******************* PUSH KEY CLEAR m.looping=.F. RELEASE WINDOW (m.test) POP KEY *eof -- TIA Andrew Howell Tag: Unicode Application Tag: 197721
  - 11
    - Create Label generates C0000005 error I have a VFP8 SP1 application (compiled EXE) that generates a C00000005 error whenever I run "MODIFY LABEL XXX" or "CREATE LABEL XXX" (xxx does or does not exist - makes no difference). I have another VFP8 SP1 application in the same directory (Command prompt emulator) that does not give C00000005 error. In both cases, no tables are open so it has nothing to do with data file corruption, indexes or a corrupt label file. Any ideas? Cheers David Younger Tag: Unicode Application Tag: 197719
  - 12
    - Any real speed advantage with dual Xeon processors? Hi, I'm looking for the fastest performance I can get on a networked VFP app. The server which holds the data is currently dual Xeon, lots of RAM, Win 2003 Server, 15K SCSI drives, 10/100BaseTX LAN. My current idea is to upgrade the server to 1000BaseTX, and buy a dual Xeon workstation, plenty of RAM, 1000BaseTX, 15K SCSI drives and XP Pro. The app only needs to work on the one workstation, and the server is simultaneously handling data for 50+ other workstations with lower performance requirements. The data is all free table - I can't use DBCs/stored procedures because of FPD apps sharing the data. Do the dual processors make a difference to workstation speed with VFP? Does anyone have any better ideas? VFP7, but going VFP9 as soon as it's available. Regards, Neil Tag: Unicode Application Tag: 197713
  - 13
    - How to get images to be added automatically to project I am trying to setup my app so that if I create a new project and add the startup routine, all necessary routines will be automatically added to the project. I do this by having a dummy routine that never gets called, that references all forms, classes, and reports. I also have a bunch of images I want added to the project that are not directly referenced. Any ideas how these could be referenced in a dummy routine so that the project will automatically add them on rebuild? Tag: Unicode Application Tag: 197711
  - 14
    - PowerTCP UDP Control Does anyone have any experience using PowerTCP's UDP Control. Tag: Unicode Application Tag: 197699
  - 15
    - DBI-Tech ctTree Activex -- anyone know how to get node information Does anyone Know how to get node information such as text value when user clicks on a node from DBI-Tech ctTree activex control? ALso how do you know if the node you clicked on is a parent or child node? thanks Nick Tag: Unicode Application Tag: 197687
  - 16
    - DBI-Tech ctTree activex -- how do I get node information? Does anyone Know how to get node information such as text value when user clicks on a node from DBI-Tech ctTree activex control? ALso how do you know if the node you clicked on is a parent or child node? thanks Nick Tag: Unicode Application Tag: 197686
  - 17
    - Not enough memory message when joining source control project File -> Join source control project. This is a large project with several thousand files. VFP apparently does a get latest on the PJM file, builds a new PJX., and then does a get latest on everything in the PJX. When it finishes, I get "There is not enough memory to complete this operation". At the time this occurs, VFP is consuming 20MB physical memory, 10MB swap file, 209 GDI objects, and 2911 USER objects. This last entry concerns me, as 2911 USER objects is quite high and is probably why the error occurs. VFP will normally have less then 100. Historically, excessive USER or GDI usage is a result of poor programming, bugs, or memory leaks. I also think that this should work, even if it is using a lot of USER resources. Win2000/XP doesn't have the terminal USER or GDI limits that Win9x had, so I'm thinking that the problem here is internal to VFP. Also, it works for some of us, and not for others. It's not just my workstation, as I'm not the only one having this problem. Any ideas? Tag: Unicode Application Tag: 197681
  - 18
    - VFP 9.0 beta help file I have downloaded and installed the beta of VFP 9.0. The help file does not function, and I wonder if this is the way the beta was released. Should I try downloading and installing again, or is this feaure just not working in the beta? -- seeker Tag: Unicode Application Tag: 197678
  - 19
    - Watch for a fake bill Hi FP community, Make sure to watch out for a fake bill from Stonefield ... I guess they are desperate enough for business that they have resorted to sending a fake bill to try to get return customers. Very, very unethical business strategy in my opinion. Tag: Unicode Application Tag: 197672
  - 20
    - dbf and php there is an example to open with mysql and php a foxpro database? Tag: Unicode Application Tag: 197663
  - 21
    - Tables with buffering VFP 80 Sp1 XP My form allows the user to add a record. (In this case to the zip code table). I control my "Save" and "Undo" according to certain rules. If the user enters a zip code that is already in the table, I want to prevent the "Save" from enabling. However, on the LostFocus of the textbox for the zip code, I will automatically save the record when I seek that code. How do I determine if that zip code codes not already exist? I could open the table twice, but that seems a waste. TIA Tag: Unicode Application Tag: 197651
  - 22
    - _Screen.Image When an Image object is added to the _screen to show some picture or graphic and a user later runs a report in Preview mode, periodically the image object on the _screen, continues to show the report preview image even after the report preview has been released. It is as if the graphic image from the report preview window, overlays, changes or corrupts the PICTURE of the IMAGE object on the _screen. Has anyone else seen this behavior/bug, and if so, any ideas what causes it or how to fix it short of destroying the _screen.image object and re-adding it to _screen? Thx Alec Tag: Unicode Application Tag: 197648
  - 23
    - Sql Server Question Assuming I have a table stored in SQL server. What is the best technique advised as to searching for a particular record since the Seek command can not be used. The two options that comes to my mind is the Locate and the set filter command. If the particular field I am searching for has been defined in SQL server as being an index key, how can one perform a search that would not be considered sequestial and move the record pointer to the record desired as in the seek command. Many thanks in advance. Shahriar Tag: Unicode Application Tag: 197647
  - 24
    - displaying records through a preview window Hi, what and how would be the easiest way to display records in a pre-formatted preview window in vfp6.0? before with 2.6, i redirect the formatted report to a text file, viewing the result through 'modi comm (text output file)' and terminating the preview report throught the ESC button. With 6.0, i've heard of so many ways to implement it, i dont know now what to use as my standard program procedure? I'm thinking of using a 'Microsoft Word Document Viewer'. will this simplify my class creation and maintenance? Thank you very much and more power! Long live Foxpro! Tag: Unicode Application Tag: 197646
  - 25
    - Cryptor IV fll file I can't seem to get a response from Xitech on the issue but they advertise the Cryptor IV is compatible with VFP 8 but there is not an fll for VFP8 included in my copy. Is there an fll for VFP8? And if so does anybody have it and can I get a copy. This should not be a problem as I can't use the fll without a legit copy of he rest and I have that and all. But it makes it a little hard to use the product in VFP8 without the fll since you have to have the proper version of the dll for each version of VFP that is supported. I have tried emailing Xitech on the issue several times and have not gotten any response from them at all. Tag: Unicode Application Tag: 197644

I have making application supporting Big5 for a long time. But now I want to
build an application supporting Unicode. How can I do so ?

RE: Unicode Application by Leemi

Leemi
Fri Aug 06 10:50:36 CDT 2004

Hi Hugh:

>I have making application supporting Big5 for a long time. But now I want
to
>build an application supporting Unicode. How can I do so ?

I am not sure if this answers your question, but If you are trying to
create an app that uses Asian characters, then take a look at this link:

http://www.stevenblack.com/INTLUsingAsianCharacters.asp

I hope this helps.

This posting is provided "AS IS" with no warranties, and confers no rights.

Sincerely,
Microsoft FoxPro Technical Support
Lee Mitchell

*-- VFP9 Public Beta Now Available!! --*
Download the VFP9 beta here: http://msdn.microsoft.com/vfoxpro/

*-- VFP8 HAS ARRIVED!! --*
Read about all the new features of VFP8 here:
http://www.universalthread.com/VisualFoxPro/News/VFP8Release.asp
Purchase VFP8 here:
http://shop.microsoft.com/Referral/Productinfo.asp?siteID=11518

Keep an eye on the product lifecycle for Visual FoxPro here:
http://support.microsoft.com/default.aspx?id=fh;[ln];lifeprodv
- VFP5 Mainstream Support retired June 30th, 2003
- VFP6 Mainstream Support retired Sept. 30th, 2003

Re: Unicode Application by Rob

Rob
Fri Aug 06 15:54:25 CDT 2004

Hughs,

Does your application need to communicate with a back-end database like SQL
Server?

Rob

"Hughs Man" <hughs@graduate.hku.hk> wrote in message
news:OpN5Fb8eEHA.1724@TK2MSFTNGP10.phx.gbl...
> I have making application supporting Big5 for a long time. But now I want
to
> build an application supporting Unicode. How can I do so ?
>
>

Re: Unicode Application by Hughs

Hughs
Sun Aug 08 02:31:41 CDT 2004

It's just using Free Table DBF

"Rob Richardson" <notreally@n2net.net> ¦b¶l¥ó
news:ekYVec$eEHA.2396@TK2MSFTNGP11.phx.gbl ¤¤¼¶¼g...
> Hughs,
>
> Does your application need to communicate with a back-end database like
SQL
> Server?
>
> Rob
>
> "Hughs Man" <hughs@graduate.hku.hk> wrote in message
> news:OpN5Fb8eEHA.1724@TK2MSFTNGP10.phx.gbl...
> > I have making application supporting Big5 for a long time. But now I
want
> to
> > build an application supporting Unicode. How can I do so ?
> >
> >
>
>