Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Temas - softdonet

#1
Hola a todos.. tengo un pequeño prblema y se que en este foro podran ayudarme... espero poder explicar mi duda:

Estoy haciendo unos reportes en JasperReport y los hago a través de iReport, estos reportes son para imprimirlos en formularios preimpresos a través de una impresora de "matriz de puntos (Epson, Oki, Lexmark, entre otras)" generalmente esta impresoras vienen diseñadas para imprimir en tipos de fuente predeterminadas que hacen que la impresión sea mas rápida, es decir no usando fuentes "true type", mi pregunta es: ¿Cómo utilizo esas fuentes Draft o Cpi con JasperReport? he buscado la manera en las propieda fuente de los campos de texto pero esos tipos de fuente no se vsualizan, me urge darle solucion a ese problema... espero me puedan ayudar... gracias
#2

hola a todos espero que me puedan ayudar estos haciendo un login  en donde estoy creando una session y esa session quiero recuperarlo en otro formulario el l  para poder validar la autenticacion de usuarios que mientras no hayan iniciado session no puedan acceder

esta es  mi función php la que estoy enviándolo
Código (php) [Seleccionar]



function nValidarLogin($login,$pass,$empresa){
$obj_pSegSist = new nSeguridadSistema();
$validacionUsuario = $obj_pSegSist -> nValidarUsuario($login);
if ($validacionUsuario== 2 ){
//echo("hola");
$rpta = "No existe el usuario introducido";
echo ($rpta);
//header("location: ../cp/pAcceso.php?rpta=".$rpta);
}else{
$validacionUsuarioClave = $obj_pSegSist -> nValidarUsuarioClave($login,$pass);
if($validacionUsuarioClave == 1){
$validacionEmpresa = $obj_pSegSist -> nValidarEmpresa($login,$pass,$empresa);
if($validacionEmpresa == 1){
//session_start();
$_SESSION['usuario']=$login;
if(isset($_SESSION['usuario'])){
// header("location: ../cp/pMenuPrincipal1.php");
echo (1);
}
}else{
$rpta = "Usuario no pertenece a la empresa selecionada";
echo($rpta);
//header("location: ../cp/pAcceso.php?rpta=".$rpta);
}
}else{

$rpta = "Password incorrecto";
echo($rpta);
//header("location: ../cp/pAcceso.php?rpta=".$rpta);
}

}
}











esta es mi petición ajax que lo estoy enviando a la función php ,la función y los parámetros requeridos .
Código (javascript) [Seleccionar]


var button = Ext.getCmp('but');
button.on('click', function(){

Ext.Ajax.request({               
url:"../cn/nLogin.php", 
                params:{funcion:'nValidarLogin', txt_usuario:uss.getValue(), txt_clave:pas.getValue(),txt_empresa:emp.getValue()}, 
                success:terminado, 
                failure:conexionFailure
            }); 






esta en donde resesiono lo mensajes obtenidos  de la función php
Código (javascript) [Seleccionar]


function terminado(resp){

if(resp.responseText==1){
Ext.Msg.alert("INFORMACION DEL SISTEMA ","Binevnidoas al Sistema Contable")

window.location.href = 'pMenuPrincipal1.php'


}
else{
Ext.Msg.alert("INFORMACION DEL SISTEMA",resp.responseText);

}


}

})






espero me puedan ayudar gracias por sus respuestas de antemano
#3
Hola a todos.en esta oportunidad aca les dejo un mini tutorial de ajax con asp.net ,sabes que ajax es un conjunto de tecnologias web en el cual evita que la pagina se refresque o se  actualise  solicitar la informacion de alogada en una base de datos o realizar cualquier otra operacion web.

aca les dejo un pequeño ejemplo de logeo utilizando el evento keyUp de un textbox se pueda realizar la consulta directamente ala base de datos

sin mas detalles a ca el ejemplo

lo que Vamos hacer primero es crear una base de datos , y nuestra tabla usarios

Código (sql) [Seleccionar]


go
use master
go
drop database usuarios
go
create database usuarios
go
use usuarios
go
create table usuarios
(
idus int identity primary key,
usename varchar(20),
pwd varchar(20)
)
go
insert into usuarios values('admin','admin')
insert into usuarios values('Jose','Guevara')
insert into usuarios values('operador','opera')


Una ves que emos crado nestra base de datos y nuestra tabla respectiva

vamos a relizar nuestro diseño del formulario de  nuestra pagina web

a nuestra pagina lo llamaremos loing.aspx


Código (asp) [Seleccionar]

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="loing.aspx.vb" Inherits="usarios_loing" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Página sin título</title>
        <script language="javascript" src="../AjaxNet.js" type="text/javascript" > </script>

</head>
<body>
    <form id="form1" runat="server">
        <table>
            <tr>
                <td style="width: 100px">
                    Usuario</td>
                <td style="width: 100px">
                    <asp:TextBox ID="t1" runat="server"></asp:TextBox></td>
                <td style="width: 100px">
                </td>
            </tr>
            <tr>
                <td style="width: 100px">
                    contraseña</td>
                <td style="width: 100px">
                    <asp:TextBox ID="t2" runat="server" onkeyup="usuarios();"></asp:TextBox>
                    <div id='resultado'></div>
                    </td>
                <td style="width: 100px">
                </td>
            </tr>
            <tr>
                <td style="width: 100px">
                    <input id="log" type="button" value="Loing"  onclick="usuarios();"/></td>
                <td style="width: 100px">
                </td>
                <td style="width: 100px">
                </td>
            </tr>
        </table>
        <div id="msj" style="position:absolute;left:260px;top:180px;width:450px"> 
       
        </div>
        <br />
        <br />
    </form>
</body>
</html>






opteneido como resultado lo siguiente.



ahra vemromos la parate de progracion lo que nos interesa .

para esta aplicacion vamos utilizar un "js" es decir un arcivo jacascript en donde alogaremos todo la informacion del lado del clinte.

el archivo js lo llamaremos "AjaxNet.js"
en este directorio vamos a declara un funcion llamada


usuario en donde se alamacenara toda la invorcion que se solicite al momneto que nosotri digitemos en las cajas de texto y verifique la informacion conrrespondiente con la base de datos.

Código (javascript) [Seleccionar]

function usuarios(){

ajax = new ActiveXObject("Microsoft.XMLHTTP");
var uss = document.getElementById('t1').value;
var pas = document.getElementById('t2').value;
var boton=document.getElementById("log");
ajax.open("GET", "VereFic_Loing.aspx?us="+uss+"&ps="+pas,true);
//  ajax.open("Get","VereFic_Loing.aspx?us="+uss+"&ps="+pas,true);
document.getElementById('resultado').innerHTML="";
if (ajax) {

ajax.onreadystatechange = function() {
//alert(ajax.status);
boton.disabled=true;
if (ajax.readyState == 4 && (ajax.status == 200 || ajax.status == 304 || ajax.status == 500)) {
document.getElementById('resultado').innerHTML="";
document.getElementById('resultado').innerHTML = ajax.responseText;
boton.disabled=false;
}
}
//req.open('GET', pos_url +'?nombre='+nombre,true);
ajax.send(null);
}

}




una ves que creado
aura vamos a crea la paguian aspx del lado del servidor en donde se va verfica la existencia del usario

lo llamaremos a nuestra pagina
VereFic_Loing.aspx


el cual contendra lo siguente





Código (vb) [Seleccionar]

<%@ Page Language="VB"%>

<%@ Import Namespace="system.Data.SqlClient"%>
<%@ Import Namespace="system.Data"%>

<script runat="server">
    'lo  primero que se debe ralizar es importar los Namespace
    'tanto el data com el SqlClient
    'estos Namespace contienen las libreriar que interactuan con
    'el administrador de base de datos utilizamos es decir con el sql server
   
    '================0
    'una ves que hemos importado las librerias cramos nuetra acadena de conexion
    ' a nuestra cadena de conexion lo vamos ha llamr con
   
    Dim con As New SqlConnection("Integrated security=sspi;server=.;database=usuarios")
    'database: nos permita optener el nombre de la base de datos con la que vamos a trabajar
    'en este caso nuetra base de datos se llama usuarios
    'SERVER:NOS DA EL ORIGEN DE DATOS ,EN ESTE CAMO ESTAMOS TRABAJANDO LOCALMENTE,
    'SOLAMENTE PODRMOS PUNTO O SIMPLEMENTE (LOCAL), O EL NOMBRE DE L MAQUEINA PERO SI NUETRS BASE DE DATOS
    'ESTUBIERA ALOGADO EN UN SERVIDOR TENDRIAMOS PONER EL NOMBRE DEL SERVIDOR POR EJEMPLO
    'EL SERVIDOR QUE ESTA ALOGADA NUESTRA BASE DE DATOS TOMARA EL IP:200.65.15.3
    'EL ORIENGE DEDATOS SERIA SERVER=200.65.15.3.
   
    Sub page_load(ByVal sender As Object, ByVal e As System.EventArgs)
        ' el la varible user resivimos el parametro us que declaramos la funcion ajax
        Dim user As String = Request.QueryString("us") 'recibimos el paramtro del usarios
        Dim pas As String = Request.QueryString("ps") 'recibimos el paramtro del contraseña
        'llamamos ala funcion  y enviamos los parametros solicitados, tanto el usario con la contraseña
       
        If users(user, pas).Rows.Count = 0 Then
            'en caso la contraseña  y/o usario sea inconrrecto mostrar el siguente mensaje
            Response.Write("Acceso Denegado")
        Else
            ' el caso contrario que fueran conrrecto los datos mostrar los soguente
            Response.Write("Felicitacion Acceso Concedido al sistemas")
        End If
    End Sub
    'hacemos una funcion para verficar la existencia del uasario
    'de tipo datatable en el cual enviamos dos parametros ,el nombre del usario y la contraseña
    Function users(ByVal us As String, ByVal pas As String) As DataTable
        'creamos la consulta ala tabla usarios utilizando la sentencia like
        Dim da As New SqlDataAdapter("select  idus,usename,pwd from usuarios where usename like '" & us & "' and pwd  like '" & pas & "'", con)
        Dim ds As New DataSet
        Dim dtb As New DataTable
        da.Fill(dtb)
        Return dtb
    End Function

</script>


eso es todo espero qu les sirva de algo

mas adelante continuare con mas aportes.........



#4
hola atodos estoy haciendo un ejemplo de matrices ,lo k pasa k los elementos a esta matriz se agregan aleatoriamente Utilizando una variable de tipo Random por ejemplo:
Dim a As New Random
lo que quiero hacer que los elemetos generados aleatoriamente no se puedan repetir .
al momento de mostrar los elementos de la matriz al no tenga ningun elemento repetido

con este codigo me Permite  la matriz


Dim a As New Random
        For k As Integer = 0 To 2
            For l As Integer = 0 To 2
                m(k, l) = a.Next(5, 9)
            Next
        Next


con este siguiente codigo
puedo mostar la Matriz generada en el listview

Código:   Me.ListView1.View = View.Details
        Me.ListView1.Items.Clear()
        For i As Integer = 0 To 2
            Me.ListView1.Items.Add(m(i, 0))
            For j As Integer = 1 To 2
                Me.ListView1.Items(i).SubItems.Add(m(i, j))
            Next
        Next

si alguien me puede aduyar se lo agradeceria mucho ..
mi correo es ...
Citarsoftdonet@hotmail.com
#5
.NET (C#, VB.NET, ASP) / Uso de generics en C#
4 Septiembre 2008, 21:43 PM
Código (vbnet) [Seleccionar]

VISUAL C#

Class1.cs

using System;
using System.Collections.Generic;
using System.Text;

namespace WindowsApplication1
{

class Class1
{

private string apellido;
private string nombre;
private int edad;

public int Edad
{
get { return edad; }
set { edad = value; }
}
private DateTime fecha;

public DateTime Fecha
{
get { return fecha; }
set { fecha = value; }
}
public Class1()
{

}
public Class1(string apellido,string nombre,int edad,DateTime f)
{
this.apellido = apellido;
this.nombre = nombre;
this.edad = edad;
this.fecha = f;
}

public string Apellido
{
get { return apellido; }
set { apellido = value; }
}


public string Nombre
{
get { return nombre; }
set { nombre = value; }
}

public virtual string getCodigo()
{
return apellido.Substring(0, 1) + nombre.Substring(0, 1) + "001";
}


}


}

Class2.cs

using System;
using System.Collections.Generic;
using System.Text;

namespace WindowsApplication1
{
class Class2 : Class1
{
private int sueldo;
private string codigo;
public int Sueldo
{
get { return sueldo; }
set { sueldo = value; }
}
public string Codigo
{
get { return codigo; }
}
public Class2(string apellido,string nombre,int edad)


{

}
public Class2() : base("Perez", "Juan", 25,DateTime.Now) { }

public override string getCodigo() {
//return base.getCodigo();
codigo = Apellido.Substring(0, 1) + Nombre.Substring(0, 1) + Fecha.Year.ToString().Substring(2,2);
return codigo;
}
public override string ToString()
{
string cadena="";
cadena += "Codigo : " + Codigo + "\n" + "Apellido : " + Apellido + "\n" + "Nombre : " + Nombre;
return cadena;
}

}

}



Visitar :
http://www.jsoftnet.com/
#6
Programación Visual Basic / control Listview
4 Septiembre 2008, 17:49 PM
trabajndo con el control listview de como agragar y kitar elementos..............

Código (vbnet) [Seleccionar]

'----------este la parte k nos pemite agrgar lo eelemtos al control listivew
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim f As New ListViewItem
        Dim cod As String = Me.TextBox1.Text
        Dim nom As String = Me.TextBox2.Text
        f = Me.ListView1.Items.Add(cod)
        f.SubItems.Add(nom)
    End Sub

'--------para poder crear las columnas apartir del codigo sin hacer usu del asistente
'         las columnas se agregan en el evento load ,ya que se ejecuta ala '
   'momento de cargar el formuario
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' agrgando las cabeseras al control listview
        Me.ListView1.Columns.Add("codigo") '
        Me.ListView1.Columns.Add("Nombres")
        Me.ListView1.View = View.Details '`para ver detalladamente las columnas,   
        'aunque  tambien se podri hacer atraves del assitente
        Me.ListView1.CheckBoxes = True ' permite agregar los checkbox
    End Sub


'----------este sisguite codigo se nos sirvera para quitar los elementos solamente los k hemos selccionada atraves el checkbox
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        For Each row As ListViewItem In Me.ListView1.Items
            If row.Checked = True Then
                Me.ListView1.Items.Remove(row)
            End If
        Next
    End Sub
[code=vbnet]


Código (vb) [Seleccionar]
espero que  les sea de mucha utilidad, empesando con lo aportes .[/code]
#7
hola todos este es mi primera participaciòn en el foro: el problema k planteo es el siguiente :

cundo deseo ingresar al router remoto  atraves del  telnet me sale el  siguinte error: no se  puede abrir la conexion al host; en puerto 23:

no se si hay algun programa para poder ingresar al router remoto :  y hasi para poder abrir los puertos necesarios.
sin hacer uso del telnet. :)