Okay here's the code: Thanks for all the help
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ObjDa.Fill(Amdata11, "optClientDatabases")
If Not Page.IsPostBack() Then
currentpos = 0
ViewState("CurrentPos") = 0
Me.DataBind()
amrdatacount = Amdata11.Tables("optclientdatabases").Rows.Count
objconn.Close()
Private Sub TxtClientName_DataBinding(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtClientName.DataBinding
currentpos = CType(ViewState("CurrentPos"), Integer)
ViewState("CurrentPos") = (currentpos)
TxtClientDatAdmin.Text = IIf(IsDBNull(Amdata11.Tables("OptclientDatabases").Rows(currentpos).Item("ClientAdmin")), " ", Amdata11.Tables("OptclientDatabases").Rows(currentpos).Item("ClientAdmin"))
TxtAccCoord.Text = IIf(IsDBNull(Amdata11.Tables("OptclientDatabases").Rows(currentpos).Item("AccountCoorinator")), " ", Amdata11.Tables("OptclientDatabases").Rows(currentpos).Item("AccountCoorinator"))
TxtUserManual.Text = Amdata11.Tables("OptclientDatabases").Rows(currentpos).Item("userManualcompleted")
Cmbconversionstatus.datasource = Amdata11
Cmbconversionstatus.datamember = optclientdatabases
CmbConversionstatus.DataTextField = IIf(IsDBNull(Amdata11.Tables("OptclientDatabases").Rows(currentpos).Item("conversionstatus")), Null,Amdata11.Tables("OptclientDatabases").Rows(currentpos).Item("conversionstatus"))
CmbConversionstatus.DataBind()