十豆三的留言

有偿求助：本人欲有偿寻求VFP或VB高手代编程序，有意者请发电子邮件至Asia310@163.com联系。

我是北京专职IT猎头Jason，服务外资软件公司。现招聘如下人才，长期有效。这些公司的薪水都比世面上高出20%左右，因为找的都是是高级人才。薪水范围在20-90万之间。如果感兴趣或能推荐人，请发简历至jason.huang@careerfocus.com.cn或者MSN/MAIL:rofy-jason@hotmail.com，加msn请注明申请职位，谢谢！-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------做浏览器的外资公司，在朝阳区，薪水open，一般在20%增长。要求候选人技术全面，基础扎实，C++非常精通。  1.Unix嵌入式c++开发，master3年工作经验，熟悉web标准.  2.Windows mobile/WinCE嵌入式开发，master4年工作经验，熟悉web标准.  3.senior product tester，掌握2种OS，熟悉web标准（html,css,ecmascript），熟悉网络协议，至少2年测试经验。------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------外资IT consultancy，薪水open，需要工作经验》=7年的候选人，女生可以放宽到5年，在东城区。特别需要工作经验10-20年的开发人才，年薪20-70万。 1.Java或C++企业级应用软件开发，7年工作经验. 2.QA,Exposure to object oriented analysis and design and testing on systems developed in Java J2EE, .NET and C++,3年工作经验，熟练运用automated testing tools，defect management systems and Agile methods.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------外资手机OS开发公司，薪水丰厚，不过对候选人的能力要求非常严格。在海淀。薪水行内top。 1.资深c++或java高手（设计模式+算法+软件工程，基础深厚），master4年或者本科7年以上工作经验，Senior Engineer/Senior Technical Trainer/Team Leader/Project Manager/Architect/Engineering Manager.----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------外资500强  1.Unix/Linux下C++开发，6年工作经验，有debugging丰富经验；懂unix file system&NFS internal,mainframe(z/os) experience and storage platform.  2.Unix,C/C++,master 3-5年工作经验，熟悉OS and file system and windows kernel is a plus.  3.senior automation test engineer;principle QA,懂file system，web service和storage。  4.senior tester：懂web标准（html,xml,css,ecmascript），精通至少2中OS，口语流利，master3年工作经验。  

请教这段代码如何放进我的主程序中,达到先调整屏幕分辨率紧接着运行我的一系列的后序表单? 我试着放在我的主程序开头,连编后运行,当调整屏幕分辨率后,后面的都不见出来了. ? SetDisplayMode( '1024x768x32@70' )  *!* ---------------------------------------------------------------------------------  *!* 功能: 设置当前显示模式  *!* 入口: tcModeDesc - 显示模式描述, 格式为: 宽x高x颜色位数@刷新率  *!* 　　　tiType    - 0/1/2 ( 临时/永久/测试 )  *!* 出口: 操作结果( -1/0/1 - 失败/成功/需要重启生效 )  *!* ---------------------------------------------------------------------------------  PROCEDURE SetDisplayMode( tcModeDesc, tiType )  #define CDS_UPDATEREGISTRY              0x00000001  #define CDS_TEST                        0x00000002  #define CDS_FULLSCREEN                  0x00000004  #define CDS_GLOBAL                      0x00000008  #define CDS_SET_PRIMARY                0x00000010  #define CDS_VIDEOPARAMETERS            0x00000020  #define CDS_NORESET                    0x10000000  #define CDS_RESET                      0x40000000  #define DM_BITSPERPEL                  0x00040000  #define DM_PELSWIDTH                    0x00080000  #define DM_PELSHEIGHT                  0x00100000  #define DM_DISPLAYFLAGS                0x00200000  #define DM_DISPLAYFREQUENCY            0x00400000  IF ( PCOUNT() < 1 )    RETURN .F.  ENDIF  IF ( PCOUNT() < 2 )    m.tiType = 0  ENDIF  LOCAL iWidth, iHeight, iBpp, iFreq, cDevMode, iItems, iResult  m.iWidth  = CAST( GETWORDNUM( m.tcModeDesc, 1, 'x' ) AS I )  m.iHeight = CAST( GETWORDNUM( m.tcModeDesc, 2, 'x' ) AS I )  m.iBpp    = CAST( GETWORDNUM( m.tcModeDesc, 3, 'x' ) AS I )  m.iFreq  = CAST( GETWORDNUM( m.tcModeDesc, 2, '@' ) AS I )  m.cDevMode = REPLICATE( CHR(0), 4+16+5*2+32+2+( 4*3+4+4 )+8*4 )  m.cDevMode = REPLICATE( CHR(0), 32 + 4 ) ;    + BINTOC( LEN( m.cDevMode ), 'rs' ) + m.cDevMode  *!* 获取当前显示设置  DECLARE Long EnumDisplaySettings IN WIN32API AS _dp_enumdispset ;    String lpszDeviceName, ;              && specifies the display device    Long iModeNum, ;                      && specifies the graphics mode    String @ lpDevMode                    && points to structure to receive settings  _dp_enumdispset( NULL, -1, @ m.cDevMode )        && -1 == ENUM_CURRENT_SETTINGS  CLEAR DLLS _dp_enumdispset  m.iItems = BITOR( DM_BITSPERPEL, DM_PELSWIDTH, DM_PELSHEIGHT, DM_DISPLAYFREQUENCY )  m.cDevMode = LEFT( m.cDevMode, 32+8 ) ;    + BINTOC( m.iItems, 'rs' ) ;    + SUBSTR( m.cDevMode, 1+32+8+4, 16+5*2+32+2 ) ;    + BINTOC( m.iBpp, 'rs' ) ;    + BINTOC( m.iWidth, 'rs' ) + BINTOC( m.iHeight, 'rs' ) ;    + SUBSTR( m.cDevMode, 1+32+8+4+4*3, 4 ) ;    + BINTOC( m.iFreq, 'rs' ) ;    + SUBSTR( m.cDevMode, 1+32+8+4+4*3+4 )  DECLARE Long ChangeDisplaySettings IN WIN32API AS _dp_setdispmode ;    String lpDevMode, ;          && graphics mode    Long dwflags                  && graphics mode options  m.iResult = _dp_setdispmode( m.cDevMode, ICASE( ;    0 == m.tiType, 0, 1 == m.tiType, CDS_UPDATEREGISTRY, CDS_TEST ))  CLEAR DLLS _dp_setdispmode  RETURN IIF( m.iResult < 0, -1, m.iResult ) 

十豆三 回复于：2008-08-30

排版看不了，发个帖子吧。

请问：如何使用代码方式打开combo控件，使其下拉？

问题请教 
用VFP通过ODBC链接Excel表,为什么在Excel表中的字符型信息到VFP中都变成了MEMO类型(即备注型), 
应如何解决? 
以下是我的原代码 
aa="DBQ=C:\226名学生.xls;Driver={Microsoft Excel Driver (*.xls)};UID=admin;pwd=;" 
bb=sqlstringconnect(oy1) 
k=sqlexec(bb,"select * from [Sheet1$]","sjb") 
brows 
-------------------- 
 你说＂字符长度大于254的就会变成MEMO类型，要么改短一些，否则只能用MEMO类型。＂ 

我通过Excel菜单的＂格式＂－－＞＂列＂－－＞＂列宽＂设置了Excel的列宽，但仍然不能解决问题． 
请帮忙解决一下． 
非常感谢！！ 
 

谢谢你回答我的问题，但我还是没有解决问题
如果可以请加我qq：21156410

请问专家：
我用ODBC建立了一个SQL SERVER连接，使用下列程序插入一条记录，为什么没有写入成功？不知道错误出在哪里？Tableupdate(.T.)返回值是true，但是SQL 数据表中没有该记录。

create sql view xsxkvi remote connection conect1 as select * from xsxk where xh='0790790'
use xsxkvi
brow

=DBSetProp('xsxkvi',"View","SendUpdates",.T.)
=DBSetProp('xsxkvi',"View","BatchUpdateCount",1)
=DBSetProp('xsxkvi',"View","UpdateType",1)
=DBSetProp('xsxkvi',"View","Tables","dbo.xsxk")
=DBSetProp('xsxkvi',"View","WhereType",3)

=DBSetProp("xsxkvi.xh","Field","UpdateName","xh")
=DBSetProp("xsxkvi.xh","Field","KeyField",.T.)
=DBSetProp("xsxkvi.xh","Field","Updatable",.T.)

=DBSetProp("xsxkvi.keh","Field","UpdateName","keh")
=DBSetProp("xsxkvi.keh","Field","KeyField",.T.)
=DBSetProp("xsxkvi.keh","Field","Updatable",.T.)

=DBSetProp("xsxkvi.Bji","Field","UpdateName","Bji")
=DBSetProp("xsxkvi.Bji","Field","KeyField",.T.)
=DBSetProp("xsxkvi.Bji","Field","Updatable",.T.)

=DBSetProp("xsxkvi.xb","Field","UpdateName","xb")
=DBSetProp("xsxkvi.xb","Field","KeyField",.T.)
=DBSetProp("xsxkvi.xb","Field","Updatable",.T.)

=CURSORSETPROP("Buffering", 5, "XSXKVI")
insert into xsxkvi (xh,keh,bji,xb) values ('0790790','1034','1255','JCX')
=TableUpdate(.T.)

十豆三 回复于：2008-06-16

怎么所有字段都是,"Field","KeyField",.T.)

十豆三老师，您好！请教一个问题,将图片文件转成base64编码数据后,将数值传给一个变量,但是变量字符太长,无法用SQLEXEC()函数将数据写进ACCESS中????

十豆三老师，您好！经常看到你回答网友的提问，你的专业和热情让我非常敬仰．本人是非计算机专业，目前所会的程序只有ＶＦ．四年前写过一个物流发票打印与运单管理的程序．最前打算做一个基于ＷＥＢ数据库的通讯软件．初步计划用ＶＦＰ写终端，ＰＨＰ＋ＭＹＳＱＬ写服务器端．不用ＶＦＰ直接读数据主要是考虑到数据库安全问题．在网上关于ＶＦＰ与ＷＥＢ互动的文字非常少，有的只是只言片语．请问十豆三老师能不能给个思路．如能出个流程图在下更是十分感激．山东　东东　　xvdongcn@yahoo.com.cn

你真是我的偶像呀