小编sta*_*rhu的帖子

我主要使用相同的 3 个表和大约 4 个查询。

每次需要登录Sql server management studio，一一打开对应的7个表/查询。

我可以设置它以某种方式记住它们并在下次启动时自动打开这些窗口吗？其他 Sql 工具无需任何特殊设置即可执行此操作。

谢谢

我需要一个时间戳字段,每次用户修改记录时都会更新.

到目前为止,我使用MySql,我甚至可以在字段创建中使用它:

Alter table myTable add `last_time` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP **ON UPDATE CURRENT_TIMESTAMP**

我在Sql Server中找不到这种可能性.

然后我尝试写一个触发器.

在MySql触发器中,这很简单:

Set new.last_time=CURRENT_TIMESTAMP();

Sql Server似乎既不知道新的语法,也不知道旧的语法,它给我编译错误.

的:

update myTable set last_time =CURRENT_TIMESTAMP;

工作,但它更新了所有行而不是当前行.

是不是有办法告诉Sql Server更新当前记录？我应该用"更新myid = something"吗？

SQL Server不知道它正在处理哪个实际记录？

我写这篇文章是因为我打电话给微软，他们无法给我一个人来回答这些问题，并且在https://stackoverflow.com/上我只找到了关于这个主题的非常老的问题。

1.我只有桌面应用程序。我可以在 Windows 应用商店中出售它们吗？

2.我是否需要购买 Microsoft Action pack 订阅才能在 Windows 应用商店中销售，还是只需要填写公司数据？

非常感谢您的帮助！

我有一个用 Delphi 编写的简单 Dll：

library usr_d;

uses
  System.SysUtils, System.Classes, DB,Vcl.Dialogs
  ;

{$R *.res}

Procedure SetMyData(DataSet: TDataSet);export;
begin
  if Assigned(DataSet) then
  begin
    ShowMessage(DataSet.FieldByName('MyFieldName1').AsString);
    try
      DataSet.First;
    except on E: Exception do
      ShowMessage('Error accessing field: ' + E.Message);
    end;
  end
  else
    ShowMessage('DataSet parameter is not assigned!');
end;

exports
  SetMyData;

begin
end.    

我这样称呼它：

Procedure TMainForm.CallMyDll;

type
  TSetMyData = procedure(DataSet: TDataSet); stdcall;

Var
  MyHandle               : HMODULE;
  SetMyData              : TSetMyData;  

Begin
  MyHandle := LoadLibrary('c:\MyFolder\usr_d.dll');
  if MyHandle <> 0 then
   begin
     @SetMyData := GetProcAddress(MyHandle, 'SetMyData');
     if @SetMyData …

我需要Delphi 2010的工作功能来检查是否有可用的Internet连接.

我说工作是因为到目前为止我尝试了4种不同的方法,例如http://delphi.about.com/b/2005/04/22/how-to-check-for-internet-connection-using-delphi-code.htm但是既没有奏效.

例如,一种方法总是回复说即使电缆不在电脑中也有互联网连接,另一种方法相反(它总是说没有连接).

     procedure TForm1.Button1Click(Sender: TObject) ;

      function FuncAvail(_dllname, _funcname: string;
                         var _p: pointer): boolean;
      {return True if _funcname exists in _dllname}
      var _lib: tHandle;
      begin
       Result := false;
       if LoadLibrary(PChar(_dllname)) = 0 then exit;
       _lib := GetModuleHandle(PChar(_dllname)) ;
       if _lib <> 0 then begin
        _p := GetProcAddress(_lib, PChar(_funcname)) ;
        if _p <> NIL then Result := true;
       end;
      end;

      {
      Call SHELL32.DLL for Win < Win98
      otherwise call URL.dll
      }
      {button code:}
      var
       InetIsOffline : function(dwFlags: …