Jump to content

ilanocf

Membros
  • Content Count

    3
  • Joined

  • Last visited

Community Reputation

0 Neutro

About ilanocf

  • Rank
    Membro Ativo no Fórum
  • Birthday 10/27/1970
  1. Olá pessoal, Vi esse post e tentei implementar o código usando linguagem VB. Estou fazendo no Visual Studio 2010. Pensei em criar como um objeto para depois chamar de qualquer outro formulário. Só que o código está apresentando alguns problemas. Segue abaixo o modelo em VB e seus erros. Se alguém puder me ajudar, agradeceria muito, pois faz muito, muito tempo mesmo que estou procurando uma forma de fazer autenticação utilizando os dados do próprio usuário do sistema. Imports Microsoft.VisualBasic Imports System Imports System.Windows.Forms Imports CPConnect Namespace AuthCorporeRM Partial Public Class objEfetuaLogin Inherits Form Public Sub New() InitializeComponent() End Sub 'Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Public Function Logar(ByVal pLogin as String, ByVal pSenha as String) Dim login As LoginClass = New LoginClass() Dim a, b, c As Object b = login.ErrorCode c = login.ErrorMessage a = Nothing 'login.GetAccessParams(False, "CorporeRM", "jmoura", "34de4", "F", a, b, c) login.GetAccessParams(False, "CorporeRM", pLogin, pSenha, "F", a, b, c) MessageBox.Show(b.ToString()) If b <> CObj(0) Then MessageBox.Show(c.ToString()) End Function End Class End Namespace Erros: Error 60 Type 'Form' is not defined. I:\APLICAÇÕES WEB\PORTAL\app_code\objetos\objEfetuaLogin.vb 8 18 I:\APLICAÇÕES WEB\PORTAL\ ------------ Error 61 'InitializeComponent' is not declared. It may be inaccessible due to its protection level. I:\APLICAÇÕES WEB\PORTAL\app_code\objetos\objEfetuaLogin.vb 11 13 I:\APLICAÇÕES WEB\PORTAL\ ------------ Error 62 Type 'LoginClass' is not defined. I:\APLICAÇÕES WEB\PORTAL\app_code\objetos\objEfetuaLogin.vb 15 26 I:\APLICAÇÕES WEB\PORTAL\ ------------ Error 63 'MessageBox' is not declared. It may be inaccessible due to its protection level. I:\APLICAÇÕES WEB\PORTAL\app_code\objetos\objEfetuaLogin.vb 21 13 I:\APLICAÇÕES WEB\PORTAL\ ------------ Error 64 'MessageBox' is not declared. It may be inaccessible due to its protection level. I:\APLICAÇÕES WEB\PORTAL\app_code\objetos\objEfetuaLogin.vb 22 34 I:\APLICAÇÕES WEB\PORTAL\ ------------ Grato, Ilano.
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.