真不知道你需要表明什么?
如果是调取可以用这个代码,获取的永远是最新的数据.
f e.DataCol.Name = "省市" Orelse e.DataCol.Name = "县市" Then
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim dr As DataRow = e.DataRow
cmd.C
cmd.CommandText = "SELECT * From {行政区域} Where [省市] = '" & dr("省市") & "' And [县市] = '" & dr("县市") & "'"
dt = cmd.ExecuteReader
If dt.DataRows.Count > 0 Then
dr("区号") = dt.DataRows(0)("区号")
dr("邮编") = dt.DataRows(0)("邮编")
Else
dr("区号") = Nothing
dr("邮编") = Nothing
End If
End If
这个功能相当于FIND(单条数据) 如果不用:
If dt.DataRows.Count > 0 Then
dr("区号") = dt.DataRows(0)("区号")
dr("邮编") = dt.DataRows(0)("邮编")
Else
dr("区号") = Nothing
dr("邮编") = Nothing
End If
End If
这一段那么你还是可以
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim dr As DataRow = e.DataRow
cmd.C
cmd.CommandText = "SELECT * From {行政区域} Where [省市] = '" & dr("省市") & "' And [县市] = '" & dr("县市") & "'"
dt = cmd.ExecuteReader
dim sn as datarow = dt.find(" [省市] = '" & dr("省市") & "' And [县市] = '" & dr("县市") & "'" )
if sn isnot nothing then
xxxxx
end if
这样处理!
我想这个SQL语句你应该会的吧.在狐表除非你用查询表,可能SQL语句可以使用复杂些,但是处理数据,就用这么简单的SQL语句就行了(狐表的load,其实也是SQL语句写的)
另外一个关联表的使用,你如果需要加载到前台来 可以利用同步,在后台处理方法一样的呀.
加好友 
发短信
Post By：2013/7/25 8:10:00 [只看该作者]
