首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

求:VB登陆 ASPX+C# 的 代码!解决方案

2012-08-17 
求:VB登陆 ASPX+C# 的 代码!我下了一个 点卡充值系统 开发语是:.net2.0+c#地址是: http://www.newasp.net/

求:VB登陆 ASPX+C# 的 代码!
我下了一个 点卡充值系统 开发语是:.net2.0+c#
地址是: http://www.newasp.net/code/net/22768.html

这里面有个接口文件 api.aspx 代码是:
<%@ Page Language="C#" AutoEventWireup="true" CodeFile="api.aspx.cs" Inherits="api" %>
<!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>无标题页</title></head>
<body>
  <form id="form1" runat="server">
  <div>
   
  </div></form></body></html>

  api.aspx.cs 文件代码是:

using System;
using System.Data;
using System.Configuration;
using System.Collections;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;

public partial class api : System.Web.UI.Page
{
  public int snid=25;//随机码所乘的倍数,请在此修改

  protected void Page_Load(object sender, EventArgs e)
  {
  if (Request.QueryString["Uname"] != null && Request.QueryString["Upass"] != null && Request.QueryString["Ranid"] != null)
  {
  DataTable dt = new DataTable();
  dt = access.GreatDs("select * from userinfo where username='" + re.replace(Request.QueryString["Uname"]) + "' and userpassword='" + re.replace(Request.QueryString["Upass"]) + "'").Tables[0];
   
  if (dt.Rows.Count < 1 )
  {
  Response.Write("Error,用户名和密码不正确");
  Response.End();
  return;
  }
  DateTime endtime = DateTime.Parse(dt.Rows[0]["end_date"].ToString());
  if (DateTime.Compare(DateTime.Now,endtime)>0)
  {
  Response.Write("Error,帐户已经过期,请充值");
  Response.End();
  return;
  }

  int hid=int.Parse(Request.QueryString["Ranid"]) * snid;
  string s = "ok,用户名为" + fun.Encrypt(Request.QueryString["Uname"], 1) + ",密码为";
  s += fun.Encrypt(Request.QueryString["Upass"], 1) + ",随机数为";
  s += fun.Encrypt(hid.ToString(), 1) + ",服务器当前时间为";

  s += DateTime.Now + ",";
  Response.Write(s);
  Response.Write("到期时间为" + dt.Rows[0]["end_date"].ToString());
  Response.Write("绑定的游戏帐号为" + dt.Rows[0]["gameno"].ToString());
  Response.End();

  }
  else
  {
  Response.Write("Error,参数无效");
  Response.End();
  }
  }
}

  我想问一下 能不能 用VB 登陆 并且 返回 Response.Write里的信息???
  如果能,那代码该怎么写???
   
  我的接口在: http://52guagua.jfwl.net/api.aspx 给大家提供测试用的! 
  帐号: qpy 密码: 592
  我的QQ: 324747460

[解决办法]
能。用inet提交登录信息,然后在inet状态改变并且state=12的时候,可以获取返回的信息。然后对返回的信息进行文本操作。比如查找返回的信息中有没有登录成功,如果有就表示成功了。就相当于一个网页登录器、?
[解决办法]


用XMLHttpRequest

热点排行