1、连接SQL*Plus system/manager2、显示当前连接用户SQL show user3、查看系统拥有哪些用户SQL select * from all_users;4、新建用户并授权SQL create user a identified by a;(默认建在SYSTEM表空间下)SQL grant connect,resource to a;5、连接到新用户SQL conn a/a6、查询当前用户下所有对象SQL select * from tab;7、建立第一个表SQL create table a(a number);8、查询表结构SQL desc a9、插入新记录SQL insert into a values(1);10、查询记录SQL select * from a;11、更改记录SQL update a set a=2;12、删除记录SQL delete from ...
一、【文件(F)】菜单中的命令的实现
1、〖打开〗命令的实现
[格式]:document.execCommand(''open'') [说明]这跟VB等编程设计中的webbrowser控件中的命令有些相似,大家也可依此琢磨琢磨。 [举例]在body/body之间加入: a href=''#'' onclick=document.execCommand(''open'')打开/a
2、〖使用 记事本 编辑〗命令的实现
[格式]:location.replace(''view-source:''+location) [说明]打开记事本,在记事本中显示该网页的源代码。 [举例]在body/body之间加入: a href=''#'' onclick=location.repla...
技术管理做人行业每天晚上,请你问自己这些问题:1, 今天我是否克服了技术上新的困难?2, 今天我是否多读了一些新书?3, 今天我是否就某方面的问题与人进行了交流?4, 今天我是否多认识了一个新同事或新朋友并准备与他们保持联络?5, 今天我是否更多的接触到身处的行业需求,现状,和发展?精通技术精通技术是技术人员的根本要求,也是技术人员人生发展的必经之路,只有首先精确掌握一门技术,才能触类旁通的掌握其他技术。精通技术不仅仅是为了精通技术,而是为了触类旁通,为了掌握精通技术的学习方法,研究方法,体会身处技术顶...
import java.sql.*;import java.io.*;import java.lang.*;import java.awt.*;public class filesave{public static void main(String args[]){try{Class.forName(''sun.jdbc.odbc.JdbcOdbcDriver'');Connection con = DriverManager.getConnection(''jdbc:odbc:mydb'',''sa'','''');Statement stmt=con.createStatement();//建立Statement对象File str=new File(''c://bbb.xls'');int fileLength = (int)str.length();InputStream a= new FileInputStream(str);String sql=''insert into testfile(id,testfile) values('1',?)'';Prepar...
import java.sql.*;import java.io.*;import java.lang.*;import java.awt.*;public class fileopen{public static void main(String args[]){try{Class.forName(''sun.jdbc.odbc.JdbcOdbcDriver'');Connection con = DriverManager.getConnection(''jdbc:odbc:test'',''sa'','''');Statement stmt=con.createStatement();ResultSet rs;String sql=''select photoimg from StaffInfo where staffid='C034106000001000002''';rs=stmt.executeQuery(sql);while(rs.next()){ InputStream image = rs.getBinaryStream(''photoimg'');//phot...
function StrToPChar( Str: String ): PChar;begin Result := StrAlloc(Length(Str)+1); {$IFDEF WIN32} StrCopy( Result, PChar(Str)); {$ELSE} StrPCopy( Result, Str ); {$ENDIF}end;
Function GetByteNumer(str:pchar):integer; begin if LOWERCASE(strpas(str))='c:\' then result:=3 else if LOWERCASE(strpas(str))='d:\' then result:=4 else if LOWERCASE(strpas(str))='e:\' then result:=5 else if LOWERCASE(strpas(str))='f:\' then result:=6 else if LOWERCASE(strpas(str))='g:\' then result:=7 else if LOWERCASE(s...
引用shellapi单元
function DoCopyDir(sDirName:String;sToDirName:String):Boolean;//sDirName 原路径sToDirName目的路径var SHFileOpStruct:TSHFileOpStruct;// FromDir,ToDir:PChar;begin GetMem(FromDir,Length(sDirName)+2); GetMem(ToDir,Length(sToDirName)+2); FillChar(FromDir^,Length(sDirName)+2,0); FillChar(ToDir^,Length(sToDirName)+2,0); StrCopy(FromDir,PChar(sDirName)); StrCopy(ToDir,PChar(sToDirName)); with SHFileOpStruct do begin Wnd:=self.Handle; wFunc:=FO_COPY; pFrom:=PChar(sDirName); pTo:=PCha...
function UC_DToOther(D,scale:Int64):String;//十进制转其它进制,SCALE为进制数,2至36var remain:Int64;begin if (scale 2) or (scale 36) then begin Result := 'Error'; Exit; end; Result := ''; While D 0 do begin remain := D mod scale; D := D div scale; if remain 9 then Result := Chr(remain+55) + Result else Result := Chr(remain+48) + Result; end;end;
Windows 提供了API函数SetEnvironmentVariable,不过这个函数只能修改当前进程的环境变量,而不能修改其他进程和系统的变量。 要修改系统的环境变量,需要修改注册表SYSTEM\CurrentControlSet\Control\Session Manager\Environment下的项,然后发送WM_SETTINGCHANGE消息。添加Registry单元
procedure SetSystemEnvironmentVariable(const name, value: string);var rv: DWORD;begin with TRegistry.Create do try RootKey := HKEY_LOCAL_MACHINE; OpenKey('SYSTEM\CurrentControlSet\Control\Session ' + 'Manager\Environment', Fals...
《河东狮吼》:“从现在开始,你只许疼我一个人,要宠我,不能骗我,答应我的每一件事都要做到,对我讲得每一句话都要真心,不许欺负我,骂我,要相信我,别人欺负我, 你要在第一时间出来帮我,我开心了,你就要陪着我开心,我不开心了,你就要哄我开心 ,永远都要觉得我是最漂亮的,梦里也要见到我,在你的心里面只有我,就是这样了。”
??
?
曾经有一份真诚的爱情放在我面前,我没有珍惜,等我失去的时候我才后悔莫及,人世间最痛苦的事莫过于此。你的剑在我的咽...
1.每个人都想和别人不一样,结果是每个人都一样
2.老一代人完全不用担心小辈们会在你们的路上跌跤----他们全朝另一条路跑了。
3.生活就像一场球赛,哪怕水平再烂,也要努力踢的精彩。
4.恨,能挑起争端,爱,能遮掩一切过错。
5.人和动物毕竟不同:动物意见不和了上去就打,人最起码还知道先讲上两句。 6.如果一个国家同时存在“卖不出去的房”和“没房子住的人”两种情况时,这个国家必须检讨!
7.宇宙之所以伟大,不因为它叫宇宙,因为它是宇宙。
8.能改变一个人的因素无非3种:信仰,金钱,真正的爱情。
9.伟人———一个和...
诸位,咱当电子工程师也是十余年了,不算有出息,环顾四周,也没有看见几个有出息的!回顾工程师生涯,感慨万千,愿意讲几句掏心窝子的话,也算给咱们师弟师妹们提个醒,希望他们比咱们强!
[1]好好规划自己的路,不要跟着感觉走!根据个人的理想决策安排,绝大部分人并不指望成为什么院士或教授,而是希望活得滋润一些,爽一些。那么,就需要慎重安排自己的轨迹。从哪个行业入手,逐渐对该行业深入了解,不要频繁跳槽,特别是不要为了一点工资而转移阵地,从长远看,这点钱根本不算什么,当你对一个行业有那么几年的体会,...