以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  帮忙找错,谢谢  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79813)

--  作者:zstk7333
--  发布时间:2016/1/9 16:45:00
--  帮忙找错,谢谢
Dim str1 as string = e.form.controls("Textbox1").tex Dim str2 as string Dim dr as datarow dr=datatable("表A").find("电话1= str1" or "电话2=str1") Str2 = dr("姓名")
--  作者:Hyphen
--  发布时间:2016/1/9 16:49:00
--  
Dim str1 As String = e.form.controls("Textbox1").text
Dim str2 As String
Dim dr As DataRow
dr=DataTable("表A").find("电话1= \'" & str1 & "\' or 电话2=\'" & str1 & "\' ")
If dr IsNot Nothing Then
    str2 = dr("姓名")
End If

--  作者:zstk7333
--  发布时间:2016/1/9 17:03:00
--  回复:(Hyphen)Dim str1 As String = e.form.contro...
谢谢
[此贴子已经被作者于2016/1/9 17:42:42编辑过]

--  作者:滔一壶
--  发布时间:2016/1/9 17:48:00
--  
find("电话1= \'" & str1 & "\' or 电话2=\'" & str1 & "\' ")