Cita:
Iniciado por mdavila Bueno no entiendo bien tu problema.....
Vos tenes que aumentar un contador que esta en tu BD?
Pone tu codigo a ver....
Saludos.
No es el codigo, creo que en sql server me esta guardando en numero de veces que doy clic en guardar....
Mi tabla solo tiene un registrooo, al incrementar debe guardar el 2 en el campo clave, pero no guarda ese consecutivooo, sino me pone otro numero 30 por ejemplo. Vuelvo a borrar otra ves el regsitro agregado, y hago el mismo proceso de guardar los datos, nuevamente lo logico que seria 2, pero sin embargo me pone el 31 y asi sucesivamenteee
Por si acaso ahi esta el codigooo
Al momento de cargar la web form
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim sqlstr As String
Dim tabla As New Grupogto
If Not Page.IsPostBack Then
sqlstr = "select top 1 orden_servicio from ve_ordenes_servicio order by orden_servicio desc"
lblordenno.Text = tabla.recupera_query(sqlstr, "orden").Rows(0).Item("orden_servicio") + 1
txtfecha.Text = DateTime.Today.Date
tabla = Nothing
End If
tabla = Nothing
End Sub
Al dar click en guardar...
Protected Sub cmdGraba_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btngraba.Click
Dim tabla As New Grupogto
Dim strSituacion As String
Dim Fecha_Close As Date
strSituacion = "A"
Fecha_Close = System.Data.SqlTypes.SqlDateTime.Null
Dim datos(,) As String = {{"fecha_servicio", txtfecha.Text, td.tddatetime}, {"vehiculo_fk", unidad.SelectedValue, td.tdint}, _
{"remolque_fk", Val(lblJaula.Text), td.tdint}, {"operador_fk", Val(lblIDOperador.Text), td.tdint}, _
{"kilometraje", Val(txtKM.Text), td.tdint}, {"Observaciones", txtObservaciones.Text, td.tdvarchar}, _
{"Situacion", strSituacion, td.tdnvarchar}, {"Fecha_Cerrada", Fecha_Close, td.tddatetime} _
}
tabla.inserta("ve_ordenes_servicio", datos)
btngraba.Enabled = False
Label1.Visible = True
chkref.Visible = False
End Sub
Ojala me puedas ayudar