從數據表中獲取價值

Question

誰能告訴我如何從數據表中獲取價值？ 我在數據表中只有一行和一列，我需要獲取列的值來進行計算。

這是我的劇本

<SCRIPT Language="VB" Runat="server">

Sub Page_Load(Source as object, e as EventArgs) handles me.load

Dim connectionstring As String = "DRIVER={MySQL ODBC 5.2 Unicode Driver}; SERVER=localhost; DATABASE=mydb; UID=andrew; PASSWORD=kh12345; OPTION=3"

Dim connectme As OdbcConnection = New OdbcConnection(connectionstring)

Dim sqlquery As String = "SELECT f_name, f_price from tbl_picture WHERE f_ID = 1"

Dim ODBCdataadapter As OdbcDataAdapter = New OdbcDataAdapter(sqlquery, connectme)

Dim ODBCdataset As DataSet = New DataSet()

ODBCdataadapter.Fill(ODBCdataset)

DataTable.DataSource = ODBCdataset
DataTable1.DataSource = ODBCdataset
Datatable.DataBind()
Datatable1.DataBind()
End Sub

</SCRIPT >

<ASP:Datagrid ID="Datatable1" Runat="server" AutoGenerateColumns="False"BorderStyle="None" GridLines="None">
<Columns>
            <asp:BoundColumn 
            DataField="f_price" 
            ReadOnly="True"/>
</columns>
   </asp:DataGrid>

這是計算部分

 Private Sub CalculatePayment()
        Dim c_loan_amount, c_Payment
        Dim amount As String = Datatable1.Select("f_price")
        c_loan_amount = amount - (amount * Down.Text * 0.01)
        c_Payment = ((c_loan_amount * (Interest.Text * 0.01) * Year.Text) + c_loan_amount) / (Year.Text * 12)
        Payment.Text = "RM " & Format(c_Payment, "#,##0.00")
    End Sub

它應該是Dim量作為字符串部分嗎？ 我有點新，在此先感謝。

Answer 1

您需要定義行和項目。

嘗試

Dim amount As String = Datatable1.tables(0).Rows(0).Item(1)

實際上，您應該將datatable1重命名為dataset1，因為數據表可能是數據集的成員。 它只是為了最大程度地減少什么是混亂。

行告訴數據表的哪一行。 該項目告訴哪個索引。

0 = f_name
1 = f_amount