十豆三 的专栏

cooling发表于：2008-07-05

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

maoke000发表于：2008-06-15

请问专家：
我用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.)

kszxhu发表于：2008-06-10

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

xvdongcn发表于：2008-06-06

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

li0690发表于：2008-06-05

你真是我的偶像呀

hxmhj发表于：2008-05-21

请问老师，如何可以变更EditBox控件的行距？我一直找不到解决的办法，请老师指教！

回复于 2008-05-21

没有行距属性。用字号设大一些试试能不能达到你的效果。

iandgewei发表于：2008-05-09

我做报表中需要求和，在同一表中求不同字段的和。我的表字段是数量1到数量12，需要新建一个关键字（总分），进行统计求和。

回复于 2008-05-12

参考帮助中的Sum或CALCULATE 命令，另外也可以用字段相加即可。

guohao96发表于：2008-04-08

我在工资管理系统的个人工资查询中，输入员工号，密码-----登陆查询界面。
查询界面中，根据员工号传递值给视图参数，利用三个视图（分别为“人员”表与“基本工资”表；“人员”表与“工龄工资”表；“人员”表与“岗位工资”表）完成个人工资查询功能。
请教：我在查询时，得到的总是第一条记录，而不是输入的员工号的查询结果。
需要在哪改进？？

回复于 2008-04-08

你的视图可能有问题，重新查一下视图。

anmengling发表于：2008-03-31

请教您一个问题，我在一个项目文件中设计了两个表单，两个表单中各有1个列表框，我希望将第一个表单列表框中经处理后数据，体现在第二个表单的列表框当中，使用了一下语句，出现了找不到“对象from1”的错误
num=form1.list1.listcount
for i=1 to num
  thisform.list1.additem(form1.list1.listitem(i),thisform.list1.listcount+1)
ENDFOR
麻烦您帮我看看是哪里出错了，非常感谢！

回复于 2008-03-31

运行表单form1时，先
Public Form1
然后，再
do form form1.scx

mmadd3发表于：2008-03-03

求十豆三帮忙把以下VB语言转为VFP语言，谢谢！！！
２、用程序加载图层，再给图层加颜色。

--------------------------------------------------------------------------------

Option Explicit
Private Sub Form_Load()
  Dim dc As New DataConnection
  Dim layer As MapLayer
  dc.Database = App.Path + "\..\" + "Mexico"
  If Not dc.Connect Then
    MsgBox "在指定的文件夹下没找到图层数据文件！"
    End
  End If
  Set layer = New MapLayer
  Set layer.GeoDataset = dc.FindGeoDataset("States")
  layer.Symbol.Color = moYellow
  Map1.Layers.Add layer
  Set layer = New MapLayer
  Set layer.GeoDataset = dc.FindGeoDataset("Rivers")
  layer.Symbol.Color = moRed
  layer.Symbol.Style = 1
  Map1.Layers.Add layer
  
  Map1.Refresh
End Sub

回复于 2008-03-03

没用过图层