作者cawQQ (烦!!)
看板Visual_Basic
标题Re: [.NET] 配合SQL写邮递区号查询
时间Mon Jan 3 21:23:57 2011
※ 引述《jakevin (真。假凯文)》之铭言：
: 县市 乡镇市区 邮递区号
: ┌──┬─┐ ┌──┬─┐ ┌────┐
: │ │▼│ │ │▼│ │ │
: └──┴─┘ └──┴─┘ └────┘
: Country City Code
: (combobox) (combobox) (Label)
: 我将县市做在一个SQL的资料表内
: 001 基隆市
: 002 台北市
: 003 新北市
: .
: .
: .
: 另一个资料表则是记录乡镇市区的邮递区号
: .
: .
: 002 中和区 236
: 002 板桥区 232
: .
: .
: .
: 後来VB.net写了半天 选完县市後 会自动对应该县市的乡政市区
: 这一切都很正常
: 但是邮递区号一直写不出来，所以才上来求救了 orz
: Imports MySql.Data
: Imports MySql.Data.MySqlClient
: Public Class Code
: Dim MyVoice As New SpeechLib.SpVoice
: Dim Search As String = "SELECT * FROM `country`"
: Dim cmd As New MySqlCommand(Search, cn)
: Dim da As New MySqlDataAdapter
: Dim ds As New DataSet
: Dim dvCountry As New DataView
: Dim dvCity As New DataView
: Private Sub Index_Load
: da.SelectCommand = cmd
: da.Fill(ds, "Countrylist")
: Country.DataSource = ds.Tables("Countrylist")
: Country.DisplayMember = "Country"
: Country.SelectedIndex = -1
: AddHandler Country.SelectedIndexChanged, AddressOf
: Country_SelectedIndexChanged
: Code.Text = ""
: End Sub
: Private Sub Country_SelectedIndexChanged
: cmd.CommandText = "SELECT `A1`.`Country`,`A2`.`City`,`A2`.`code`
: FROM `Country` `A1` , `Code` `A2` WHERE `A1`.`CNo` = `A2`.`CNo` And
: `A1`.`Country` Like '%" & Country.Text & "%'"
: da.Fill(ds, "City_detail")
: dvCountry.Table = ds.Tables("City_detail")
: dvCountry.RowFilter = "Country='" & Country.Text & "'"
: City.DataSource = dvCountry
: City.DisplayMember = "City"
: City.SelectedIndex = -1
: Label49.Text = ""
: AddHandler City.SelectedIndexChanged, AddressOf
: City_SelectedIndexChanged
: End Sub
: Private Sub City_SelectedIndexChanged
: cmd.CommandText = "SELECT `A2`.`Code` , `A2`.`city`FROM `Country`
: `A1` , `Code` `A2` WHERE `A1`.`CNo` = `A2`.`CNo` And `A1`.`Country` Like
: '%" & Country.Text & "%' And `A2`.`City` Like '%" & City.Text & "%'"
: da.Fill(ds, "Code")
: dvCity.Table = ds.Tables("Code")
: Label49.Text = ?????????????????
如果SQL没问题..
只要把Label.Text指到ds.tables("Code").rows(0).item("邮递区号").Tostring
应该就可以了吧..
还有你的SQL...为啥要用Like??
每个地区的邮递区号不是都是维一的吗??
SELECT CODE FROM A2 Where City = Citycombobox.member 就可以不是吗@@?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 111.184.196.206
1F：推 jakevin:感谢了! 最後用 DataReader搞定了 01/04 16:08
2F：→ jakevin:Like的原因是用等於会找不到值 最後改成UFT8就可以了 01/04 16:09
3F：推 jakevin:再 再用等於 01/04 16:10