Temas

Hola que tal. tengo espero puedan ayudarme con esto, en realidad ya intente de todo con el windows server 2003 y  windows 7,  el error me salta al conectarlo con el controlador de dominio.

Windows server 2003

ip 192.168.1.154
mascara 255.255.255.0
gateway 192.168.1.1

dns 127.0.0.1


Windows 7

ip 192.168.1.125
mascara 255.255.255.0
gateway 192.168.1.1

dns 192.168.1.154

Esa es la configuracion cuando pongo el dominio para conectarme salta la autentificacion pero no puedo conectarme con el usuario que eh creado en el server, y ya le eh dado permisos al usuario y todo, alguien tiene idea de que este pasando, alguna politica de seguridad que modificar en el W. 7?...

me salta esto

Hola, acabo de comprar el DFRduino UNO V2.0 y Shield Arduino para Motor 1A, alguien sabe como conectar estos 2, estoy estudiando informatica, y no tengo muchos conocimientos de robotica y electronica. Espero alguien pueda ayudarme, gracias.

Alguien sabe como desarrollar un robot con una camara IP, o tiene un manual. agradeceria su ayuda...

Hola, tengo un mini motorola defy, esta seminuevo, tengo una semana con el, ahora cada vez que reproduzco una canción se escucha borrosa. Eh buscado en google y aparecen muchos problemas con el auricular, alguien sabe como arreglar la bocina?

Hola, espero sea el titulo apropiado, me preguntaba si es posible redireccionar la web que soliciten a un modem router, me refiero a que si los clientes conectados a una red soliciten la pagina www.ejemplo.com los redireccione automaticamente a otra www.ejemplo2.com, es decir un tipo phishing (como ejemplo), se que puede usar ARP poisoning pero esto es para cada computadora?, alguien podria o tiene idea de como hacer esto?

Alguien sabe como conectar dos SQL SERVER 2008, atraves de la internet?, me refiero a que tengo dos laptops, que tienen instalado el SQL SERVER, y puedo conectarme localmente una con otra, pero necesito conectarme desde la universidad con mi laptop y sql server a la otra lap que tengo en casa con sql tambien, alguien lo ha hecho?, algun manual?. no eh encontrado algo bien explicado.gracias

Hola, resulta que tengo instaldo windows 7, despues instale el backtrack r3 desde un DVD, al terminar la instalacion reinicie pero me manda un error del grub, entonces cargue mi Windows 7 y en el CMD escribi esto:

1. bootrec /fixboot
2. bootrec /fixmbr

Solucione el arranque de Windows 7, como reparo el GRUB de backtrack para iniciar con cualquiera de los dos SO?

Hola, que tal foro, tengo una duda, lo que pasa es que estoy creando una base de datos en SQL Server 2008 y creo todo con el Query pero me marcan varios errores, estoy iniciando en bases de datos, espero puedan ayudarme. muchas gracias dejo el code.

Código [Seleccionar] Expandir


USE dep
GO

-- TABLA DEPARTAMENTO

CREATE TABLE DEPARTAMENTO(
NOMBRED VARCHAR(15) NOT NULL,
NUMEROD INT NOT NULL,
NSSGTE  CHAR(9),
FECHAINICGTE DATE,

PRIMARY KEY (NUMEROD),
UNIQUE(NOMBRED),
FOREIGN KEY (NSSGTE) REFERENCES EMPLEADO (NSS),
)
GO

--TABLA EMPLEADO

CREATE TABLE EMPLEADO(
NOMBREP  VARCHAR(15) NOT NULL,
INIC     CHAR NULL,
APELLIDO VARCHAR (15)NOT NULL,
NSS      CHAR(9)NOT NULL,
FECHAN   DATE,
DIRECCION VARCHAR (30) NULL,
SEXO     CHAR NULL,
SALARIO  DECIMAL (10,2) NULL,
NSSUPER  CHAR(9) NULL, 
ND       INT NULL,
PRIMARY KEY (NSS),
FOREIGN KEY (NSSSUPER)REFERENCES EMPLEADO(NSS),
FOREIGN KEY (ND) REFERENCES DEPARTAMENTO (NUMEROD),
)
GO

-- TABLA LUGARES_DEPTOS


CREATE TABLE LUGARES_DEPTOS(
NUMEROD INT NOT NULL,
LUGARD  VARCHAR (15) NOT NULL,

PRIMARY KEY (NUMEROD, LUGARD),
FOREIGN KEY (NUMEROD) REFERENCES DEPARTAMENTO (NUMEROD),
)
GO


-- TABLA PROYECTO


CREATE TABLE PROYECTO(
NOMBREPR  VARCHAR(15) NOT NULL,
NUMEROP   INT NOT NULL,
LUGARP    VARCHAR(15) NULL,
NUMD      INT NOT NULL,
PRIMARY KEY (NUMEROP),
UNIQUE (NOMBREPR),
FOREIGN KEY (NUMD) REFERENCES DEPARTAMENTO (NUMEROD),
)
GO


--TABLA TRABAJA_EN

CREATE TABLE TRABAJA_EN(
NSSE  CHAR(9) NOT NULL,
NUMP  INT NOT NULL,
HORAS DECIMAL (3,1) NOT NULL, 
PRIMARY KEY (NSSE, NUMP),
FOREIGN KEY (NSSE) REFERENCES EMPLEADO (NSS),
FOREIGN KEY (NUMP) REFERENCES PROYECTO (NUMEROP),
)
GO

--TABLA DEPENDIENTE

CREATE TABLE DEPENDIENTE(
NSSE    CHAR(9)NOT NULL,
NOMBRE_DEPENDIENTE VARCHAR(15)NOT NULL, 
SEXO    CHAR,
FECHAN  DATE,
PARENTESCO VARCHAR (8) NULL,
PRIMARY KEY (NSSE,NOMBRE_DEPENDIENTE),
FOREIGN KEY (NSSE) REFERENCES EMPLEADO (NSS),
)
GO







Errores

Código [Seleccionar] Expandir


Mens. 1767, Nivel 16, Estado 0, Línea 4
La clave externa 'FK__DEPARTAME__NSSGT__4D94879B' hace referencia a la tabla no válida 'EMPLEADO'.
Mens. 1750, Nivel 16, Estado 0, Línea 4
No se pudo crear la restricción. Consulte los errores anteriores.
Mens. 1769, Nivel 16, Estado 1, Línea 4
La clave externa 'NSSSUPER' hace referencia a una columna no válida 'NSSSUPER' en la tabla que hace la referencia 'EMPLEADO'.
Mens. 1750, Nivel 16, Estado 0, Línea 4
No se pudo crear la restricción. Consulte los errores anteriores.
Mens. 1767, Nivel 16, Estado 0, Línea 5
La clave externa 'FK__LUGARES_D__NUMER__52593CB8' hace referencia a la tabla no válida 'DEPARTAMENTO'.
Mens. 1750, Nivel 16, Estado 0, Línea 5
No se pudo crear la restricción. Consulte los errores anteriores.
Mens. 1767, Nivel 16, Estado 0, Línea 6
La clave externa 'FK__PROYECTO__NUMD__59FA5E80' hace referencia a la tabla no válida 'DEPARTAMENTO'.
Mens. 1750, Nivel 16, Estado 0, Línea 6
No se pudo crear la restricción. Consulte los errores anteriores.
Mens. 1767, Nivel 16, Estado 0, Línea 5
La clave externa 'FK__TRABAJA_EN__NSSE__5EBF139D' hace referencia a la tabla no válida 'EMPLEADO'.
Mens. 1750, Nivel 16, Estado 0, Línea 5
No se pudo crear la restricción. Consulte los errores anteriores.
Mens. 1767, Nivel 16, Estado 0, Línea 4
La clave externa 'FK__DEPENDIENT__NSSE__6383C8BA' hace referencia a la tabla no válida 'EMPLEADO'.
Mens. 1750, Nivel 16, Estado 0, Línea 4
No se pudo crear la restricción. Consulte los errores anteriores.


Hola no se si sea aqui el lugar correcto para exponer, muchas disculpas si esto es asi,  tengo una duda, alguien sabe lo que significa este error me tope con el. Alguien sabe que provecho puedo sacar de el?, todo es con fines de aprender.

Esto me manda cuando quiero entrar en: http://66.181.61.171/sistema/admin.php
La direccion es local, con XAMPP al parecer.

Código [Seleccionar] Expandir




Warning: sybase_select_db() [function.sybase-select-db]: 0 is not a Sybase link index in /opt/apache/htdocs/sistema/admin.php on line 4
insert into acceso values ('administrador','Administrador','91f5167c34c400758115c2a6826ec2e3','SAD','A')

Warning: sybase_query() [function.sybase-query]: -1
is not a Sybase link index in /opt/apache/htdocs/sistema/admin.php on line 9





alguien sabe como solucionar esto, lo que pasa es que quiero agregar desde el textboxcantidad la cantidad al listview pero no funciona, recorro mi listview pero no me inserta el dato dejo mi codigo...

Código [Seleccionar] Expandir



For i = 0 To Form1.lsvProductos.Items.Count - 1
                    If Form1.lsvProductos.Items(i).SubItems(1).Text = nombre Then

                        'cant = Form1.lsvProductos.Items(i).SubItems(2).Text
                        cant = Form1.txtcantidad.Text.ToString
                        Form1.lsvProductos.Items(i).SubItems(2).Text = cant 'aqui le digo que en el subitem 2 ponga la cant que es el txtcantidad
                        subtotal = cant * costo
                        Form1.lsvProductos.Items(i).SubItems(4).Text = subtotal
                        Exit For
                        'b = True
                    End If
                Next

                'If b = False Then
                If (i = Form1.lsvProductos.Items.Count) Then
                    Form1.lsvProductos.Items.Add(Form1.lsvProductos.Items.Count + 1)
                    Form1.lsvProductos.Items(Form1.lsvProductos.Items.Count - 1).SubItems.Add(nombre)
                    Form1.lsvProductos.Items.SubItems.Add(Form1.txtcantidad.Text) ' aqui se supone que lo debo de agregar pero no lo hace
                    Form1.lsvProductos.Items(Form1.lsvProductos.Items.Count - 1).SubItems.Add(costo)
                    subtotal = 1 * costo
                    Form1.lsvProductos.Items(Form1.lsvProductos.Items.Count - 1).SubItems.Add(subtotal)
                End If


Hola, tengo un problema con una base de datos y mi interface, esta tiene que realizar una venta, explicandolo mejor:

-una tabla ventas que tiene actualizar el total cuando se inserten los datos en pv osea cantidad y precio, esto pasa cuando yo agrego la informacion con un triger esto esta resuelto
-tengo una tabla pv
-tengo una tabla productos que disminuyen las existencias cuando inserto en pv la cantidad mediante un triger.

Tengo este error; executenonquery requiere una connection abierta y disponible. el estado actual de la conexión es cerrada, creo que es por la conexion, pero no se como solucionarlo.

En mi base de datos, se tiene que preparar una venta, para ello primero busco mediante la clave de la venta cual es la mayor, y depende a ella le sumo otra mas (no se si este bien ahi), sucesivamente puedo mandar a traer un procediemiento almacenado para que ejecute los trigers y sumen total y bajen existencias en las sucesivas tablas, pero hice por ahi un insert tambien.
Podria alguien ayudarme, soy nuevo en esto gracias.

Anexo mi codigo

Código [Seleccionar] Expandir







Imports System.Data.SqlClient
Imports System.Data

Public Class Form1
    Public objBD As New clasBD()

    Private Con As SqlConnection
    Private sql As String
    Private Da As SqlDataAdapter
    Private Cmd As SqlCommand

    Public Connection As New SqlConnection("Data Source=localhost;Initial Catalog=BdRhema;Persist Security Info=True;User ID=sa;Password=bdd")

 


    Private res As Double
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: esta línea de código carga datos en la tabla 'BdRhemaDataSet.pv' Puede moverla o quitarla según sea necesario.
        Me.PvTableAdapter.Fill(Me.BdRhemaDataSet.pv)
        'TODO: esta línea de código carga datos en la tabla 'BdRhemaDataSet.productos' Puede moverla o quitarla según sea necesario.
        Me.ProductosTableAdapter.Fill(Me.BdRhemaDataSet.productos)


        Me.DescripcionTextBox1.Text = ""
        Me.ArchivoTextBox.Text = ""
        Me.CantidadTextBox.Text = ""
        Me.CvventaTextBox.Text = ""

       

    End Sub
    Private Sub btnpagar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnpagar.Click
        Dim total As Double
        Dim cant As String
        Dim descripcion As String
        Dim preciov As String



        'res = txtcantidad.Text * CostoTextBox.Text
        'lbltotal.Text = "$ " + res.ToString

        'sql = "SELECT MAX(cvventa)+1 AS 'cvv' FROM ventas"
        'Da = New SqlDataAdapter(sql, Con)
        'Da.Fill(DatSet)
        'If DatSet.Tables(0).Rows.Count > 0 Then
        '    cvventa = DatSet.Tables(0).Rows(0).Item("cvv")
        'End If

        'sql = "ventas_insertar " + cvventa.ToString + ",2211"
        'Cmd = New SqlCommand(sql, Con)
        'Cmd.ExecuteNonQuery()


    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        End
    End Sub
    Private Sub NombreLabel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
    End Sub
    Private Sub btnAgregar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAgregar.Click
        If Me.DescripcionTextBox1.Text <> "" Then
            If Me.ArchivoTextBox.Text <> "" Then
                If Me.CostoTextBox.Text <> "" Then
                    If Me.CantidadTextBox.Text <> "" Then
                        If Me.CvventaTextBox.Text <> "" Then
                        End If
                    End If
                    'agregamos la informacion a un row o fila del datagrid
                    Me.DataGridView2.Rows.Add(Me.CvproductoTextBox.Text, Me.DescripcionTextBox1.Text, Me.ArchivoTextBox.Text, Me.CostoTextBox.Text, Me.CantidadTextBox.Text, Me.CvventaTextBox.Text)
                    'limpiamos los controles
                    Me.DescripcionTextBox1.Text = ""
                    Me.ArchivoTextBox.Text = ""
                    Me.CantidadTextBox.Text = ""
                    Me.CvventaTextBox.Text = ""
                End If
            Else
                MessageBox.Show("Ingres bien el producto PLEASE", "", MessageBoxButtons.OK, MessageBoxIcon.Information)
            End If
        End If

    End Sub

    Private Sub DataGridView_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView2.CellContentClick

        ' hacer referencia al nombre de la columna para saber donde hicieron click o solo con el e.columnindex sabiendo la posicion de la columna
        'yo lo manejo asi por que se daran cuenta que en algun caso las columnas pueden aumentar o disminuir
        'y se complicaria la cosa por que si cambia el numero de columnas habria que corregir siembre el indice

        'si hicieron clic en la columna eliminar
        If DataGridView2.Columns(e.ColumnIndex).Name = "Eliminar" Then
            'eliminar row
            DataGridView2.Rows.RemoveAt(e.RowIndex)
        End If
    End Sub
    Private Sub btnGuardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnguardar.Click

        Dim DatSet As New DataSet
        Dim cvventa As Integer

        If DataGridView2.Rows.Count > 0 Then

            Dim SqlString As String = "" ' variable a la que asignaremos la sentencia
            Dim ListSqlStrings As New ArrayList  'arregla donde ingresaremos las sentencias
            'recorremos el datagrid como ya sabemos siempre se toma desde cero
            For i As Integer = 0 To DataGridView2.Rows.Count - 1
                'creamos la sentencia el row siempre tendra el valor de i para ir pasando de row en row
                'el campo .cells(0) indica la columna que esta ese dato, tambien puede hacerlo con el nombre de la celda .cells("Nombre")


                sql = "SELECT MAX(cvventa)+1 AS 'cvv' FROM ventas"
                Da = New SqlDataAdapter(sql, Connection)
                Da.Fill(DatSet)
                If DataGridView2.Rows.Count > 0 Then
                    cvventa = DataGridView2.Rows(0).Cells("cvv").ToString
                End If

                'sql = "ventas_insertar " + cvventa.ToString + ""
                'Cmd = New SqlCommand(sql, Connection)
                'Cmd.ExecuteNonQuery()

                SqlString = "INSERT pv (descripcion, archivo, precio, cantidad, cvproducto, cvventa) VALUES  ('" + DataGridView2.Rows(i).Cells(0).Value.ToString + "','" + DataGridView2.Rows(i).Cells(1).Value.ToString + "','" + DataGridView2.Rows(i).Cells(2).Value.ToString + "','" + DataGridView2.Rows(i).Cells(3).Value.ToString + "','" + DataGridView2.Rows(i).Cells(4).Value.ToString + "','" + cvventa.ToString + "')"
                '" + DataGridView2.Rows(i).Cells(0).Value.ToString + "," + DataGridView2.Rows(i).Cells(1).Value.ToString + "," + DataGridView2.Rows(i).Cells(2).Value.ToString + "," + DataGridView2.Rows(i).Cells(3).Value.ToString + "," + DataGridView2.Rows(i).Cells(4).Value.ToString + "," + DataGridView2.Rows(i).Cells(5).Value.ToString + ""

                'agregamos la sentencia a la lista
                ListSqlStrings.Add(SqlString)
            Next
            If EjecutarTransaccion(ListSqlStrings) Then
                MessageBox.Show("Info. guardada correctamente")
                'Close()
            Else
                MessageBox.Show("La Info. no se guardo")
            End If
        Else
            MessageBox.Show("No hay informacion para guardar")
        End If


        'res = PrecioTextBox.Text * CantidadTextBox.Text
        'lbltotal.Text = "$ " + res.ToString


    End Sub





    'abre la conexion

    Public Function AbrirConexion() As Boolean
        Dim band As Boolean = False
        Try
            Connection.Open()
            band = True
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        Return band
    End Function

    'cierra la conexion
    Public Function CerrarConexion() As Boolean
        Dim band As Boolean = False
        Try
            Connection.Close()
            band = True
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
        Return band
    End Function

    Public Function EjecutarTransaccion(ByVal ListaSentencias As ArrayList) As Boolean
        Dim band As Boolean = False
        If AbrirConexion() Then
            Dim command As SqlCommand = Connection.CreateCommand()
            Dim transaction As SqlTransaction
            Dim strSentencia As Object
            Dim sentencia As String = ""
            transaction = Connection.BeginTransaction()
            command.Connection = Connection
            command.Transaction = transaction
            Try
                For Each strSentencia In ListaSentencias
                    sentencia = strSentencia.ToString()
                    command.CommandText = sentencia.ToString()
                    command.ExecuteNonQuery()
                Next
                transaction.Commit()
                band = True
            Catch ex As Exception
                MessageBox.Show(ex.Message)
                Try
                    transaction.Rollback()
                Catch ex2 As Exception
                    MessageBox.Show(ex2.Message)
                End Try
            Finally
                CerrarConexion()
            End Try
        End If
        Return band
    End Function


  end sub
End Class











Hola foro, eh tengo un detalle con un proyecto pequeño, lo que pasa es que tengo una base de datos en SQL server 2008, y estoy haciendo una interface en Visual estudio 2008:

-inserte un DataGridView, realize la conexion a la base de datos, exactamente a  la tabla "productos", ahora mi pregunta es como puedo hacer para agregar un producto desde el DataGrid, que se guarde en el mismo y tambien en mi base de datos.

Gracias

Hola, foro, espero sea aqui donde deberia postear esto, si no, pues disculpen.

Paso a lo siguiente, lo que pasa es que tenia instalado en mi computadora hp nc 6400, WifiSlax y Windows 7, cada uno con su particion. Resulta que quize instalar XP de nuevo por necesidad. Pues instale y ahora al iniciar la computadora no me aparece en gestor de arranque GRUB.
como puedo solucionarlo?, espero me ayuden...gracias

Hola, comunidad, tengo un problema con un disco duro externo; Western Digital My Passport de 1 tb, el problema es que se me cayo por la mañana, un descuido tonto, lleve a un costado un led el cual enciende cuando lo conecto, no lo reconoce la computadora, quiero saber si hay forma de repararlo o ya no, no esta quemado por lo que es posible repararlo?

Hola, espero sea aqui la cuestion. Eh alguiente conoce alguna distribucion de Linux, que sea especialista en Biologia?, o que este enfocada a ello. Gracias

hola amigos del foro, espero puedan ayudarme dandome una idea, o si alguna persona lo haya hecho ya, decirme como podria hacer; para conectar mas de ocho leds en el puerto paralelo, por que tengo entendido que pueden conectarse ocho que son los de estado, como podria hacer para conectar mas de ocho en mi protoboard, y elegir cual quiero encenderse.
Hasta ahora solo eh encendido los ocho, usando el comando basico para cada boton.
Quiero aprender mas sobre este tema, agradeceria me ayudaran, con la idea.gracias