error al insertar datos

[nancy8120]

hola,
Tengo un formulario sumamente sencillo, para insertar en una bd sql server, pero al darle clik al botton me manda el siguiente error:

Compiler Error Message: BC30456: 'value' is not a member of 'System.Windows.Forms.Application'.
Line 52: objcmd.Parameters("@nombre").Value = nombref.value 'esta es la linea del error

no tengo la minima idea de como resolver este problema y tengo dos dias con el mismo y no veo la solucion, asi que sus comentario seran en hora buena,

les muestro un poco mas del codigo

el .aspx

<form id="form1" runat="server">
<div align=center><table style="text-align: center; width: 446px; height: 96px;"><tr><td colspan=2 style="text-align: left">
&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;<br />
<br />
<table style="width: 551px" border=0 cellpadding=2 cellspacing=2>
<tr>
<td colspan=3>
Insertar&nbsp; Firma:</td>
</tr>
<tr>
<td style="width: 207px; text-align: right">
Nombre:</td>
<td style="width: 34px">
</td>
<td>
<input id="nombref" type="text" size="" /></td>
</tr>
<tr>
<td style="width: 207px; text-align: right; height: 26px;">
Cargo:</td>
<td style="width: 34px; height: 26px;">
</td>
<td style="height: 26px">
&nbsp;<select id="cargof" language="javascript" onclick="return Select1_onclick()">
<option selected="selected" value="gerente">gerente</option>
<option value="administrativo">administrativo</option>
<option value="encargado">encargado</option>
<option></option>
</select></td>
</tr>
<tr>
<td style="width: 207px; text-align: right">
Es Cliente:</td>
<td style="width: 34px">
</td>
<td>
&nbsp;
<input id="es_clientef" checked="checked" type="checkbox" /></td>
</tr>
<tr>
<td style="width: 207px; text-align: right">
Id Cliente:</td>
<td style="width: 34px">
</td>
<td>
<input id="id_clientef" type="text" /></td>
</tr>
<tr>
<td style="width: 207px; text-align: right">
</td>
<td style="width: 34px">
</td>
<td>
<asp:Button ID="Button1" runat="server" Text="Save" /></td>
</tr>


el .vb


Imports System.Data
Imports System.Data.SqlClient
Imports Microsoft.VisualBasic
Imports System.Data.OleDb
Imports System.Text
Imports System.Windows.forms

Partial Class AdminFirmas
Inherits System.Web.UI.Page

Dim myconn As SqlConnection
Dim nombref, cargof, es_clientef, id_clientef

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

myconn = New SqlConnection("Data Source=PAWEB02;Initial Catalog=Forecast;Integrated Security=True")


End Sub

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim Sql As String
Dim objcmd As SqlCommand
Sql = "insert into CA_Firmas value (@nombre,@cargo,@es_cliente,@id_cliente)"
objcmd = New SqlCommand(Sql, myconn)


objcmd.Parameters.Add(New SqlParameter("@nombre", _
SqlDbType.VarChar, 40))
objcmd.Parameters("@nombre").Value = nombref.value

objcmd.Parameters.Add(New SqlParameter("@cargo", _
SqlDbType.VarChar, 50))
objcmd.Parameters("@cargo").Value = cargof.value

objcmd.Parameters.Add(New SqlParameter("@es_cliente", _
SqlDbType.Bit, 1))
objcmd.Parameters("@es_cliente").Value = es_clientef.value

objcmd.Parameters.Add(New SqlParameter("@id_cliente", _
SqlDbType.Int, 9))
objcmd.Parameters("@id_cliente").Value = id_clientef.value

objcmd.Connection.Open()

Try
objcmd.ExecuteNonQuery()
Label1.Text = "ok"
Catch ex As SqlException


Label1.Text = "error"

End Try

objcmd.Connection.Close()
nombref = Nothing
cargof = Nothing
es_clientef = Nothing
id_clientef = Nothing

End Sub
End Class


gracias
saludos

[erick_arcini]

Hola, la variable nombref la estas declarando pero no tiene una definición de clase como tal, bueno, al menos no lo veo, y la propiedad value quien sabe si sea válida para esa variable, revisalo muy bien, además esa variable no tiene ningún valor asignado y te puede mandar una referencia de objeto no asignada.

[nancy8120]

Gracias por responder,

mis dudas son:

1. a que te refieres "no tiene una definición de clase como tal" ...deveria ser asi ?... dim nombref as string
2. y cuando me dice "que la variable no tiene ningun valor" ...el formulario yo lo lleno al momento, .... debo ponerle algun valor por default?

agradezco mucho sus comentarios

[erick_arcini]

Iniciado por nancy8120

Gracias por responder,

mis dudas son:

1. a que te refieres "no tiene una definición de clase como tal" ...deveria ser asi ?... dim nombref as string
2. y cuando me dice "que la variable no tiene ningun valor" ...el formulario yo lo lleno al momento, .... debo ponerle algun valor por default?

agradezco mucho sus comentarios

Hola, viendo tu código:

2. y cuando me dice "que la variable no tiene ningun valor" ...el formulario yo lo lleno al momento, .... debo ponerle algun valor por default?

cuando llenas el formulario al momento, el que tiene el dato en este caso no es tu variable sino el objeto, podríamos considerar a un TextBox por ejemplo.

1. a que te refieres "no tiene una definición de clase como tal" ...deveria ser asi ?... dim nombref as string

Así es, aunque no es tan necesario, solo tienes que asignarle los valores a esa variable que vienen de tu formulario:

Código:

nombref = tutextboxquetengaeldato.Text;

de esa forma le estas asignando el valor del textbox a la variable, y para colocarla en tu código tendrías que hacerlo así:

Código:

nombref = tutextboxquetengaeldato.Text;
objcmd.Parameters.Add(New SqlParameter("@nombre", _
SqlDbType.VarChar, 40))
objcmd.Parameters("@nombre").Value = nombref

En caso de que no este asignada

Espero te sea de ayuda, ahora bien, si te sigue mandando el error indícame exactamente la linea donde te lo manda para llegar y corregir el error